Текущий архив: 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.018 c
