Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не пойму почему не видно Label'ов


balepa ©   (2006-09-27 06:40:00) 

for i:= 1 to 10 do begin
     Scales[i]:= TLabel.Create(Self);
     Scales[i].Parent:= Form2;
     Scales[i].Name:= 'S'+IntToStr(i);
     Scales[i].AutoSize:= True;
     Scales[i].Font.Name:= 'Arial';
     Scales[i].Font.Size:= 10;
     Scales[i].Font.Style:=[fsBold];
     Scales[i].Font.Color:= RGB(0,255,0);
     Scales[i].Width:= 66;
     Scales[i].Height:= 24;
     Scales[i].Top:= 528;
     Scales[i].Left:= 16;
     Scales[i].Caption:='llllll';// IntToStr(i*10);
     Scales[i].Tag:= 0;
     Scales[i].Visible:= true;
end;


balepa   (2006-09-27 09:09:00) [1]

MBo ©   (27.09.06 08:23) [4]
И почему у всех меток одинаковые координаты?

ДА там неодинаковые будут просто хотелось бы чтобы их было сначала просто видно.

вот здесь ты используешь Self
Scales[i]:= TLabel.Create(Self);

а здесь почему-то нет...
Scales[i].Parent:= Form2;

Сенкс.


MBo   (2006-09-27 08:23:00) [2]

вот здесь ты используешь Self
 Scales[i]:= TLabel.Create( Self);

а здесь почему-то нет...
 Scales[i].Parent:= Form2;

И почему у всех меток одинаковые координаты?


balepa   (2006-09-27 08:02:00) [3]

Loginov Dmitry ©   (27.09.06 07:52) [2]
Так на первой форме и у меня видно а на второй нет.


Loginov Dmitry   (2006-09-27 07:52:00) [4]

balepa ©   (27.09.06 6:40)
Не пойму почему не видно Label'ов


Проверил у себя - все видно!


balepa   (2006-09-27 06:49:00) [5]

Если вызывать в FormCreate не видно, а если по нажатию кнопки видно
Оформлено в виде процедуры procedureTForm2.CreateLabels;


Наверх

Титульная страница Поиск, карта сайта Написать письмо