
09.04.2008, 16:23
|
 |
Специалист
|
|
Регистрация: 07.09.2007
Адрес: Украина, г. Днепропетровск
Сообщения: 892
Версия Delphi: 7 + ОгнеПтица
Репутация: выкл
|
|
Примерно так:
Код:
var tmp: TComponent;
i: integer;
begin
for i:=1 to 5 do
begin
tmp:=FindComponent('ComboBox'+IntToStr(i));
if tmp<>nil then
(tmp as TComboBox).Text:='какой-то текст';
end;
end;
__________________
Поживу - увижу, Доживу - узнаю, Выживу - учту. 
[P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|