AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Bit-Schiebereien

Ein Thema von Kostas · begonnen am 8. Mai 2014 · letzter Beitrag vom 13. Mai 2014
 
Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#32

AW: Bit-Schiebereien

  Alt 9. Mai 2014, 12:31
OK, trotzdem Rekord Index durch Compiler ist immer noch schneller als ne Property
Dann nagelst Du die "richtige" Struktur darunter und Du bist fein raus. Immer noch besser als aus 60Bytes einen String mit Nullen und Einsen zu machen, und dann womöglich noch die Indexierung durcheinander zu werfen.

@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:
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;
Du kannst jetzt über meinwert.rawData[0] meinwert.Tuep und meinwert.Tip auf das erste Byte zugreifen, und es ist immer der selbe Wert.
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
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:44 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-2025 by Thomas Breitkreuz