![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Надпись на Desktop e [D6, Win95/98]
Sfagnum © (2003-02-10 10:43:00)проблемы следующие: фон дочернего (относительно DeskTop) окошка (STATIC) серый, а хотелось бы шоб его вообще не было.
и ещё что мне в нижнем коде не ндравиться - это то что на тулбаре видно прграмку
program winmin;
uses windows;
var R: TRect;
wndText : HWND;
begin
GetWindowRect(GetDesktopWindow, R);
wndText := CreateWindowEx(WS_EX_TRANSPARENT, "STATIC","Текст",WS_CHILD or SS_RIGHT,r.Right - 96,r.Bottom - 66, 86, 16,GetDesktopWindow,0,hInstance,nil);
ShowWindow(wndText, SW_NORMAL);
ShowCursor(False);
UpdateWindow(wndText);
Sleep(10000);
ShowCursor(True);
DestroyWindow(wndText);
end.
Я новичёк в юзанье API.
В том ли я направлении копаю?
Если можно то киньте примерчик.
И есть ли возможность изменмить цвет & шрифт надписи не использую callback
Заранее спасибо.
Игорь Шевченко (2003-02-10 14:57:00) [1]Пишешь свою оконную процедуру, после создания окна говоришь
OldWndProc := SetWindowLong(HWnd, GWL_WNDPROC, LPARAM(@YourWndProc))
Вдумчиво читаешь про subclassing
Sfagnum (2003-02-10 11:21:00) [2]Проблемка в том что я не знаю как обрабатывать сообщения не мною зарегистрированого класса и что что в нём обрабатывать :)
Игорь Шевченко (2003-02-10 10:49:00) [3]Фон - Обрабатывай сообщение WM_CTLCOLORSTATIC