Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Uwe Raabe,
10. Apr 2022
Aber das ist doch genau das, wofür Kompressionsalgorithmen da sind. Welchen du da nimmst must du schon selbst entscheiden. Suchst du Bordmittel wirst du vielleicht in System.ZLib fündig.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Uwe Raabe,
6. Apr 2022
Diese Records sind ja nicht als Typ in einer Typdeklaration gedacht, sondern als Cast auf eine Variable mit Word-Größe. Insofern wäre ein Zugriff auf Word innerhalb WordRec (analog in den anderen records) irgendwie obsolet.
var
MyCharArray: array of WideChar;
begin
...
cntHighUnicode := 0;
for I := Low(MyCharArray) to High(MyCharArray) do
if WordRec(MyCharArray).Hi <> 0 then...