Forum: Sonstige Fragen zu Delphi
Delphi
by Astat,
1. Mär 2010
Hallo sx2008, ja, bin da natürlich auch Deiner Meinung, hab wohl einen schlechten Tag erwischt, auch sorry.
:thumb: :cheers:
lg. Astat
Forum: Sonstige Fragen zu Delphi
Delphi
by Astat,
28. Feb 2010
Hier wird aber Speicher in der einfachen Grösse der Datei verwendet.
Man sollte die Funktion schnell entsorgen bevor sie im Internet immer weiter kopiert wird.
Hier der Ersatz:
function FileToMap(const AFileName: AnsiString; out cbSize, dwError: DWORD): pointer;
var
hFile, hMap: DWORD;
begin
Forum: Sonstige Fragen zu Delphi
Delphi
by Astat,
28. Feb 2010
Hallo n3r0f0x.
function ReadFile(const FileName: String): AnsiString;
var
ms: TMemoryStream;
begin
ms := TMemoryStream.Create;
ms.LoadFromFile(FileName);