Q&A

  • 한 실행파일에서 다른 실행파일에 메세지 보내기
안녕하세요...
델파이를 사랑하는 한 사람입니다...
실력은 별로 없구요....^^
다른게 아니라 프로그램을 작성해야 하는데
하나는 VC++로 작성한것이구요....
하나는 Delphi로 작성 한 것입니다...
VC++로 작성한것은 다 잘 됩니다..
그런데 델파이로 작성을 하려니까....잘 안되네요...

void SetRecover()
{
   char strData[] = "BA";
   COPYDATASTRUCT cds;
   cds.dwData = 0;
   cds.cbData = strlen(strData);
  
   cds.lpData = (char *)EncodeD(strData);

  CWnd *pWnd = Cwnd::FindWindow(NULL, "찾을 프로그램");

  if(pWin)
      pWnd->SendMessage(WM_COPYDATA,0,(LPARAM)&cds);
}


요렇게 VC++로 작성한거는 잘 돌아가는데
이거를 델파이로 옮기려니까...영 힘듭니다....
어떻게 해야 델파이에서도 잘 돌아가겠습니까??

특히 message보내는 부분이 영 잘 안됩니다...
고수님들의 조언 부탁드립니다...
2  COMMENTS
  • Profile
    최용일 2004.02.29 02:08
    안녕하세요. 최용일입니다.

    씨나 델파이나 문법이 별로 차이가 안나는데...

    EncodeD는 사용자 정의 함수 같던데... 이것두 델파이로 변경해야겠죠...

    procedure SetRecover;
    var
        StrData: array[0..1] of Char;
        cds: COPYDATASTRUCT;
        pWnd: THandle;
    begin
        StrData := 'BA';

        cds.dwData := 0;
        cds.cbData := strlen(strData);
        cds.lpData := EncodeD(strData);

        FindWindow(nil, '찾을 프로그램');

        if (pWnd <> 0) then
            SendMessage(pWnd, WM_COPYDATA, 0, LPARAM(@cds));
    end;

    ^^ 항상 즐코하세요...


  • Profile
    박성훈 2004.02.28 23:48


    안녕하세요?
    어플간에 메세지 보내기는 강좌란이나 팁란에서 찾아보시면 예제가 있습니다.
    참고하시면 해결할 수 있을거 같습니다.