Glücksrad

[wolle90]

Ich bin gerade dabei ein Glücksrad Programm zu schreiben hab aber ein problem mit dem vergleichen .
Hie muss der fehler irgendwo drin sein

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
sp:string;
begin

for i:=1 to length(Wort[1]) do
begin
if Wort[1][i]=Edit2.Text[i] then
begin
Platzhalter[i]:=Edit2.Text[1];
WortE.Text:=platzhalter;
end
else
Platzhalter:='_';
WortE.Text:=platzhalter;

end;
end;

[Dust Signs]

Um das else gehört ein begin/end - oder du lässt es oben im if-Teil weg und schreibst es einfach nur unten hin.

Dust Signs