Пропадает Caption у Form при работе программы.

[Illusiony]

Form1.Саption прописано в объект инспекторе.
При работе программы оно в какой то момент пропадает.
Как сделать что бы всегда было написано?

[Аватар]

Ну видимо не затирать его в коде. Поиcк в коде по Caption и смотри где это сделано

[Illusiony]

Ну в коде нету Form1.Саption

Походу это происходит по этому :

 GetCursorPos(p);
 lbl1.Caption:=IntToStr(p.x)+':'+IntToStr(p.y);
//h := findwindow(nil, 'Безымянный - Блокнот');
h := findwindow(nil, 'Hearthstone');
 //'Hearthstone');
    if h<>0 then begin

    //Узнаем положение и размеры найденного окна блокнота

     GetWindowRect(H, WindowRect);

     Caption:=Format({'top=%d Left=%d Width=%d Height=%d'}'',[WindowRect.Top, WindowRect.Left,

    WindowRect.Right-WindowRect.left, WindowRect.Bottom-WindowRect.Top])

У меня запускается таймер раз в секунду .
Если выделено само окно программы то это затирает form1.caption ?

Но никакого нового текста нету в заголовке окна, просто пусто.

[Stilet]

просто пусто.

Правильно. У тебя format выдает пустую строку. Ты же сам там это прописал.

[newerow1989]

Caption:=Format('top=%d Left=%d Width=%d Height=%d',[WindowRect.Top, WindowRect.Left,

Убрать фигурные скобки {}

[Illusiony]

Сообщение от newerow1989

Caption:=Format('top=%d Left=%d Width=%d Height=%d',[WindowRect.Top, WindowRect.Left,

Убрать фигурные скобки {}

А этим я не испорчу код?
В том смысле, что мне нужны данные координат окна для работы программы.

И да, для меня кода уже достаточно много и я уже путаюсь в нем, не программист как хобби занимаюсь и уже давненько над этой программой- проектом. сейчас это всего лишь около 2500 строк+ серверная часть.

[newerow1989]

Нет, невозможно испортить!

[northener]

Сообщение от Illusiony

Ну в коде нету Form1.Саption

Caption:=Format({'top=%d Left=%d Width=%d Height=%d'}'',

А говоришь в коде нету Form1.Саption. Вот же он.

[Illusiony]

Ну это не "Form1.Саption" если дословно.

[Toxa]

Сообщение от Illusiony

Ну это не "Form1.Саption" если дословно.

а это равнозначно, то же самое будет если написать Self.Caption