귀하는 손님 이십니다
로그인
회원가입
  
  델마당 공식 은행계좌
  하나은행 227-910235-83607
  예금주 이상국(운영진)
프로젝트 게시판
투표게시판
델마당소개
기초부터 활용까지! 델파이 교육 - 데브기어
질문과 답변 질문과 답변 입니다.
글내용 - 질문과 답변
 [질문] 신규 Component 개발 시 Message 처리 문제입니다.
킹초보
(석만근)
2020-10-07 오후 3:01:53
178회 조회


등록된 파일이 없습니다.

1. 개발/실행 플랫폼

(1) OS : Win10

(2) 개발툴 : delphi 10.4

(3) 사용 Database :

2. 개발 중인 프로그램 Component 개발 (Thread를 이용한 rest 통신)

3. 질문 내용

 

안녕하세요~ ^^

Rest통신을 하는 Component를 개발중입니다. 멀티쓰레드를 이용해 쿼리를 던지고 결과를 받으려고 합니다.

쓰레드 실행 완료 시 PostMessage(FResultTo, UM_WORKERDONE, self.Handle, 0); 를 이용해서 쓰레드가 끝났다는걸

인지해서 처리하려고 하는데요

일반 Form에서 아주 잘 됩니다만 콤포넌트화해서 하려니 

procedure HandleThreadResult(var Message: TUMWorkerDone); message UM_WORKERDONE;

이 프로시저가 동작을 안합니다. ㅠㅠ

    TAgent_Thread = class(TComponent)
    private
        FQuery_Record: TQuery_Record;
        FRunning: Boolean;
        FThreads: array of TFThread;
        FOwner: Tform;

    protected
        constructor create(Owner: TComponent); override;
        procedure HandleThreadResult(var Message: TUMWorkerDone); message UM_WORKERDONE;
    public
        Execute_Count: Integer;

        property Result: TQuery_Record read FQuery_Record;
        procedure AddQuery(_Type: TQuerytype; _Query: string);
        procedure svc;
    end;

이렇게 선언되어 있거든요

혹시 Component에서는 전혀 Message 처리가 되지 않을까요??

되면 관련 웹페이지 소개좀 부탁드려도 될까요?