Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

TComboBox & TStringGrid   Найти похожие ветки 

 
Hint ©   (2004-04-26 11:14) [0]

Привет All!

procedure TForm1.Button1Click(Sender: TObject);
var CmBox: TComboBox;
begin
 CmBox := TComboBox.Create(Form1);
 CmBox.Parent := StringGrid1;
 CmBox.BoundsRect := StringGrid1.CellRect(0, 1);
 CmBox.Items.Text := "1" + #$D#$A + "2" + #$D#$A + "3";
end;

Все хорошо, но не выпадает список у ComboBox. Почему?


 
PKT   (2004-04-26 11:22) [1]

Опусти низ у BoundsRect, например
R := StringGrid1.CellRect(0, 1);
R.Bottom := R.Bottom + 30;
CmBox.BoundsRect := R;


 
Hint ©   (2004-04-26 11:40) [2]

To PKT
Работает :o)
Работет также принудительная посылка сообщение WM_COMMAND.

А пачему? Из-за чего?
Я посылаю WM_COMMAND потому что оно не доходит до ComboBox. А чем помогает увеличение BoundsRect? Связь какая?



Страницы: 1 вся ветка

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.134 c
6-1079469283
Олег
2004-03-16 23:34
2004.04.11
Socket или нет что лучше?


9-1068311603
MrAngel
2003-11-08 20:13
2004.04.11
glVertexPointerExt в OpenGL.pas отсутствует...


1-1082853146
val_5
2004-04-25 04:32
2004.04.11
препроцессорная переменная - где компил: D6 или D7


1-1082655742
Seldon
2004-04-22 21:42
2004.04.11
Не получается TButton.Default :(


9-1065469535
Spose
2003-10-06 23:45
2004.04.11
У DirectX 8 пытаюсь применить процедуру Lock к BackBuffer