Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi problem mit DLL und threads (https://www.delphipraxis.net/169757-problem-mit-dll-und-threads.html)

Furtbichler 10. Aug 2012 08:05

AW: problem mit DLL und threads
 
ich wollte nur einwerfen, das Delphi/Windows keine SPS ist und es denkbar wäre, das das Problem mit dieser DLL so nicht in den Griff zu bekommen ist.

Wenn die DLL mehrere Sensoren unterstützt, dann sollte sie eine Funktion à la 'S_GetAllValues(IDArray, ValArray)' besitzen, bei der man mit einem Aufruf den Status mehrerer Sensoren abfragen kann. Denkbar wäre es auch, das die DLL einfach ein Bitmuster, z.B. als 16/32/64bit Wert liefert.

Blup 10. Aug 2012 08:35

AW: problem mit DLL und threads
 
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.

Iwo Asnet 10. Aug 2012 11:29

AW: problem mit DLL und threads
 
Lieber in eine eigene TSensorReader-Klasse auslagern und dort ggfs. threadsicher agieren.
Statische Klassen sind doch nur verkleidete Globale Dinger, und die wollen wir doch nicht.

Es ist besser, jedem Thread eine Instanz der TSensorReader-Klasse zu spendieren. Die Instanzen der TSensorReader-Klasse kümmern sich dann darum, ob und wie auf die DLL seriell oder parallel zugegriffen wird. Dem Thread sollte das egal sein.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:03 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz