Работа с текстовым файлом... Опции

[-Alex-]

Сейчас пытаюсь перейти с Pascal на Delphi,написал простенькую прогу для создания текстового файла и записи в него чисел,но что-то она не пашет

Код

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
  procedure Button1Click(sender:Tobject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var f:textfile;
n:integer;
begin
AssignFile(f,'c:\f.txt');
rewrite(f);
for n:=1 to 100 do write(f,n);
closefile(f);
end;
end.

[klem4]

Volvo ты не правильно меня понял я подумал, что автор хотел, чтобы после выполнения, окно программы закрывалось, по этому и предложил такой вариант, хотя это была моя догадка, делать этого конечно не стоило (гадать в смысле).