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

Как сменить канву заголовка окна   Найти похожие ветки 

← →
lutik ©   (2003-04-16 12:20) [0]

Люди, подскажите, как сменить канву заголовка окна (своего/чужого). Просто нужно на все запущенные приложения накладывать шкуру. Если кто знает, подскажите код.

---

← →
Игорь Шевченко ©   (2003-04-16 12:55) [1]

Никак

---

← →
Teetos   (2003-04-16 12:56) [2]

в привэйт секции окна
Procedure WMNCPaint(Var MEssage:TMessage); message WM_NCPAINT;
....

Procedure TForm1.WMNCPaint(Var MEssage:TMessage); message WM_NCPAINT;
Var
DC:HDC;
Begin
DC:=GetWindowDC(Handle);
Рисуешь с помощью WinApi //MoveToEx,LineTo,BitBlt etc
ReleaseDC(Handle,DC);
End;

Писал по памяти за синтаксические ошибки не отвечаю
Читай SDK хелп по WM_NCPAINT

---

← →
Songoku ©   (2003-04-16 13:05) [3]

Ты должен ставить HOOK на WM_NCPAINT.
А потом рисовать свой заголовок!!!

---

← →
Игорь Шевченко ©   (2003-04-16 15:12) [4]

Songoku © (16.04.03 13:05)

Этого недостаточно. Прежде чем делать такие заявления, проверяй их

---

← →
Songoku ©   (2003-04-16 15:26) [5]

Удалено модератором
Примечание: Offtopic

---

← →
Diamond Cat ©   (2003-04-17 01:34) [6]

> Teetos (16.04.03 12:56)

такие действия положено делать через beginpaint-endpaint

---

← →
Игорь Шевченко ©   (2003-04-17 09:20) [7]

Diamond Cat © (17.04.03 01:34)

Через BeginPaint/EndPaint рисуется КЛИЕНТСКАЯ часть окна. Заголовок к ней не относится.

---

← →
lutik ©   (2003-04-18 10:27) [8]

Спасибки, получилось, правда пропущено через одно место. Но работает.

---

← →
Diamond Cat ©   (2003-04-18 22:51) [9]

> Игорь Шевченко © (17.04.03 09:20)

Хм, не знал :о)

---

← →
Awak   (2003-04-19 03:09) [10]

2 Игорь Шевченко © (16.04.03 12:55)
Хм... Однако ответ "никак" слишком категоричен. Ведь делает же как-то это ("накладывает шкуру") WindowBlinds!

---

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

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



Память: 0.47 MB
Время: 0.013 c