OPC mit Kassl-Komponenten unter Windows 10 und tRichedit

[dravigi]

Hallo zusammen,

wir stellen aktuell unsere PCs von Windows 7 auf Windows 10 um.

Bei den Rechnern die mittels der Kassl-OPC-Komponenten auf eine SPS zugreifen, gibt es ein für uns nicht erklärbares Phänomen/Problem.

Sobald irgendwo im Projekt, auch in Bibliothek-Units, ein tRichedit eingebunden ist, kann keine Verbindung mehr zum OPC hergestellt werden.

Entfernt man das tRichedit funktioniert wieder alles wunderbar. (Getestet unter Delphi 2010 und Delphi 10.2 Tokyo).

Unter Windows-7 gibt es dieses Problem nicht.

Kann hier jemand weiter helfen, oder hat jemand ähnliche Probleme.

Grüße

Code:

var
  lclOPCGroup: TdOPCGroup;
  lclComputerName, lclServerName: string;
begin
  try
    dOPCCom.dOPCInitSecurity;
    dOPCServer := TdOPCServer.Create(self);
    lclComputerName := 'Computer.xyz'
    lclServerName :=   'Server.xyz'
    dOPCServer.ComputerName := lclComputerName;
    dOPCServer.ServerName :=   lclServerName;
    dOPCServer.OnDatachange := DoOPCServerDatachange;
    dOPCServer.Active := True;
    lclOPCGroup := dOPCServer.OPCGroups.Add('X');
    lclOPCGroup.UpdateRate := 20;
    Sleep(200);
  except
    on E: Exception do
    begin
      ShowMessage(E.Message);
    end;
  end;
end;