Problem mit Variable

[DevilsCamp]

Versuch es mal damit:

Delphi-Quellcode:

procedure TfrmMain.btSaveClick(Sender: TObject);
// Vor VAR kommt kein BEGIN
  var F: TextFile;

  begin
    AssignFile(F, 'test.txt');
    Rewrite(F);
    Writeln(F, editMain.Text);
    CloseFile(F);
  end;