Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.10;
Скачать: CL | DM;

Вниз

Проблемы с рисованием на окнах   Найти похожие ветки 

 
HeKTO   (2004-09-02 15:43) [0]

Следующий код при выполнении выводит надпись не на активном окне(GetActiveWindow) (окно с фокусом ввода), а на Screen, т.е. в данно случае в точке с коорд (0,0)-рабочей области монитора. Почему?

procedure DrawOnActWin;
var
 DC:HDC;
 ActWinCanvas:TCanvas;
begin
  DC:=GetDC(GetActiveWindow);
 try
  ActWinCanvas:=TCanvas.Create;
  ActWinCanvas.Handle:=DC;
  ScreenMesFONT:=Form2.FontDialog1.Font;
  ActWinCanvas.Font:=ScreenMesFONT;
  ActWinCanvas.TextOut(0,0,Form2.TextMessageEdit.Text);
 finally
  ReleaseDC(GetActiveWindow,DC);
  ActWinCanvas.Free;
 end;
end;


 
VMcL ©   (2004-09-02 15:56) [1]

Наверное, потому что GetActiveWindow возвращает нуль.


 
clickmaker ©   (2004-09-02 15:59) [2]

попробуй GetForegroundWindow


 
VMcL ©   (2004-09-02 16:02) [3]

P.S. к [1]

Дело в том, что справку нужно читать.

Return Values
The return value is the handle to the active window attached to the calling thread"s message queue. Otherwise, the return value is NULL.


 
HeKTO   (2004-09-02 19:20) [4]

GetForegroundWindow работает, спасибо clickmaker!
Подскажи, где ты взял свой WinAPI справочник- в моём такой функции нет!(http://www.infocity.kiev.ua/ - я тут брал)
VMcL - у меня инфы по этой функции всего :
Функция GetActiveWindow

Описание:
function GetActiveWindow: HWnd;

Отыскивает описатель окна, котоpое имеет текущий фокус ввода.

Возвpащаемое значение:
Идентификатоp активного окна.

См. также: SetActiveWindow

Ты где взял свою ???


 
clickmaker ©   (2004-09-02 19:43) [5]


> Подскажи, где ты взял свой WinAPI справочник- в моём такой
> функции нет!

Delphi - Help - Windows SDK
"The GetActiveWindow function retrieves the window handle to the active window associated with the thread that calls the function. "


 
VMcL ©   (2004-09-02 19:46) [6]

>>HeKTO  (02.09.04 19:20) [4]

>Ты где взял свою ???

1. Delphi IDE: Help | Windows SDK
2. http://tinyurl.com/3hs5f



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

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

Наверх




Память: 0.47 MB
Время: 0.024 c
6-1091143428
rosl
2004-07-30 03:23
2004.10.10
сообщение


1-1095303974
Kair()
2004-09-16 07:06
2004.10.10


1-1096264936
Rostislav Rotaru
2004-09-27 10:02
2004.10.10
Помогите перевести на Delphi


14-1095501470
Максим
2004-09-18 13:57
2004.10.10
Есть ли русскоязычный HELP на Delphi 7.0?


4-1094553464
Ascan
2004-09-07 14:37
2004.10.10
Состояние чужого окна (Normal, Maximized)