![]() |
AW: Bit-Schiebereien
Mit der Typisierung und der Länge kann man schon eine Factory aufbauen, die dann aus einem Stream entsprechende Instanzen erzeugt.
Das Grundproblem wird dadurch aber nicht gelöst. Wie wäre es mit so einer Lösung ![]() Würde ich in deinem Fall aber eher als Klasse aufbauen, das Prinzip ist aber gleich |
AW: Bit-Schiebereien
vergiß es, Sir Rufo hat da was viel besseres.
Gruß K-H |
AW: Bit-Schiebereien
Hallo Zusammen,
den Record habe ich noch nicht verstanden. In rawData in mein Paket. Wie habt ihr die Verarbeitung gedacht? Wie gesagt, eine Nutzinformation kann sich von einem Bit bis hin zu mehrere Bytes ausbreiten. Was ich habe ist immer nur der Index für Start und Ende einer Nurtinformation innerhalb eines Paketes in rawData. Ist die binäre Interpretation von rawData und dann einfach über den Index bequem zugreifen oder doch berechnen in welchem Byte der Anfang und das Ende der Nurtinformation steckt, die Bytes herausziehen, die Bits aus dem Anfang-Byte extrahieren, die Bytes mitten drin dazu packen, die Bits vom letzten Byte extrahieren und dazupacken. |
AW: Bit-Schiebereien
Zitat:
|
AW: Bit-Schiebereien
Zitat:
|
AW: Bit-Schiebereien
Zitat:
Delphi-Quellcode:
ist schlecht gewählt, denn mit einem Call wird der gesamte Wert ausgelesen.
GetBits
|
AW: Bit-Schiebereien
Nimm einfach einen Varianten Record... Da kopierst Du Dein Status Byte an die richtige Stelle und hast direkten Zugriff auf alle Bit-Kombinationen...
Mavarik [OT für alte Hasen] PS.: Boh... Warum lassen uns die Kiddies hier immer rum rätzeln, anstatt direkt mal die Struktur zu posten... So könnte man die meisten Fragen in einer Antwort beantworten... [/OT] |
AW: Bit-Schiebereien
Zitat:
Mavarik |
AW: Bit-Schiebereien
Zitat:
Der Wert muss aus den Bits (von links 0-basierend gezählt) 14-17 kommen. |
AW: Bit-Schiebereien
Zitat:
@Kostas Der Trick bei dem varianten Record ist, daß unter verschiedenen Namen, die gleichen Daten erreichbar sind. (OK ist nicht die reine Lehre)
Delphi-Quellcode:
Du kannst jetzt über meinwert.rawData[0] meinwert.Tuep und meinwert.Tip auf das erste Byte zugreifen, und es ist immer der selbe Wert.
TDataType = record
case integer of 0: (rawData: Array[0..59] of Byte); 1: (data1 : Array[0..29] of Word; 3: record Tuep:byte; Lang:byte; Wert1:longint;wert2:byte.....; 4: record Tip :byte; Long:byte; filler1:byte; wert11:word end; ) end; var meinwert:TDataType; Mit der Variante 4 hast Du Zugriff auf RawData[3] und RawData[4], Du mußt nur auf die ByteOrder aufpassen. (Ich kann's mir nicht merken) Gruß K-H |
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:06 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz