powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Динамическое изменение TLabel.Caption
5 сообщений из 5, страница 1 из 1
Динамическое изменение TLabel.Caption
    #32072376
MBorovik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Простая задача оказалась не разрешима! Создаю что-то типа дизайнера куда передаю Form элементы которой хочу изменить. В Disigner( Form)r двигаюсь по дереву TWinControl
Cmp :TControl
for i := 0 to Cntr.ControlCount-1 do
begin
Cmp :=Cntr.Controls ;
s:=cmp.ClassName;
capt:=GetCaption(cmp);
s:=Format('%s (%s)',[capt,s]);
nd:=TreeView.Items.AddChildObject(Node,s,Cmp);
TreeView.Items.AddChild(Nd,'');
end;
Когда хочу изменить TLabel(Cmp).Caption на исходной форме НИЧЕГО НЕ МЕНЯЕТСЯ
Михаил
...
Рейтинг: 0 / 0
Динамическое изменение TLabel.Caption
    #32072390
Serguei
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну Refresh что ли попробуй сделай..
...
Рейтинг: 0 / 0
Динамическое изменение TLabel.Caption
    #32072508
MBorovik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вызываю
cmp.Refresh;
cmp.Repaint;
if cmp.Parent<>nil then
cmp.Parent.Repaint;
и НИГЕГО !!!
...
Рейтинг: 0 / 0
Динамическое изменение TLabel.Caption
    #32072538
Gold
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А что за новая конструкция Cmp :=Cntr.Controls; ???
Я вобще не пойму, как такое может откомпилироваться. Может ты в цикле компоненты то и не перебирал?
...
Рейтинг: 0 / 0
Динамическое изменение TLabel.Caption
    #32072604
MBorovik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Правильный ответ. Спасибо за обсуждении. Я для краткости писал проглатывая. Полность
var
cmp:Tcomponent;
begin
for i:= Cntr.ControlCount-1 do
begin
Cmp :=Cntr.Controls ;

если анализируем тип
if cmp is tLabel then
Tlabel(cmp).Caption:= 'новое значение'
....
Чтобы пользователь увидел нужно
cmp.UPDATE !!!
И ВСЁ
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Динамическое изменение TLabel.Caption
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]