Курсовая работа: Создание программы-переводчика текстов с английского на русский язык

procedure N3Click (Sender: TObject);

procedure N5Click (Sender: TObject);

procedure FormCreate (Sender: TObject);

procedure N6Click (Sender: TObject);

procedure N7Click (Sender: TObject);

procedure Button1Click (Sender: TObject);

procedure registr;

procedure zamena;

procedure N9Click (Sender: TObject);

procedure N10Click (Sender: TObject);

procedure N11Click (Sender: TObject);

procedure N12Click (Sender: TObject);

procedure N13Click (Sender: TObject);

procedure N15Click (Sender: TObject);

procedure N16Click (Sender: TObject);

procedure Button2Click (Sender: TObject);

private

{Private declarations}

public

rus:string;

s1, s2, s3, a, st1:string;

i, j, k, g, l, h, t, n, p, dl, count:integer;

{Public declarations}

end;

var

Form1: TForm1;

EdFile:string; s1, s2, s3, a, st1, rus:string;

i, j, k, g, l, h, t, n, p, dl, count:integer;

implementation