Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.19;
Скачать: CL | DM;

Вниз

Перебор компонетнов на форме и установка свойств для них   Найти похожие ветки 

 
OlegM   (2005-09-21 09:18) [0]

Привет всем!
Вот на пример на форме 30 ComboBox.

Делать например

ComboBox1.Clear;
ComoboBox1.Items.LoadFromStream(S);


Для каждого из них как-то неохота, можно ли перебрать их все и сделать такой код для каждого? и как если можно.


 
umbra ©   (2005-09-21 11:13) [1]


{.........................................}
procedure ReNew(parent: TWinControl);
var
i: integer;

begin
for i:=0 to parent.ControlCount - 1 do
if parent.Controls[i] is TComboBox then
begin
(parent.Controls[i] as TComboBox).Clear;
(parent.Controls[i] as TComboBox).Items.LoadFromStream(S);
end;
end;


 
OlegM   (2005-09-21 11:36) [2]

Псибки



Страницы: 1 вся ветка

Текущий архив: 2006.03.19;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
1-1140089973
tesseract
2006-02-16 14:39
2006.03.19
1с и TPropertyPage


2-1141402179
Fenix
2006-03-03 19:09
2006.03.19
Редактирование в RichEdit


2-1141394071
n_sch
2006-03-03 16:54
2006.03.19
Помогите разобраться с DBRichEdit !!!


15-1140874627
BeginerDelphi
2006-02-25 16:37
2006.03.19
Нужен опытный кодер(Delphi) зарплату гарантирую


3-1138254928
syte_ser78
2006-01-26 08:55
2006.03.19
аналог экселевской группировки