hi,
ich hab folgende Funktion geschrieben
Delphi-Quellcode:
function tfile.blockwrite(const buf; bytecount:integer):integer;
var
written:integer;
begin
showmessage('Towrite: '+inttostr(bytecount)+' Bufsize: '+inttostr(sizeof(buf)));
system.BlockWrite(executor,buf,bytecount,written);
showmessage('überstanden');
result:=written;
end;
wenn ich jetzt ein
byte
als buf übergebe, müsste sizeof(buf) ja eigentlich 1 sein
Im Message zeigt er mir aber 0 an. Das Message "überstanden" erscheint nicht, folglich muss der Fehler also im system.blockwrite auftreten. Is ja auch logisch, da BUF die Size of 0 hat...
Was mach ich da falsch?
