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
