Вниз
Скачать: CL | DM;

Подскажите, как правильно позиционировать 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;
Почему-то не получилось ;( В принципе помогает но не всегда.
Как быть??? Может у кого есть дельные мысли?


← →
dimonf   (2002-04-17 22:07) [1]

Народ, подскажите очень надо!!! Горю !(


← →
dimonf   (2002-04-18 08:27) [2]

Народ, неужели нет мыслей??? :(((


← →
Donal_Graeme   (2002-04-18 10:49) [3]

а чем не получилось-то? что не так?

попробуй вместе с StringGrdi1.Top устанавливать ещё и StringGrid1.Height



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c
1-94387
Darlok
2002-04-17 16:24
2002.04.29
Проблема с Delphi6


7-94581
M-A-B
2002-02-01 12:13
2002.04.29
СОМ-порт


7-94596
ураган
2002-02-04 22:38
2002.04.29
помогите написать дрова


1-94397
SergLight
2002-04-17 18:35
2002.04.29
Обработка OnDrawItem для ListBox а


1-94443
Voldemar
2002-04-14 23:11
2002.04.29
Проблема с TreeView




   Наверх