Q&A

  • GETDC와 ReleaseDC에 대한..
안녕하세요

초보인데요.....마우스이벤트공부중에 책예제를 따라하다가..

계속 에러가 나서 그런데요...도움말봐도...예제가 없어서 정말 깜깜합니다.

혹시 짤막한 GETDC와 ReleaseDC에 대해서 예제와 대충설명을 해주시면 감사하겠습니다.



공부하려던 예제는

procedure keyMouse_OnChar(var Msg: TWMChar);

var

S: string;

DC: HDC;

begin

DC := GetDc (HWND);

S := Format('wm_Char ==> Ch = %S cRepeat = %d ',[char(Msg.CharCode), LoWord(Msg.KeyData)]);

SetBkColor(DC, GetSysColor(Color_BtnFace));

TextOut(DC, XVal, YVal + 20, PChar(S), Length(S));

ReleaseDC(hwnd, DC);

end;

이 procedure인데....계속 에러만 나네요......

델파이2언실리드에 있는건데..제가 공부하는 버전은 4라서 그런가요?



1  COMMENTS
  • Profile
    최용일 2000.04.23 13:03
    안녕하세요. 최용일입니다.



    예제는 GetDC나 ReleaseDC로 검색해 보시면 있습니다.



    DC(Device Context)는 델파이 입장에서 생각한다면 Canvas라고 생각하시면 별 무리는



    없습니다. Canvas가 DC의 랩퍼객체이니까요... 파라매터론 윈도우 핸들을 넣어주시면



    됩니다. 보통 폼의 핸들을 많이 넣어서 전달하죠.



    DC := GetDC(Handle);

    ReleaseDC(Handle, DC);



    ^^ 한상 즐코하세요.



    crystal wrote:

    > 안녕하세요

    > 초보인데요.....마우스이벤트공부중에 책예제를 따라하다가..

    > 계속 에러가 나서 그런데요...도움말봐도...예제가 없어서 정말 깜깜합니다.

    > 혹시 짤막한 GETDC와 ReleaseDC에 대해서 예제와 대충설명을 해주시면 감사하겠습니다.

    >

    > 공부하려던 예제는

    > procedure keyMouse_OnChar(var Msg: TWMChar);

    > var

    > S: string;

    > DC: HDC;

    > begin

    > DC := GetDc (HWND);

    > S := Format('wm_Char ==> Ch = %S cRepeat = %d ',[char(Msg.CharCode), LoWord(Msg.KeyData)]);

    > SetBkColor(DC, GetSysColor(Color_BtnFace));

    > TextOut(DC, XVal, YVal + 20, PChar(S), Length(S));

    > ReleaseDC(hwnd, DC);

    > end;

    > 이 procedure인데....계속 에러만 나네요......

    > 델파이2언실리드에 있는건데..제가 공부하는 버전은 4라서 그런가요?

    >