savedialog Datentyp

[Zeb22]

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.