Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.19;
Скачать: 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 вся ветка

Текущий архив: 2003.06.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.02 c
14-60420
iluxa
2003-06-03 18:07
2003.06.19
Где купить Delphi 5


14-60334
AlekAMD
2003-06-02 04:40
2003.06.19
Работа с Microsoft Oulook из Delphi


1-60264
SiJack
2003-06-06 09:18
2003.06.19
Срочный вопрос !!!! Как получить путь к Program Files ?


14-60414
Andryk
2003-05-28 12:25
2003.06.19
---|Ветка была без названия|---


4-60455
tytus
2003-04-19 17:45
2003.06.19
Button