±ÍÇÏ´Â ¼Õ´Ô À̽ʴϴÙ
·Î±×ÀÎ
ȸ¿ø°¡ÀÔ
  
  µ¨¸¶´ç °ø½Ä ÀºÇà°èÁÂ
  ÇϳªÀºÇà 227-910235-83607
  ¿¹±ÝÁÖ ÀÌ»ó±¹(¿î¿µÁø)
ÇÁ·ÎÁ§Æ® °Ô½ÃÆÇ
ÅõÇ¥°Ô½ÃÆÇ
µ¨¸¶´ç¼Ò°³
±âÃʺÎÅÍ È°¿ë±îÁö! µ¨ÆÄÀÌ ±³À° - µ¥ºê±â¾î
Áú¹®°ú ´äº¯ Áú¹®°ú ´äº¯ ÀÔ´Ï´Ù.
±Û³»¿ë - Áú¹®°ú ´äº¯
 [Áú¹®] ½Å±Ô Component °³¹ß ½Ã Message Ã³¸® ¹®Á¦ÀÔ´Ï´Ù.
Å·Ãʺ¸
(¼®¸¸±Ù)
2020-10-07 ¿ÀÈÄ 3:01:53
4021ȸ Á¶È¸


µî·ÏµÈ ÆÄÀÏÀÌ ¾ø½À´Ï´Ù.

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 󸮰¡ µÇÁö ¾ÊÀ»±î¿ä??

µÇ¸é °ü·Ã À¥ÆäÀÌÁö ¼Ò°³Á» ºÎŹµå·Áµµ µÉ±î¿ä?