Подскажите, как правильно позиционировать TPanel и StringGrid?

← →
dimonf (2002-04-17 19:50) [0]

Я вывожу на своей форме Panel, критю на ней еще одну TPanel на ней рисую свою заголовок таблицы StringGrid-а.
Свойство Align Panel = alTop. Свойство Align StringGrid = alNone.
Выглядит так:
TPreview1 = class(TPanel)
private
property Canvas;
protected
procedure Paint; override;
public
constructor Create(AOwner:TComponent); override;
end;
…
StringGrid1.Top:=84;
StringGrid1.ColCount:=2;
StringGrid1.Width:=600;
StringGrid1.DefaultColWidth:=Trunc(StringGrid1.Width/2);
…
MyPrev := TPreview.Create(Self);
MyPrev.parent:= Panel;
MyPrev.Width := 850;
MyPrev.Left := StringGrid1.Left;
MyPrev.Height:= 84;
…
У меня есть два случая, когда у меня MyPrev.Height=85 и MyPrev.Height=198
Вопрос в том я никак не могу добиться, чтобы у меня StringGrid1.Top = 85 (в первом случае), а во втором StringGrid1.Top = 198, чтобы создавалось иллюзия что MyPrev
это заголовок StringGrid.
Пытался в MyPrev.Paint засунуть:
В первом случае:
StringGrid1.Top := 84;
Panel.Height := 84;
Во втором:
StringGrid1.Top := 198;
Panel.Height := 198;
Почему-то не получилось ;( В принципе помогает но не всегда.
Как быть??? Может у кого есть дельные мысли?

Подскажите, как правильно позиционировать TPanel и StringGrid? Найти похожие ветки