Uiuiui, ich bekomms nicht hin. Ich habe nun eine Klasse von TFileStream abgeleitet und die read-methode vererbt. Dort steht bisher nur
Delphi-Quellcode:
function TSpecialFileStream.Read(var Buffer; Count: Integer): Longint;
begin
inherited read(buffer,count);
end;
weil ich das erstmal testen wollte.
Das löst eine Schutzverletzung aus. Was mach ich denn nun falsch?
Wenn ich die Methode nicht vererbe, also einfach nur ne leere Klasse von TFileStream ableite, funktioniert es.
btw: Nee alternative Lösung wäre mir natürlich auch lieb.