Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#4

Re: Dateien,vor allem Bilder lassen sich nicht komplett ausl

  Alt 8. Mai 2005, 16:58
Versuchs doch einfach mit "TFileStream"
Delphi-Quellcode:
var LStream1, LStream2: TStream;
begin
  LStream1 := TFileStream.Create('c:\elle1.jpg', fmOpenRead);
  LStream2 := TFileStream.Create('c:\elle2.jpg', fmCreate);
  LStream2.CopyFrom(LStream1, LStream1.Size);
  //Jetzt noch bischen in LStream2 rumändern
  LStream2.Free;
  LStream1.Free;
end;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat