Lazarus™
Level-2
- Beiträge
- 434
- Reaktionspunkte
- 52
-> Hier kostenlos registrieren
Hallo,
ich habe folgende Routine:
Mit der Ausgeklammerten Version (NLPro) geht es einwandfrei, aber mit der
S7Online Version nicht. Funktioniert das S7Online generell ???
Ich würde gerne das S7Online nehmen, damit das Tool dann allgemeingültig ist und immer zu verwenden, egal ob TCP/IP oder Adapter etc.
Wenn dieses problem gelöst ist, wird es bald ein DB-Backup :TOOL: hier zum Download geben, ich denke das kann man ab und an mal brauchen.
ich habe folgende Routine:
Code:
procedure TfrmMain.ConnectPlc;
begin
sbMain.Panels[0].Text := 'Verbindung wird hergestellt';
sbMain.Update;
DaveOsSerialType.RFD := {OpenSocket(7777, '10.90.0.243');} OpenS7Online('S7ONLINE', Self.Handle);
DaveOsSerialType.WFD := DaveOsSerialType.RFD;
if (DaveOsSerialType.RFD > 0) then begin
DaveInterface := DaveNewInterface(DaveOsSerialType, 'IF1', LocalMPI, {DaveProtoNlPro} DaveProtoS7Online, DaveSpeed187K);
DaveInterface^.Timeout := 20000;
if (DaveInitAdapter(DaveInterface) = 0) then begin
DaveConnection := DaveNewConnection(DaveInterface, PlcMPI, Rack, Slot);
if (DaveConnectPLC(DaveConnection) = 0) then begin
btnConnection.Caption := 'Von SPS trennen';
sbMain.Panels[0].Text := 'Verbindung hergestellt';
Connected := True;
end else
Disconnect;
end else
Disconnect;
end;
end;
Mit der Ausgeklammerten Version (NLPro) geht es einwandfrei, aber mit der
S7Online Version nicht. Funktioniert das S7Online generell ???
Ich würde gerne das S7Online nehmen, damit das Tool dann allgemeingültig ist und immer zu verwenden, egal ob TCP/IP oder Adapter etc.
Wenn dieses problem gelöst ist, wird es bald ein DB-Backup :TOOL: hier zum Download geben, ich denke das kann man ab und an mal brauchen.