Einzelnen Beitrag anzeigen

Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.429 Beiträge
 
Delphi 10.4 Sydney
 
#12

AW: problem mit DLL und threads

  Alt 10. Aug 2012, 08:35
Zumindest kann man dafür sorgen, daß die DLL-Funktion nur von einem Thread zur selben Zeit benutzt wird:
Delphi-Quellcode:
type
  TSensorThread = class(TThread)
  private
    class var
      FSection: TCriticalSection;
  protected
    class function GetValues(AID: Integer{;...}): {...};
    {...}
  end;

implementation

class function TSensorThread.GetValues(AID: Integer; {...}): {...};
begin
  FSection.Enter;
  try
    Result := s_getvalues(AID, {...}); //DLL Funktion
  finally
    FSection.Leave;
  end;
end;

initialization
  TSensorThread.FSection := TCriticalSection.Create;

finalization
  TSensorThread.FSection.Free;

end.
  Mit Zitat antworten Zitat