
28.02.2009, 16:57
|
 |
Активный
|
|
Регистрация: 22.09.2007
Адрес: SPb
Сообщения: 228
Версия Delphi: 7, 2009, XE2
Репутация: 70
|
|
попробуй FindComponent:
Код:
for i:= 1 to 3 do
begin
(FindComponent('ComboBoxEx' + IntToStr(i)) as TComboBoxEx).ItemIndex:= 0;
и так далее...
end;
__________________
Начинающий программист уверен, что в 1 килобайте 1000 байт.
Законченный программист уверен, что в 1 километре 1024 метра.
|