Einzelnen Beitrag anzeigen

Benutzerbild von RWarnecke
RWarnecke

Registriert seit: 31. Dez 2004
Ort: Stuttgart
4.408 Beiträge
 
Delphi XE8 Enterprise
 
#1

CreateEvent in einer Klasse

  Alt 11. Nov 2009, 09:10
Hallo zusammen,

ich habe folgendermassen eine Klasse aufgebaut :
Delphi-Quellcode:
  TTest = class(TObject)
  private
    procedure Test(Test:string);
  public
    { Public Deklaration }
  end;

procedure TTest.Test(Test:string);
var
  hScanCompleteEvent : THandle;
begin
  hScanCompleteEvent := CreateEvent(nil, False, False, nil);

  {...}

  WaitForSingleObject(hScanCompleteEvent, INFINITE);
end;
Wenn ich jetzt diese Procedure über ein Property aufrufe, bekomme ich eine EAccessViolation bei WaitForSingleObject. Kann ich keinen CreateEvent innerhalb einer Klasse benutzen oder mache ich etwas Falsch ?
Rolf Warnecke
App4Mission
  Mit Zitat antworten Zitat