Delphi-Quellcode:
procedure TForm1.SpielSpeichern1Click(FileName: string);
begin
if savedialog1.Execute = true then
begin
verz := savedialog1.FileName;
try DateiSpeichern except dateiErstellen; DateiSpeichern; //Fehler
end;
end;
end;
Ich weiß nicht warum, im Grunde müsste es laufen aber dennoch zeigt er mir Fehler an.
[Error] StoffersUnit1.pas(229): Not enough actual parameters
[Error] StoffersUnit1.pas(229): Not enough actual parameters
Delphi-Quellcode:
procedure TForm1.DateiSpeichern(verz: String);
begin
AssignFile(datei, verz);
if FileExists(datei) then // Fehler
reset(datei)
else
rewrite(datei);
if IOResult = 0 then
write(datei,tw)
else raise
CloseFile(datei);
end;
[Error] StoffersUnit1.pas(249): Incompatible types: 'String' and 'Text'
Ich weiß ich bin jetzt ein wenig Nervig aber ich würde das gerne hin bekommen.