C# 코드를 Delphi로 변환하면 SafeWaitHandle과 동일한 기능을 수행 할 수 있습니까?

Question

C# 프로젝트를 Delphi로 변환하려고하는데 C# 코드 자체가 네이티브 dll에서 함수를 가져 오는 중입니다. 'dmp.dll'에 네이티브 함수의 서명이 없으므로 이름을 지정해야합니다. 이러한 함수는 C#에서 가져 와서 Delphi 코드에서 가져 오려고합니다. 많은 함수를 가져 오지만 제대로 작동하지만 이제는이 함수 (StartLogging)로 고민하고 있습니다. 이것은 그들이 C#으로 수입하는 방법입니다

는

[DllImport("dmp.dll", CharSet = CharSet.Auto, EntryPoint = "StartLogging")] 
public static extern int StartLogging(String AdapterName, 
    PLOG_RECORD_CALLBACK LogRecordCallback, 
    SafeWaitHandle StopLoggingEvent); 

클래스이 매개 변수 SafeWaitHandle에 문제에 대한 PLOG_RECORD_CALLBACK하지만, 문제는이 Microsoft.Win32.SafeHandles 네임 스페이스에 존재하지 않습니다. 델파이로 어떻게 이식 할 수 있습니까? Delphi에서 이에 상응하는 데이터 유형은 무엇입니까?

AutoResetEvent StopEvent = new AutoResetEvent(false); 

클래스 AutoResetEvent는 그런 다음 그들은이 같은 메서드를 호출 System.Threading에 존재 : 마지막에 그런

StartLogging(comboBox1.Text, CallbackProcedure, StopEvent.SafeWaitHandle); 

여기

그리고 그들이 C# 코드에서 사용하는 방법입니다 로깅을 중지하려면 다음을 사용하십시오.

StopEvent.Set(); 

정말 혼란스럽고 이것을하는 법을 모르겠습니다. 당신의 도움에 감사드립니다. 감사합니다.

Answer 1

SyncObjsTEvent을 사용할 수 있습니다. 인수가 False 인 ManualReset 인수를 사용하여 만들면 거의 동일한 방식으로 작동합니다. Event.Handle (THandle이며 API를 기대하는 API와 호환 가능)을 전달하십시오.

수동 리셋이 아닌 이벤트를 사용하는 샘플이 없지만 TEvent을 만드는 예는 수락 된 응답 here에서 찾을 수 있습니다. 수동으로 재설정하지 않으려면 (IOW, AutoReset) 두 번째 매개 변수를 False으로 변경하십시오.

Answer 2

Like David Hefferman이 승인 된 답변에 대한 응답으로 TSimpleEvent (System.SyncObjs)는 C#의 AutoResetEvent와 동일한 방식으로 작동합니다. 당신은 수동 리셋을 사용하는 경우

_WaitEvent := TSimpleEvent.Create(nil, resetmanual {boolean}, false, '', false); 
_WaitEvent.SetEvent; 
_WaitEvent.WaitFor; 

, 그냥 간단하게 사용합니다 :

는 그것은처럼 사용할 수 있습니다 _WaitEvent.ResetEvent을;