Помогите исправить

[Virus']

Помогите пожалуйста исправить прогу в Delphi. На Delphi не рублю как там и че почем, ток немного на Pascal. Сам немног пытался но чет неполучается. Нужно сделать пару кнопочек и нормальное окошко. У меня в одной проге заделано 3.
Вот код:

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils,
Unit1 in 'Unit1.pas' {Form1};

var f:text;
i,t:Integer;
x,z:string;
a:array [1..10,1..2] of string;
begin
//1
Randomize;
AssignFile(f,'random1.dat');
Rewrite(f);
for i:=1 to 50 do
begin
t:=random(200);
writeln(t);
Writeln(f,t);
end;
CloseFile(f);
//2
//запрос фамилии учащегося и его нонера
for i:=1 to 10 do
begin
readln(a[i,1]);
readln(a[i,2])
end;
//запрос фамилии для поиска
readln(x);
//поиск
for i:=1 to 10 do
if a[i,1]=x then
Write(a[i,2]);
//3
readln(x);
Readln(z);
for i:=1 to length(z) do
begin
t:=pos(z[i],x);
while t>0 do
begin
Delete(x,t,1);
t:=pos(z[i],x);
end;
end;
writeln(x);
readln;
end.

[DeKot]

Эта директива

{$APPTYPE CONSOLE}

указывает, что открыто КОНСОЛЬНОЕ ПРИЛОЖЕНИЕ.Т.е. вся программа вводится и выводится в нижнем окошке в текстовом виде.Там нет окон, кнопок и прочих визуальных компонентов.
Нужно открыть приложение с формой:
Меню -> File -> New -> Application -> Enter
Теперь можно устанавливать кнопки и все такое.Без учебника не разберешься.Купи, скачай учебник и читай.Пользы будет больше, если есть желание научиться.

[Virus']

спасибо хоть на этом.

[DeKot]

Я понимаю, что Вам хотелось бы получить ответ в виде готовой программы.Но, поверте, это было бы не помощь. а наоборот только вред.
Всю рутинную работу делйте сами, а ошибки,верное направлени всегда форум поможет.