Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.10.15;
Скачать: CL | DM;

Вниз

Не пойму почему не видно Label ов   Найти похожие ветки 

 
balepa ©   (2006-09-27 06:40) [0]

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 06:49) [1]

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


 
Loginov Dmitry ©   (2006-09-27 07:52) [2]

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


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


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

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


 
MBo ©   (2006-09-27 08:23) [4]

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

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

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


 
balepa ©   (2006-09-27 09:09) [5]

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

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

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

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

Сенкс.



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

Текущий архив: 2006.10.15;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.062 c
2-1159244988
tlv
2006-09-26 08:29
2006.10.15
MediaPlayer - не запускается на компьютере без Delphi


5-1141156195
Noby
2006-02-28 22:49
2006.10.15
Запись CD при помощи TXPBurn


2-1159537050
Wiedzmin
2006-09-29 17:37
2006.10.15
Округление чисел


2-1159451438
Fostr
2006-09-28 17:50
2006.10.15
Выполнение нескольких последовательных ADOSql


3-1155109989
Romkin
2006-08-09 11:53
2006.10.15
Дерево. Определение принадлежности узлов.