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




Вниз

как правильно описать функцию 


vint   (2002-02-21 13:24) [0]

Уважаемые мастера, помогите пожалуйста:
Есть функция - в которой например Form1.Label1.Caption := "..."
Как вызвать эту функцию в другой форме например Form2 в которой есть тоже Label1, чтобы Form2.Label1.Caption := "..."
т.е. разные формы имеют одни и теже компоненты и для них нужна одна функция.



Виктор Щербаков   (2002-02-21 13:31) [1]

Для поиска компонента на форме по свойству Name можно воспользоваться методом FindComponent.



Юрий Зотов   (2002-02-21 13:40) [2]

Можно передавать через параметры.

procedure SetLabelCaption(Lbl: TLabel);
begin
Lbl.Caption := "..."
end;

И вызов:
SetLabelCaption(Form1.Label1);
SetLabelCaption(Form2.Label1);



Vint   (2002-02-21 14:13) [3]

Спасибо !!!




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




Наверх





Память: 0.72 MB
Время: 0.02 c
7-19355           bios_i_ego            2001-12-01 13:06  2002.03.07  
В Паскале было Port


4-19377           iXANiA                2002-01-04 15:57  2002.03.07  
Как спрятать окно чужого приложения?


3-19090           DimaIv                2002-02-08 16:52  2002.03.07  
Возможно ли при помощи процедуры AppendRecord ничего


3-19117           Дмитрий Д.            2002-02-06 15:29  2002.03.07  
Как выцепить из поля данные ?


14-19347          mart                  2002-01-19 03:14  2002.03.07  
Билль о правах личности.