1) Создал lng файл следующего вормата
название_формы — название_компонента — название_Properties — значение
2) при загрузке считываю считываю строки и в строковых переменных Form_name, component_name, Properties_name, Properties_value имею всё, что надо.
3) При помощи FindComponent можно менять всё, но там надо явно указывать:
With TLabel(Form1.FindComponent(component_name)) do begin
caption:=Some_Value;
hint:=Some_Value;
end;
Вопрос в следующем:
Как имея в переменных нужные значения, поменять свойства компонентов на форме?
Здравствуйте, d_xaos, Вы писали:
_>1) Создал lng файл следующего вормата
_>название_формы — название_компонента — название_Properties — значение
_>2) при загрузке считываю считываю строки и в строковых переменных Form_name, component_name, Properties_name, Properties_value имею всё, что надо.
_>3) При помощи FindComponent можно менять всё, но там надо явно указывать:
_>_> With TLabel(Form1.FindComponent(component_name)) do begin
_> caption:=Some_Value;
_> hint:=Some_Value;
_> end;
_>
_>Вопрос в следующем:
_>Как имея в переменных нужные значения, поменять свойства компонентов на форме?
насколько мне известно, к название_Properties никак не обратится
если брать одно и тоже поле — Caption, то найденный компонент можно приводить к классу TControl, если они от него наследованы
либо смотреть какой класс у найденного компонента, и вызывать соответствующую функцию.
Здравствуйте, d_xaos, Вы писали:
_>1) Создал lng файл следующего вормата
_>название_формы — название_компонента — название_Properties — значение
_>2) при загрузке считываю считываю строки и в строковых переменных Form_name, component_name, Properties_name, Properties_value имею всё, что надо.
_>3) При помощи FindComponent можно менять всё, но там надо явно указывать:
_>_> With TLabel(Form1.FindComponent(component_name)) do begin
_> caption:=Some_Value;
_> hint:=Some_Value;
_> end;
_>
_>Вопрос в следующем:
_>Как имея в переменных нужные значения, поменять свойства компонентов на форме?
здесь
