Fehler in GetData oder bei mir?

[Mavarik]

Hallo Zusammen...

Nach einer Nachtschicht verzweifel ich...

Ich hole aus einer SQL Datenbank Binary Daten...

Einmal: so funktioniert es nicht:

Delphi-Quellcode:

var
  Puffer : array[0..50] of byte; // es werden eigentlich nur 6 Byte benötigt

begin
// bla bla
  MyBase.Fields[0].GetData(@Puffer); // im SQL Serverr steht $65,$80,$00,$00,$02
//  Im Puffer kommen nur $65,$80,$0 an

// bal bal
end;

So Funktioniert es...

Delphi-Quellcode:

var
  MyBuffer : Pointer;
begin
// bla bla
  myBuffer := GetMemory(Fields[0].DataSize); // Datasize = 6;
  Fields[0].GetData(MyBuffer);
  Move(MyBuffer^,Puffer[0],5);
// Im Puffer steht  $65,$80,$00,$00,$02
  Freemem(MyBuffer,Field[0].,DataSize);
end;

Wo ist der Trick?

Mavarik

[rollstuhlfahrer]

mach mal MyBase.Fields[0].GetData(@Puffer[0]);

Bernhard