Hallo!
Ich würde nun gerne auch einmal ein kleines Spiel schreiben. Dafür möchte ich die Möglichkeit haben, dass man verschiedene Figuren / Schiffe auswählen kann.
Diese Auswahl möchte ich gerne über eine ComboBox treffen lassen. Nun habe ich bereits folgenden Code im OnSelect der ComboBox stehen:
Delphi-Quellcode:
procedure TMainForm.ChangeShip(Sender: TObject);
begin
case CBxYourPlayer.ItemIndex of
-1 : ShipImage.Picture.LoadFromFile(ExtractFilePath(paramstr(0))+'\ships\blue.ico');
end;
end;
Leider wird das Icon nicht ins Image geladen. Wo liegt/liegen mein(e) Fehler???
MfG Florian