Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.28;
Скачать: [xml.tar.bz2];




Вниз

Как изменить свойство компонента если известен только его тип... 


DSR   (2002-03-15 10:01) [0]

Тут вышла задачка...
На форме расположено N количество компонент типа TEdit и TLabel... Нужно очистить свойство Text у всех компонент типа TEdit... Как это можно реализовать...

If Form1.Components[2].ClassType=TEdit then (очистка свойста Text этого компонента)...

Буду рад любому совету (предпочтительнее примеры) :))
With best regards DSR



DieHard   (2002-03-15 10:09) [1]

for i:=0 to Form1.ControlCount-1 do
begin
if Form1.Controls[i] is TEdit then TEdit(Form1.Controls[i]).Text:="";
end;



Miwa   (2002-03-15 10:15) [2]


for i:=0 to ComponentCount - 1 do
if Components[i].ClassType = TEdit then
(Components[i] as TEdit).Text:="";



Miwa   (2002-03-15 10:17) [3]

Черт... Не успел...



DSR   (2002-03-15 10:32) [4]

Спасибо... оч хорошо....




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.28;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.027 c
7-91096           Flakon                2001-10-29 13:55  2002.03.28  
Com-port


6-91011           RP                    2002-01-14 09:44  2002.03.28  
Почтовый клиент


1-90963           saff                  2002-03-15 00:28  2002.03.28  
DBGrid


7-91083           volph                 2001-12-26 15:37  2002.03.28  
передать параметры уже запущенной программе


3-90810           ruslan_as             2002-03-04 13:13  2002.03.28  
Сумма по полю