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

[-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]

Было так:нажимаю run,высвечивалась кнопка,нажимал кнопку,создавался файл,проект не заканчивался

А ты что-то сделал для того чтобы он "закончился ?" Делай так например :

procedure TForm1.Button1Click(Sender: TObject);
var
  F: TextFile;
  n: Integer;
begin
  AssignFile(F, 'C:\f.txt');
  Rewrite(F);
  for n := 1 to 100 do
   writeln(F, n);
  CloseFile(F);
  Application.Terminate; // завершаем работу приложение или можно Form1.Close;
end;

И числа лучьше записывать в файл - одно число на одной строке.