|
(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.114 Beiträge
Delphi 11 Alexandria
|
14. Jun 2003, 21:07
Moin Hanswurst,
Beispiel:
Delphi-Quellcode:
var
fsIN : TFileStream;
sBuffer : string;
begin
fsIN := TFileStream.Create('c:\pfad\datei.bmp',fmOpenRead);
try
sBuffer := StringOfChar(#00,fsIN.Size);
fsIN.Read(sBuffer[1],fsIN.Size);
finally
FreeAndNil(fsIN);
end;
// Mach was mit der in sBuffer eingelesenen Datei
end;
Falls der Compiler meckert: Ich hab's hier schnell reingehackt.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|