Forum: Software-Projekte der Mitglieder
by Blackheart,
13. Apr 2009
Wie man sagt, viele Köche verderben den Brei oder man kann es auch Verschlimmbessern. :thumb:
Forum: Software-Projekte der Mitglieder
by Blackheart,
13. Apr 2009
Hier hast du noch was zum grübeln, schnell mal zusammengetippt geht sicherlich auch einfacher.
Forum: Software-Projekte der Mitglieder
by Blackheart,
13. Apr 2009
Hab mir mal deinen Quelltext kurz angeschaut, wenn du das was immer wieder kommt in eigene Proceduren auslagerst kannst du dir 95 Prozent vom Quelltext sparen und die ganze Sache wird auch dadurch viel übersichtlicher.
Forum: Software-Projekte der Mitglieder
by Blackheart,
13. Apr 2009
Vieleicht solltest du das ganze noch durch Zufall regeln, es sind immer die selben Buttun richtig.
Sonst wird das schnell langweilig. :wink:
Forum: Software-Projekte der Mitglieder
by Blackheart,
13. Apr 2009
Du könntest auch der Einfachheit halber einen Message Dialog benutzen.
Nur so als Beispiel.
procedure TForm1.Button1Click(Sender: TObject);
begin
If MessageDlg('Du hast das Spiel verloren, möchtest du es neu Starten ?',
mtConfirmation, , 0) = mrYes
then
ShowMessage('Spiel neu gestartet !')
else
Close;
Forum: Software-Projekte der Mitglieder
by Blackheart,
13. Apr 2009
Probier es erst einmal allein, falls du es nicht schaffst stelle deinen Versuch mit dem entsprechenden Code und der eventuellen Fehlermeldung hier rein, ansonsten lernst du nicht viel wenn du nur fertigen Code in dein Programm übernimmst.
Forum: Software-Projekte der Mitglieder
by Blackheart,
12. Apr 2009
Soweit ich weiss unterstütz der normale Button das nicht, am besten du nimmst den BitBtn.