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:
Code: Alles auswählen
procedure TForm1.Button1Click(Sender: TObject);
var Lauf: Integer;
begin
Original:= edit1.text;
Lauf:=0;
Laenge:= Length(edit1.text);
Repeat
BOriginal:=Buchstabe1+Buchstabe2;
Lauf+1; //<- Da kommt beim kompilieren immer Illelgal Expression.
until Lauf > Laenge;
edit3.text:=BOriginal;
end;

Bis dann , Korni