Вниз
Скачать: CL | DM;

Не получается изменить MainForm.Caption в run-time.   Найти похожие ветки 

← →
GJAlex ©   (2004-11-11 10:04) [0]

MainForm - название главной формы.
Делаю так:
procedure TMainForm.FormCreate(Sender: TObject);
begin
 self.Caption:="новый текст: тра-ля-ля...";
end;

Отладка показывает, что присвоение прошло нормально, в
хинте на MainForm.Caption именно эта строка,
но когда форма открывается, в ее заголовке написано то, что было в дизайн-тайме.
Создал новое приложение типа "Hello, World !"
Проверил, там подмена caption работает.
А в моей программе - никак. Ума не приложу куда копать...
Пробовал уже делать присвоение в TMainForm.FormActivate и просто в клике по кнопке. Ничего не помогает.
Какие есть соображения?


← →
Семен Сорокин ©   (2004-11-11 10:07) [1]


> Какие есть соображения?

ищи по всему приложению текст заголовка - где-то еще переприсваиваешь :)


← →
GJAlex ©   (2004-11-11 10:14) [2]

Да нет. Как в дизайн-тайме поменяю, так и показывает. Если бы  переприсваивалось - то выводилось бы одно и то же всегда. Увы...


← →
Reindeer Moss Eater ©   (2004-11-11 10:46) [3]

Убери ненужный Self


← →
GJAlex ©   (2004-11-11 11:03) [4]

Убирание Self точно не помогает. Хотя он и не нужен, конечно.
А вот по сути вопроса?


← →
Ddd-01   (2004-11-11 11:04) [5]

>Убери ненужный Self

А что, с ним неправильно. Даже если он необязателен?


← →
Reindeer Moss Eater ©   (2004-11-11 11:06) [6]

Тогда это обман зрения или может обработчики событий.


← →
Reindeer Moss Eater ©   (2004-11-11 11:07) [7]

Ddd-01  

А я сказал, что из за него неправильно?
Я сказал, что он ненужный.


← →
GJAlex ©   (2004-11-11 11:50) [8]

С Self все понятно, а по сути вопроса?


← →
GJAlex ©   (2004-11-11 12:04) [9]

Всем спасибо, проблема решена!
Во всем виноват оказался компонент RxGradientCaption.  
Я его убрал с главной формы и все заработало.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c
14-1099781091
BURN
2004-11-07 01:44
2004.11.28
Kylix 3


1-1100300302
Klopan
2004-11-13 01:58
2004.11.28
Сканер сайта


1-1100084607
Артем К.
2004-11-10 14:03
2004.11.28
Цветные ячейки в TDataBaseGrid?


6-1095658998
KIR
2004-09-20 09:43
2004.11.28
TServerSocket и TcpServer


6-1095942371
Russko
2004-09-23 16:26
2004.11.28
Работа в чате




   Наверх