Господа помогите, несоздаются компоненты :(((

← →
Mishenka (2003-05-04 21:01) [0]

Нужно программным путём(не вручную) создать на форме компонент TLabel.
Пишу L[Q]:=TLabel.Create(Form7.GroupBox1);
где Form7 и GroupBox1 уже созданы, L[Q] массив типа TLabel.
Прога компилируется нормально, только вот созданного компонента (метки) на форме не видно. Caption указать не забыл. Проверил все свойства типа Visible:=true, по менял координаты, ширину высоту и т.п. не помогло.
Подскажите, пожалуйста, в чём я торможу.
Заранее спасибо.

← →
Palladin (2003-05-04 21:08) [1]

щаз я к тебе подойду посмотрю в чем дело

← →
Юрий Зотов (2003-05-04 21:19) [2]

Вероятно, Вы забыли назначить Parent. Без этого контрол останется невидимым, несмотря ни на какие Visible и координаты.

L[Q] := TLabel.Create(Form7.GroupBox1);
L[Q].Parent := Form7.GroupBox1;
...

← →
Anatoly Podgoretsky (2003-05-04 21:20) [3]

Parent установи

← →
Morfein (2003-05-04 21:38) [4]

Label:=TLabel.Create(Form7.GroupBox1); Label.ParentWindow:=Form7.Handle; Label.Left:=0; Label.Top:=0; Label.Width:=100; Label.Height:=21; Label.Caption:="Урааааа!!!!!!1"; Label.Show();

← →
Юрий Зотов (2003-05-04 22:22) [5]

> Mishenka (04.05.03 21:01)

Вот только этого не читайте: Morfein © (04.05.03 21:38). Поскольку близко к бреду. Из 8 строчек 2 ошибочные, а еще 4 - лишние.

Причем ошибки такие, что показывают практически полное незнание азов VCL. Зачем люди с ТАКИМИ знаниями пытаются непременно дать совет - лично я никак понять не могу.

← →
Morfein (2003-05-04 23:52) [6]

Хм, критика не в бровь, а в глаз! Зачем так жестоко... просто перепутал TLabel с TStaticText... и вместо Form7.GroupBox1.Handle стоит немного не то... :(

Фиксеный текст: Label:=TLabel.Create(Form7.GroupBox1); Label.Parent:=Form7.GroupBox1; Label.Left:=0; Label.Top:=0; Label.Caption:="Урааааа!!!!!!";

P.S. Лишнего ничего нет, просто пример создания компонента без использования некоторых значений по-умолчанию... Мало ли, какие случаи в жизни бывают...

← →
Юрий Зотов (2003-05-05 01:01) [7]

> просто перепутал TLabel с TStaticText...
Ничего себе - просто! Это же принципиально разные вещи.

> и вместо Form7.GroupBox1.Handle стоит немного не то
Да и воообще ParentWindow здесь как корове седло, поскольку:
а). Set ParentWindow to host a windowed control in a non-VCL parent window.
б). A TWinControl object can have either a Parent property or a ParentWindow property, but not both.
То есть, без всякой нужды отключаются стандартные механизмы VCL. Скажем, список Controls уже не используешь, про Align тоже можно забыть и т.д.

> Label.Show();
А это просто супер. Даже если заменить Label на StaticText.

> Зачем так жестоко
Согласен, погорячился. Sorry. Но все же лучше не давать никаких ответов, чем такие - ведь человек неискушенный примет их за истину.

← →
Anatoly Podgoretsky (2003-05-05 08:07) [8]

Да степень доверия полученным советам очень высокая, последствия тоже того. После этого часто начинается цепная реакция, как с некоторыми советами из Кулибы. И что плохо, трудно потом убедить, что так жить нельзя.

Господа помогите, несоздаются компоненты :((( Найти похожие ветки