Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
Динамическое изменение TLabel.Caption
|
|||
|---|---|---|---|
|
#18+
Простая задача оказалась не разрешима! Создаю что-то типа дизайнера куда передаю 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 на исходной форме НИЧЕГО НЕ МЕНЯЕТСЯ Михаил ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.11.2002, 10:36 |
|
||
|
Динамическое изменение TLabel.Caption
|
|||
|---|---|---|---|
|
#18+
Ну Refresh что ли попробуй сделай.. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.11.2002, 10:53 |
|
||
|
Динамическое изменение TLabel.Caption
|
|||
|---|---|---|---|
|
#18+
Вызываю cmp.Refresh; cmp.Repaint; if cmp.Parent<>nil then cmp.Parent.Repaint; и НИГЕГО !!! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.11.2002, 14:04 |
|
||
|
Динамическое изменение TLabel.Caption
|
|||
|---|---|---|---|
|
#18+
А что за новая конструкция Cmp :=Cntr.Controls; ??? Я вобще не пойму, как такое может откомпилироваться. Может ты в цикле компоненты то и не перебирал? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.11.2002, 14:45 |
|
||
|
Динамическое изменение TLabel.Caption
|
|||
|---|---|---|---|
|
#18+
Правильный ответ. Спасибо за обсуждении. Я для краткости писал проглатывая. Полность var cmp:Tcomponent; begin for i:= Cntr.ControlCount-1 do begin Cmp :=Cntr.Controls ; если анализируем тип if cmp is tLabel then Tlabel(cmp).Caption:= 'новое значение' .... Чтобы пользователь увидел нужно cmp.UPDATE !!! И ВСЁ ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.11.2002, 16:14 |
|
||
|
|

start [/forum/moderation_log.php?user_name=amokienkov]: |
0ms |
get settings: |
8ms |
get forum list: |
18ms |
get settings: |
9ms |
get forum list: |
12ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
67ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
45ms |
get tp. blocked users: |
1ms |
| others: | 437ms |
| total: | 618ms |

| 0 / 0 |
