Neuer type in (Data.)DB.pas

[Mavarik]

Hallo Zusammen!

Es haben sich seit Unicode ja die Type in der (Data.)DB geändert.
Früher wurden die Buffer ja als PChar gespeichert.
Jetzt jedoch als TRecordBuffer = PByte;

Daher meine Frage:

"Normalerweise" hat mal

Delphi-Quellcode:

var
   Buffer : PChar;
begin
  Buffer := StrAlloc(Datensatzlaenge);
  // bla bla bla
  StrDispose(Buffer);
end;

Mal abgesehen davon, das StrAlloc veraltet ist und das

Warnung: Wandeln Sie den Typ von Nicht-Zeichen-Zeigertypen nicht in PAnsiChar für die Zeigerarithmetik um. Verwenden Sie stattdessen den Zeigertyp PByte, der mit der Compiler-Direktive {$POINTERMATH ON} deklariert wird.

Wie reserviere ich Speicher für ein PByte und gebe Ihn wieder frei? Getmem? Leider fehlt dann beim Free die Länge?

Grüsse Mavarik

PS.: Ich verzweifel noch an der Unicodeumstellung!

[DeddyH]

Ich habe zwar noch nichts mit PByte zu tun gehabt, aber ich denke, mit GetMem/FreeMem bzw. GetMemory/FreeMemory sollte das zu machen sein.

[Mavarik]

Zitat von DeddyH:

Ich habe zwar noch nichts mit PByte zu tun gehabt, aber ich denke, mit GetMem/FreeMem bzw. GetMemory/FreeMemory sollte das zu machen sein.

Klar aber für den Free fehlt mir dann die Größe!

Bei PChar ist das ja am offset-4 gespeichert... bei PByte dann mit Getmem aber nicht...

Mavaik

[Bummi]

AllocMem und FreeMem

eine Beispielimplementierung findest Du in ADODB

Delphi-Quellcode:

>> TCustomADODataSet.AllocRecordBuffer
>> TCustomADODataSet.FreeRecordBuffer

[himitsu]

Zitat:

Klar aber für den Free fehlt mir dann die Größe!

Da kannst du auch einfach 0 angeben ... es wird ja sowieso der ganze Block freigegeben, egal wie groß.

Du könntest auch TBytes verwenden (mit SetLength den Speicher reservieren) und als @MyBuffer[Low(MyBuffer)] , bzw. @MyBuffer[0] oder PByte(MyBuffer) übergeben.
(dynamische Arrays sind ja auch "nur" Pointer)
Oder direkt dataset.FieldByName('field').AsBytes (TField.AsBytes).



Das Problem war ja, daß PChar total falsch gewählt wurde und bevor man dieses auf PAnsiChar umstellte, entschied man sich dann aber doch für das richtigere PByte.

[DeddyH]

Und ein Blick in die Hilfe wirkt manchmal Wunder. Der Size-Parameter beim FreeMem ist optional, bei FreeMemory gibt es den erst gar nicht