Forum: Programmieren allgemein
by sniper_w,
27. Apr 2006
ich habe es inzwischen so gemacht: TByteArray = array of Byte;
function S_win_ReadFile(const FileName: string; var Data: Pointer): Cardinal;
var
FileHandle, BytesRead: Cardinal;
begin
FileHandle := CreateFile(PChar(FileName), GENERIC_READ, 0, nil,
OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
if FileHandle = INVALID_HANDLE_VALUE then
begin
Result := 0;
Forum: Programmieren allgemein
by sniper_w,
22. Apr 2006
Ich möchte eine Datei "auf einmal" einlesen. So in etwa:var FilePointer:Pointer;
begin
FilePointer := LoadFileAufEinmal( FileName:string );