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

Вниз

Как скопировать один компонент в другой...   Найти похожие ветки 

 
ТОлег   (2003-06-07 11:47) [0]

вопрос в следующем, создаю объект типа Edit в различных количествах,


with TEdit.Create(Self) do
begin
Parent := ScrollBox3;
Name:="Eindex"+IntToStr(k);
Text:="";
Font.Name:="TimesNewRoman";
Font.Size:=10;
Font.Style:=[fsBold];
Font.Color := clWindowText;
Left := 28;
Width := 48;
Color := clActiveBorder;
if k<6 then Top := 88*(k-1) else Top := 88*6;
end;


затем, зная имя объекта, необходимо получить хотя бы его содержимое, а лучше скопировать весь объект для дальнейшей работы с ним


if ScrollBox3.FindChildControl(st)<>nil then
begin
te:=ScrollBox3.FindChildControl(st);
if te.Text="" then tt1:=true else tt1:=false;
end;


(здесь конечно идет не соответствие типов), вопрос в том, как скопировать программно созданный объект, зная только его имя?


 
Юрий Зотов ©   (2003-06-07 12:08) [1]

> а лучше скопировать весь объект для дальнейшей работы с ним

А зачем копировать-то? Заведите массив TEdit"ов, в нем храните ссылки на создаваемые Edit"ы - и работайте с ними, сколько нужно. Напрямую, без всяких Find"ов.



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

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

Наверх




Память: 0.46 MB
Время: 0.02 c
14-60365
KIE
2003-05-31 23:39
2003.06.19
Соединить два файла


14-60382
JohnJ
2003-06-02 17:03
2003.06.19
Установка DelphiX


3-60015
delfin
2003-05-01 12:43
2003.06.19
DBGrid&Query - как правильно делать update НД


14-60398
NetBreaker666
2003-06-03 12:07
2003.06.19
Фанатам Marilyn Manson а


14-60396
Rafik
2003-06-03 12:34
2003.06.19
Преобразователь