Thema: Delphi Bitmap und Stream

Einzelnen Beitrag anzeigen

Benutzerbild von Dani
Dani

Registriert seit: 19. Jan 2003
732 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: Bitmap und Stream

  Alt 1. Feb 2008, 02:07
Gehts so?

Delphi-Quellcode:
procedure TDPerson.SaveToFileStream(S: TFileStream; W: TWriter);
begin
  W.WriteString(Name);
  W.WriteString(Ort);
  W.FlushBuffer;
  Bitmap.SaveToStream(S);
end;
Dani H.
At Least I Can Say I Tried
  Mit Zitat antworten Zitat