Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
25. Jul 2012
Nee da war noch result:=aa.wert; aber egal, auf jeden Fall ein Beispiel, das es viele Wege gibt.
Gruß
K-H
Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
25. Jul 2012
Dumme Frage
type
tLittRec=record
case integer of
2 : (aa: array of byte);
end;
Fehlt der Integer absichtlich?
(das absolute finde ich stark, oft eingesetzt aber nie so!)
Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
25. Jul 2012
Hallo und vielen Dank nochmal auch an Mr OR!
Ich habe alle Anregungen (sofern ich sie verstanden habe) einmal verwurstet und versucht sie an Hand eines Benchmarks zu beurteilen.
function Big2Little32c(ina:tpa4):integer;
var
dd : integer;
begin
dd:= ina^+
(ina^ shl 8)+
Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
23. Jul 2012
hast Du ein Beispiel?
Meiner Meinung nach komme ich um die Schieberei auf kenen Fall herum?
Gruß
K-H
Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
23. Jul 2012
Hallo zusammen,
ich muß BigEndian-Werte aus einer Datei auslesen und dann "normal" weiter verarbeiten.
Dafür nutze ich folgende Routine
type
ta4 = array of byte;
tpa4= ^ta4;
function Big2Little32(ina:tpa4):integer;