Zitat von
Orbmu2k:
ungetestet, sollte dir aber die grösse zurückgeben ...
DataModule1.ADOTable.CreateBlobStream(DataModule1.ADOTable.FieldByName('Bild'),bmRead).Size
Bin mir nicht sicher, aber hinterlässt das nicht ein hässliches Speicherleck, weil der erstellte Stream doch nicht freigegeben wird
Wenn dann wird ich es so machen:
Delphi-Quellcode:
with DataModule1.ADOTable.CreateBlobStream(DataModule1.ADOTable.FieldByName('Bild'),bmRead) do
begin
MySize:=Size;
Free;
end;