Registriert seit: 8. Sep 2005
Ort: Friedrichshafen
41 Beiträge
Delphi 10 Seattle Enterprise
|
AW: TIdBytes, Variable deklariert als Word und versenden mit TCPIP
17. Sep 2015, 14:57
Moin, Moin,
Ich versende unter anderem Daten vom Typ Word in einem TBytes Array (Maschinensteuerung)
und zwar wie folgt :
Delphi-Quellcode:
In Bytes wandeln :
ADataArr[0] := Lo(myWordValue); // low Byte
ADataArr[1] := Hi(myWordValue); // high byte
und wieder in ein Word wandeln :
WordRec(myWordValue).Lo := ADataArr[0];
WordRec(myWordValue).Hi := ADataArr[1];
wobei ADataArr vom Typ TBytes ist.
auslesen vom Indy Server kannst Du wie folgt :
if not AContext.Connection.IOHandler.InputBufferIsEmpty then
begin
AContext.Connection.IOHandler.InputBuffer.ExtractToBytes( LRxBuffer);
end;
LRxBuffer ist auch vom Typ TBytes
Funktioniert in meinem fall perfekt !!
Beste Grüße
Michael
Michael Wissen ist Macht, nichts wissen macht auch nichts.
Geändert von jaevencooler (17. Sep 2015 um 15:07 Uhr)
Grund: schlicht was vergessen
|