TButton(ALL).Caption:= Батон ;

← →
rentgen © (2005-07-29 09:35) [0]

Здравствуйте.
Можно-ли изменить параметры всех компонентов одного класса на форме(проекте) одной строкой?
Что-то вроде:
TButton(ALL).Caption:="Батон";
Спасибо.

← →
MBo © (2005-07-29 09:39) [1]

Да, можно, только строка будет длинная ;)
см. Components, ComponentCount (или Controls, ControlCount),
понадобится также проверка типа is

← →
Чапаев © (2005-07-29 09:42) [2]

Если на API, ео RTFM FindWindowEx, EnumChildWindows, GetWindowClass, SetWindowText.

Спасибо!
Все работает.
Кому нужно, вот код:

... var comp:TComponent; n:integer; ... for n:=0 to ComponentCount-1 do begin comp:=components[n]; if (comp is TEdit) then TEdit(comp).Text:="Hello"; end; ...

TButton(ALL).Caption:= Батон ; Найти похожие ветки