Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Динамическое изменение TLabel.Caption / 5 сообщений из 5, страница 1 из 1
26.11.2002, 10:36
    #32072376
MBorovik
MBorovik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Динамическое изменение TLabel.Caption
Простая задача оказалась не разрешима! Создаю что-то типа дизайнера куда передаю 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
| Ответить | Цитировать | Написать  
26.11.2002, 10:53
    #32072390
Serguei
Serguei
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Динамическое изменение TLabel.Caption
Ну Refresh что ли попробуй сделай..
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.11.2002, 14:04
    #32072508
MBorovik
MBorovik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Динамическое изменение TLabel.Caption
Вызываю
cmp.Refresh;
cmp.Repaint;
if cmp.Parent<>nil then
cmp.Parent.Repaint;
и НИГЕГО !!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.11.2002, 14:45
    #32072538
Gold
Gold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Динамическое изменение TLabel.Caption
А что за новая конструкция Cmp :=Cntr.Controls; ???
Я вобще не пойму, как такое может откомпилироваться. Может ты в цикле компоненты то и не перебирал?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.11.2002, 16:14
    #32072604
MBorovik
MBorovik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Динамическое изменение TLabel.Caption
Правильный ответ. Спасибо за обсуждении. Я для краткости писал проглатывая. Полность
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
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Динамическое изменение TLabel.Caption / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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