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

Вниз

Create object   Найти похожие ветки 

 
Ivolg ©   (2004-04-15 18:36) [0]

Можно в ставить в делфи этот код чтобы он создал объкт XPLabel2: TXPLabel

object XPLabel2: TXPLabel
     Left = 144
     Top = 80
     Width = 257
     Caption = "Привет"
   end
Куда его вставлять! ПОГИТЕ ПЛИЗ!


 
Jack128 ©   (2004-04-15 18:40) [1]

Это не код, помимо того, что ЭТО нужно вставить в dfm файл, нужно еще pas подправить..


 
Юрий Зотов ©   (2004-04-15 18:47) [2]

1. Можно в текст файла DFM. И не забыть добавить в объявление формы строку:
XPLabel2: TXPLabel

2. А можно и прямо в код, в таком виде:

with TXPLabel.Create(Self) do
begin
 Parent := Self;
 Left := 144;
 Top := 80;
 Width := 257;
 Caption = "Привет"
end;

Примечание: но если после этого Вы скажете, что Delphi не знает, что такое TXPLabel, то виноваты в последствиях будете сами.


 
WebErr ©   (2004-04-15 18:54) [3]


> with TXPLabel.Create(Self) do

Всё здорово, только сначала, наверное:
XPLabel2 := TXPLabel.Create(Self);
а уже потом:

with XPLabel2 do
begin
Parent := Self;
Left := 144;
Top := 80;
Width := 257;
Caption = "Привет"
end;


 
WebErr ©   (2004-04-15 18:56) [4]


> Юрий Зотов ©   (15.04.04 18:47) [2]
> Re: Примечание

Просто нужно, чтобы модуль с типом TXPLabel был подключен в uses в тексте программы у автора, что наверняка давно уже сделано...


 
Юрий Зотов ©   (2004-04-15 19:05) [5]

> WebErr ©   (15.04.04 18:54) [3]
"Поправка" столь же ценная, сколь и ненужная.

> WebErr ©   (15.04.04 18:56) [4]
Я сомневаюсь даже в том что этот модуль вообще у автора имеется.



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

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

Наверх




Память: 0.47 MB
Время: 0.028 c
1-1081838568
Bond
2004-04-13 10:42
2004.05.02
Напечатать конверт A5


3-1080912855
FireStorm
2004-04-02 17:34
2004.05.02
Как подключиться к БД MYSQL в Дельфи?


14-1081741095
mfender
2004-04-12 07:38
2004.05.02
День космонавтики


3-1081230888
maxz
2004-04-06 09:54
2004.05.02
Не могу в ClientDataSet выставить свойство Active в true


1-1081922727
rosl
2004-04-14 10:05
2004.05.02
разноцветный edit