Delphi-Quellcode:
procedure TfPlayerChoice.btnReadyClick(Sender: TObject);
var Eingabe : string;
begin
Eingabe := edtEingabe.Text;
if Eingabe = '' then
ShowMessage('Bitte geben sie einen Namen ein.')
else
if fMain.AvatarNumber = 0 then
ShowMessage('Bitte suchen sie einen Avatar aus.')
else
begin
case fMain.actualPlayerSetting of
1:fMain.aPlayer1.ImageIndex := fMain.AvatarNumber;
fMain.aPlayer1.Caption := Eingabe;
end;
end;
end;
ist nich ganz das Thema der Topic, gehört aber zu meinem Projekt.
fMain.aPlayer1.Caption := Eingabe;
hier sagt er mir "konstantenausdruck erwartet" was stimmt da nicht?