TIdSync 익명 함수 사용

Question

이 answer을 기반으로 내 스레드를 주 스레드와 동기화 할 수 있습니다. 그리고 덕분에 answer 나는 매개 변수도 전달할 수 있습니다. 그러나 문제는 매개 변수가 다르기 (카운트 또는 유형) 때문에 여러 프로 시저에 대해 여러 클래스를 선언해야한다는 것입니다.

Q : 익명 함수를 TIdSync (또는 다른 솔루션)와 함께 사용할 수 있으므로 다양한 절차에 대해 여러 클래스를 정의 할 필요가 없습니까? TThread.Synchronize() 및 TThread.Queue() 자신 익명 절차를 지원하기 때문에 중복 것 같은

Answer 1

TIdSync 및 TIdNotify는 익명의 절차/기능을 지원하지 않습니다 (그리고 그들은 당신이 비 RTL 작업 할 때하는 TThread 객체를 필요로하지 않는 정적 과부하가 스레드). 예를 들어 :

procedure TMyThread.Execute; 
begin 
    ... 
    Synchronize(
    procedure 
    begin 
     SomeFunction(Param1, Param2, Param2); 
    end 
    ... 
    Queue(
    procedure 
    begin 
     SomeFunction(Param1, Param2, Param2); 
    end 
); 
    ... 
end; 

// CreateThread() procedure 
function MyThreadProc(pv: Pointer): DWORD; stdcall; 
begin 
    ... 
    TThread.Synchronize(nil, 
    procedure 
    begin 
     SomeFunction(Param1, Param2, Param2); 
    end 
); 
    ... 
    TThread.Queue(nil, 
    procedure 
    begin 
     SomeFunction(Param1, Param2, Param2); 
    end 
); 
    ... 
    Result := 0; 
end; 

TIdSync는 TThread.Queue() 단지 래퍼입니다 TThread.Synchronize() 및 TIdNotify 단지 래퍼입니다. 모든 TThread을 사용할 수 있었던시기에 비 익명의 비 익명의 Synchronize() 메서드가 도입되었습니다. TThread에 정적 메서드 및 익명 프로 시저가 도입되어 이제는 TIdSync 및 TIdNotify이 수행하도록 설계된 모든 작업이 수행되어 관련성이 낮아집니다 (물론 여전히 작동합니다).