Deutsches Lazarusforum

Hallo Forumgemeinde,
wir arbeiten gerade in der SChule mit Delphi und daraufhin habe ich für zuhause lazarus entdeckt.
Ich bin gerade beim ersten Projekt und folgendes Funktion nicht:
procedure TForm1.Button1Click(Sender: TObject);
var Lauf: Integer;
begin
Original:= edit1.text;
Lauf:=0;
Laenge ...