Forum: Datenbanken
Delphi
by Sharky,
22. Sep 2004
Dann wirst Du mit 2 Streams arbeiten müssen:
Ungetestet:
procedure TForm1.Button2Click(Sender: TObject);
var
S: TStream;
S2 : TMemoryStream;
begin
S := TStream.create;
S2 := TMemoryStream.Create;
Forum: Datenbanken
Delphi
by Sharky,
22. Sep 2004
Und was ist wenn Du S gleich als TMemoryStream definierst?
var S: TMemoryStream;
begin
S := TMemoryStream.create;
try
S := Table1.CreateBlobStream(Table1.FieldByName('TEXTMODULE'), bmRead);
S.SaveToFile ();
finally
S.Free;
end;
Forum: Datenbanken
Delphi
by Sharky,
22. Sep 2004
Hai day,
kannst du nicht einfach s.SaveToFile () benutzen?