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;
Вопрос
k0der
.................. это работает
.................. а этот не работает
Ссылка на комментарий
8 ответов на этот вопрос
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.