tDbGrid.ClientHeight at run time

← →
PVOzerski (2002-02-14 17:21) [0]

Уважаеме Мастера,
странные какие-то грабли мне в лоб из tDbGrid выскочили...
Пытаюсь поменять свойство ClientHeight at run time, а оно не хочет.
Вот кусок кода:

procedure TFrameForm.GridToolBarResize(Sender: TObject);
begin
DBgrid.ClientHeight:=GridToolBar.Height-10;
writeln(GridToolBar.Height-10," ",DBgrid.ClientHeight);

И пишется мне в консоль для GridToolBar.Height-10 то, что и должно быть,
а для DBgrid.ClientHeight - значение, выставленное для свойства Height at design time, минус 4.
Такое чувство, что свойство DBgrid.ClientHeight не то, чтобы read-only, но что-то вроде того:
формально присвоение есть, реально - игнорируется. Чего делать-то?

← →
PVOzerski (2002-02-14 18:16) [1]

Интересная деталь: этот самый DbGrid у меня размещен на ToolBar"е, и именно в этой ситуации
не работают свойства DbGrid: SetBounds, Height, ClientHeight.

tDbGrid.ClientHeight at run time Найти похожие ветки