Q&A
- win32사용시 이벤트 정의 문제..
제가 지금 WIn32로 프로그램 하나를 개발중인데여..
한가지 난관에 걸려 있습니다.
예를 들면 Win32코드내에 TNMUDP객체를 가져다 쓰고 싶은데 물론 생성까지는 되지만
이런 부분이 걸리 거든여..
예전에 OnDataReceived 부분이 품객체에 일부분이면 가능 하덴데..
---객체를 이용한 코딩
type
TFmMain = class(TForm)
private
{ Private declarations }
public
procedure OnDataReceived(Sender: TComponent; NumberBytes: Integer; FromIP: String; Port: Integer);
end;
begin
aa := TNMUDP.Create(nil);
aa.OnDataReceived := OnDataReceived;
end;
이런 식으로 하면 아무런 문제가 없지만..
---Win32 코딩..
procedure OnDataReceived(Sender: TComponent; NumberBytes: Integer; FromIP: String; Port: Integer);
begin
//무언가 일일 한다.
end;
function WindowProc(Handle : HWND; AMessage, WParam, LParam : Longint) : Longint; Stdcall; Export;
begin
case AMessage of
WM_ACTIVATE: begin
aa := TNMUDP.Create(nil);
aa.OnDataReceived := OnDataReceived;
end;
WM_CREATE : begin
end;
WM_MOUSEMOVE : begin
end;
WM_LBUTTONDOWN : begin
end;
WM_LBUTTONUP : begin
end;
WM_CHAR : begin
case WParam of
27 : DestroyWindow(WinHandle);
end;
end;
WM_DESTROY : begin
UnInitDirectDraw;
PostQuitMessage(0);
end;
end;
WindowProc := DefWindowProc(Handle, AMessage, WParam, LParam);
end;
이런식으로 하면 형식이 틀리다는 메세지를 유발 합니다.
그러니깐 질문에 요지는 Win32코드내에
aa := TNMUDP.Create(nil);
aa.OnDataReceived := OnDataReceived;
식에 객체 생성과 그객체에 이벤트 연결이 불가능 하냐는 거죠..
아시는분 답변좀 주세여..
한가지 난관에 걸려 있습니다.
예를 들면 Win32코드내에 TNMUDP객체를 가져다 쓰고 싶은데 물론 생성까지는 되지만
이런 부분이 걸리 거든여..
예전에 OnDataReceived 부분이 품객체에 일부분이면 가능 하덴데..
---객체를 이용한 코딩
type
TFmMain = class(TForm)
private
{ Private declarations }
public
procedure OnDataReceived(Sender: TComponent; NumberBytes: Integer; FromIP: String; Port: Integer);
end;
begin
aa := TNMUDP.Create(nil);
aa.OnDataReceived := OnDataReceived;
end;
이런 식으로 하면 아무런 문제가 없지만..
---Win32 코딩..
procedure OnDataReceived(Sender: TComponent; NumberBytes: Integer; FromIP: String; Port: Integer);
begin
//무언가 일일 한다.
end;
function WindowProc(Handle : HWND; AMessage, WParam, LParam : Longint) : Longint; Stdcall; Export;
begin
case AMessage of
WM_ACTIVATE: begin
aa := TNMUDP.Create(nil);
aa.OnDataReceived := OnDataReceived;
end;
WM_CREATE : begin
end;
WM_MOUSEMOVE : begin
end;
WM_LBUTTONDOWN : begin
end;
WM_LBUTTONUP : begin
end;
WM_CHAR : begin
case WParam of
27 : DestroyWindow(WinHandle);
end;
end;
WM_DESTROY : begin
UnInitDirectDraw;
PostQuitMessage(0);
end;
end;
WindowProc := DefWindowProc(Handle, AMessage, WParam, LParam);
end;
이런식으로 하면 형식이 틀리다는 메세지를 유발 합니다.
그러니깐 질문에 요지는 Win32코드내에
aa := TNMUDP.Create(nil);
aa.OnDataReceived := OnDataReceived;
식에 객체 생성과 그객체에 이벤트 연결이 불가능 하냐는 거죠..
아시는분 답변좀 주세여..
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 베라미스
- •
- 2001.05.24 22:15
- 1 COMMENTS
- /
- 0 LIKES
-
베라미스•2001.05.24 23:26필드가 적용이 안 되는 게 아니라, 필드 크기가 문제였습니다. varchar2(280)으로 잡혀있거든요. 근데 ...
-
- 김정미
- 2001.05.24 22:12
- 0 COMMENTS
- /
- 0 LIKES
-
- 최진영
- •
- 2001.05.24 22:04
- 2 COMMENTS
- /
- 0 LIKES
-
델맨•2001.05.24 22:19최진영 wrote: > 안녕하세요. > > TBitmap을 이용하여 이미지를 자르는 작업을 하던 중 의문이 있어 질...
-
최진영•2001.05.24 22:56Rect는 지정이 되어 있습니다. 아래 이미지 콤포넌트로 이러한 작업을 하면 영역복사가 됩니다.
-
- 왕급
- 2001.05.24 21:22
- 0 COMMENTS
- /
- 0 LIKES
-
- 이상림
- 2001.05.24 20:21
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- 2001.05.24 20:17
- 0 COMMENTS
- /
- 0 LIKES
-
- blackjewel
- •
- 2001.05.24 20:11
- 1 COMMENTS
- /
- 0 LIKES
-
어설픈 델초•2001.05.24 22:37blackjewel wrote: > 안녕하세염? > > 맨날 질문만 올리네여...부끄럽게^^; > > 오늘은여....정말 ...
-
- 써니
- •
- 2001.05.24 19:31
- 3 COMMENTS
- /
- 0 LIKES
-
이경문•2001.05.24 20:56TControl에 Perform이라는 Method가 있으면 좋겠지요. 하지만 그런 Method는 없습니다. 편법으로 다음과 ...
-
써니•2001.05.24 23:57이경문 wrote: > TControl에 Perform이라는 Method가 있으면 좋겠지요. > 하지만 그런 Method는 없습니다...
-
블랙봉•2001.05.25 00:15써니 wrote: > 이경문 wrote: > > TControl에 Perform이라는 Method가 있으면 좋겠지요. > > 하지만 그...
-
- 왕초보
- 2001.05.24 19:22
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보King
- •
- 2001.05.24 17:35
- 1 COMMENTS
- /
- 0 LIKES
-
초보King•2001.05.24 17:41해결됐슴돠. ^^ 질문을 올리고 혹시나 싶어 검색을 다시 해 봤는데 비슷한게 나와서 DB connection 부분...
-
- 김수남
- •
- 2001.05.24 12:08
- 3 COMMENTS
- /
- 0 LIKES
-
구창민•2001.05.24 20:18김수남 wrote: > 스트링을 입력받아서 레지스트리에 이진값을 저장시키려고 하는데 어떻게 할지 몰라서 도...
-
김수남•2001.05.24 20:41네.... 감사합니다. 이진값 00 을 어떻게 저장하죠? 이진값00 을 스트링으로 표현가능한건가요...
-
왕초보•2001.05.24 19:38내가 사용한 예제입니다. 수정해서 쓰세요. 아참 uses에 registry를 추가시켜주세요. TessReg : TRe...
-
- 확실한 초보
- •
- 2001.05.24 12:08
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2001.05.24 20:14확실한 초보 wrote: > 안녕하세요!! > 먼저 읽어 주셔서 감사하구요 > 바둑판을 만들고져 하는데 네모 ...
-
- 이관우
- 2001.05.24 09:22
- 0 COMMENTS
- /
- 0 LIKES
-
- 김진호
- •
- 2001.05.24 08:19
- 1 COMMENTS
- /
- 0 LIKES
제가 지금 WIn32로 프로그램 하나를 개발중인데여.. 한가지 난관에 걸려 있습니다. 예를 들면 Win32코드내에 TNMUDP객체를 가져다 쓰고 싶은데 물론 생성까지는 되지만 이런 부분이 걸리 거든여.. 예전에 OnDataReceived 부분이 품객체에 ...-
델맨•2001.05.24 22:12김진호 wrote: > 제가 지금 WIn32로 프로그램 하나를 개발중인데여.. > 한가지 난관에 걸려 있습니다. >...
-
- 회색분자
- •
- 2001.05.24 08:02
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2001.05.24 10:44회색분자 wrote: > 리소스에 등록한 ICON을 어떻게 사용하죠 ? > TIcon에 리소스에서 읽어 오는것이 없는...
-
- 철
- •
- 2001.05.24 07:57
- 1 COMMENTS
- /
- 0 LIKES
-
이경문•2001.05.24 10:30ClientRead Event에서 처리했다고 하면 Thread와 관련된 문제는 아니고.... 소스를 봐야 할 것 같네요... ...
-
- 권대웅
- •
- 2001.05.24 07:21
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2001.05.24 10:48권대웅 wrote: > ^^; > 항상 도움만 청하는 군요... > > 파라독스에서 문자열 필드로 정의 된 > 필드...
-
- ksn00
- •
- 2001.05.24 06:12
- 1 COMMENTS
- /
- 0 LIKES
-
초초보..•2001.05.24 19:38ksn00 wrote: > odbc로 db를 연결하여 프로그램을 실행하면 실행전이나 실행후 db를 건드릴 경우 > 꼭 로...
-
- 오은미
- •
- 2001.05.24 05:46
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2001.05.24 10:39이 게시판에서 "종료시점"이란 단어로 검색을 해 보세요. 그리고 제 이름을 찾으시면 해결가능하실겁니...
-
감초•2001.05.24 06:20일반적으로 흔히 구할수 있는 DosExec 같은 델파이 컴포넌트에 옵션들을 사용하면 원하시는 결과를 얻을수 ...
-
- 살라딘
- •
- 2001.05.24 05:29
- 1 COMMENTS
- /
- 0 LIKES
-
김은미•2001.05.25 00:53살라딘 wrote: > DBGrid를 출력하는데 QReport로 출력을 했습니다. > 그런데 여기서 출력도 되고 다른것...
> 제가 지금 WIn32로 프로그램 하나를 개발중인데여..
> 한가지 난관에 걸려 있습니다.
>
> 예를 들면 Win32코드내에 TNMUDP객체를 가져다 쓰고 싶은데 물론 생성까지는 되지만
> 이런 부분이 걸리 거든여..
> 예전에 OnDataReceived 부분이 품객체에 일부분이면 가능 하덴데..
>
> ---객체를 이용한 코딩
> type
> TFmMain = class(TForm)
> private
> { Private declarations }
> public
> procedure OnDataReceived(Sender: TComponent; NumberBytes: Integer; FromIP: String; Port: Integer);
> end;
>
> begin
> aa := TNMUDP.Create(nil);
> aa.OnDataReceived := OnDataReceived;
> end;
>
> 이런 식으로 하면 아무런 문제가 없지만..
>
> ---Win32 코딩..
>
> procedure OnDataReceived(Sender: TComponent; NumberBytes: Integer; FromIP: String; Port: Integer);
> begin
> //무언가 일일 한다.
> end;
>
> function WindowProc(Handle : HWND; AMessage, WParam, LParam : Longint) : Longint; Stdcall; Export;
> begin
> case AMessage of
> WM_ACTIVATE: begin
> aa := TNMUDP.Create(nil);
> aa.OnDataReceived := OnDataReceived;
> end;
>
> WM_CREATE : begin
> end;
>
> WM_MOUSEMOVE : begin
> end;
>
> WM_LBUTTONDOWN : begin
> end;
>
> WM_LBUTTONUP : begin
> end;
>
> WM_CHAR : begin
> case WParam of
> 27 : DestroyWindow(WinHandle);
> end;
> end;
>
> WM_DESTROY : begin
> UnInitDirectDraw;
> PostQuitMessage(0);
> end;
> end;
>
> WindowProc := DefWindowProc(Handle, AMessage, WParam, LParam);
> end;
>
> 이런식으로 하면 형식이 틀리다는 메세지를 유발 합니다.
> 그러니깐 질문에 요지는 Win32코드내에
> aa := TNMUDP.Create(nil);
> aa.OnDataReceived := OnDataReceived;
>
> 식에 객체 생성과 그객체에 이벤트 연결이 불가능 하냐는 거죠..
>
> 아시는분 답변좀 주세여..
이문제는 Win32문제라기 보다는 일반 프로시져와 메소드의 차이로 발생하는 문제입니다.
메소드는 호출될때 다른 인자와 함께 Self를 전달하게 되는데 일반함수에서는 Self가
없기 때문에 형식이 다르다는 오류가 나오는것입니다. OnDataReceived의 형선언을
보시면 마지막에 of Object를 붙여 선언되어 있는데 이것이 메소드임을 의미하는것입니다.
TObject를 상속받은후 이벤트 메소드만을 작성하여 사용하시면 됩니다.