Eigentlich sollte es ja uber UDP gehen aber da komme ich auch nicht weiter.
Hier mal Tekst aus der Protocol Beschreibung.
Wenn gestartet, lauscht das Gateway auf dem Ethernet Empfangsport 15731. Es verwirft alle UDP-Pakete,
die eine Länge ungleich 13 haben. Pakete der Länge 13 werden als Can-Bus-Pakete interpretiert: 4 Byte
Can-Bus-Id (BigEndian oder Network-Order), 1 Byte Länge und 8 Byte Daten, die ggf. mit Nullbytes
aufzufüllen sind. Dieses Paket wird dann als Can-Bus-Botschaft auf den Can-Bus gegeben. Nicht
abzubildende Bits oder Bytes auf dem CAN-Bus werden nicht beachtet und sollten auf "0" gesetzt werden.
Umgekehrt liest das Gateway alle Can-Bus-Botschaften, wandelt sie in analoger Weise in UDP-Pakete der
Länge 13 um und verschickt diese an die spezifizierte
IP-Adresse und den Sendeport (15730).
Ich musste auf dem Port 15731 Senden aber empfangen auf dem Port 15730.
Wenn ich die 13 Bytes so verpacke und dan über
TCP verschicke kommen sie an und die Zentrale reagiert auch.
Ich bekomme nur immer 0 Byte zuruck.
Ich hole die Antwort mit
procedure TForm1.CS2ClientSocketSendRead(Sender: TObject; Socket: TCustomWinSocket);
und bearbeite dan Socket.ReceiveText