Помогите найти ошибку..в программе..учебник Delphi для начинающих

[LightofMagic]

Доброго всем времени суток.Уважаемые профессионалы и все кто интересуется Delphi в серьёз. Проблема следующая..написал программу, а она не работает..ссылается на ошибку.Не пойму в чем причина, помогите найти...Текст ошибки:label4.Caption:='Дистанция:' +Edit1/Text+#13+'Время:'+IntToStr(min)..
на это он пишет.следующие ошибки..:
Unit1.pas(53):Incompatible types:'String' and 'Tedit'
Unit1.pas(55):Operator not applicable to this operand type
Unit1.pas(21):Unsatisfied forward or external declaration : 'TForm.Edit1Edit'
Unit1.pas(22):Unsatisfied forward or external declaration : 'TForm.Edit2Edit'
[Fatal Error]Project2.dpr(5):Could not compile used unit 'Unit1/pas'.
Сам текст программы...:

procedure TForm1.ButtonlClick(Sender: TObject);
var
dist : integer; // дистанция, метров
t: real; // время как дробное число
min : integer; // время, минуты 
sek : integer; // время, секунды
v: real; // скорость
begin
// получить исходные данные из полей ввода 
dist := StrToint(Edit1.Text); t := StrToFloat(Edit2.Text);
// предварительные преобразования
min := Trunc(t); // кол-во минут — это целая часть числа t
sek := Trunc(t*100) mod 100; 
// кол-во секунд — это дробная часть
// числа t
// вычисление
v := (dist/1000) / ((min*60 + sek)/3600);
// вывод результата
label4.Caption := 'Дистанция: '+ Edit1.Text 
+ ' м' + #13 + 'Время: ' + IntToStr(min) 
+ ' мин ' + IntToStr(sek) + ' сек ' + #13 +
'Скорость: ' + FloatToStrF(v,ffFixed,4,2) + ' км/час';

----------------------------------------------------------------
Подскажите пожалуйста, в чем может быть причина ошибки..
Заранее благодарю.за советы

Значок # видите? Он служит для правильного оформления кода.
Не будете его использовать - тема будет методично удаляться...

[Манжосов Денис :)]

Unit1.pas(21):Unsatisfied forward or external declaration : 'TForm.Edit1Edit'
Unit1.pas(22):Unsatisfied forward or external declaration : 'TForm.Edit2Edit'

Эти две процедуры объявлены только, но в самой программе их нет.

Incompatible types:'String' and 'Tedit'

Несовместимые типы: Строка и TEdit.

[Joe_Tribbiani]

Хм... прочитал код, по-моему всё правильно, попробуй заново создать проект...

[mihali4]

Сообщение от Joe_Tribbiani

Хм... прочитал код, по-моему всё правильно, попробуй заново создать проект...

В высшей степени оригинально...
И это тоже правильный код - Edit1/Text ?

[Joe_Tribbiani]

В высшей степени оригинально...
И это тоже правильный код - Edit1/Text ?

)) Но в тексте программы такого нету!)

[mihali4]

Это я не придумал:

...Не пойму в чем причина, помогите найти...Текст ошибки:label4.Caption:='Дистанция:' +Edit1/Text+#13+'Время:'+IntToStr(min)..
на это он пишет.следующие ошибки..:

И попробуй догадайся, с точкой или с косой автор написал в тексте программы...
А вот то, что автор привел как procedure TForm1.ButtonlClick(Sender: TObject); отрабатывает на ура. И где он там еще "навалял", непонятно.
Как и то, где там у него Edit1Edit и Edit2Edit...

[DomiNick]

LightofMagic, давай программу целиком...
То, что ты написал в сообщении - без ошибок...