procedure Tform1.MyProc;
begin
Form1.Caption:= IntToStr(SendMessage(ComboBox1.Handle, CB_GETCURSEL, 0, 0))
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage:= MyProc;
end;
Перевести на С думаю не будет проблем
| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > C++ Builder > Index элемента списка ComboBox |
| Автор: Nickus 4.10.2006, 09:49 |
| Подскажите каким образом можно определить индекс элемента списка раскрытого ComboBox при "гулянии" мышки по нему (раскрытому DroppedDown = True). Спасибо |
| Автор: tigger 4.10.2006, 14:43 |
| Собственный компонент писать нужно, я поищу у меня где -то валялось. |
| Автор: Nickus 5.10.2006, 07:09 |
| >tigger Спасибо за отклик. Проблему уже решил. Обычный SendMessage() |
| Автор: Romikgy 5.10.2006, 08:47 |
| Nickus, ну так и покажи решение данной проблеммы |
| Автор: Nickus 6.10.2006, 15:46 |
| Мне это нужно было для Delphi procedure Tform1.MyProc; begin Form1.Caption:= IntToStr(SendMessage(ComboBox1.Handle, CB_GETCURSEL, 0, 0)) end; procedure TForm1.FormCreate(Sender: TObject); begin Application.OnMessage:= MyProc; end; Перевести на С думаю не будет проблем |
| Автор: tigger 6.10.2006, 16:04 | ||||
Nickus, так точнее будет
туда и нужно было обращаться??? |