Форум: "Основная";
Поиск по всему сайту: 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.064 c
7-91093           Pavel_s               2001-12-25 16:48  2002.03.28  
TWAIN !!!!


14-91080          M-A-B                 2002-02-04 15:09  2002.03.28  
COM-порт


1-90874           lipskiy               2002-03-16 16:40  2002.03.28  
Как однозначно проверить, существует ли объект (создан ли, не испорчен ли)?


6-91014           vlad_12               2002-01-15 14:17  2002.03.28  
Кто шарит по моему компу


3-90780           Alexander Vasjuk      2002-02-25 16:47  2002.03.28  
КРИЗИС ЖАНРА или Настройка ширины колонок подчиненной таблицы