StyleObject := aItem.FindStyleResource('labelname');
if Assigned(StyleObject) and (StyleObject is TLabel) then
begin
lab := (StyleObject as TLabel);
lab.Text := city + ',' + add;
end;
.................. а этот не работает
StyleObject := aItem.FindStyleResource('labelname1');
if Assigned(StyleObject) and (StyleObject is TLabel) then
begin
lab := (StyleObject as TLabel);
lab.Text := city + ',' + add;
end;
.................. это работает
.................. а этот не работает
Поделиться сообщением
Ссылка на сообщение