Forum: Object-Pascal / Delphi-Language
by AlexII,
28. Sep 2008
Ich verstehe aber nicht ganz was wird da vermischt?
Und in die StartGame Prozedur kommt dann dieses wie ich verstanden haben?
FiCountCorrect := 0;
FiCountError := 0;
FiCountQuestion := 0;
FiCountTries := 2;
NextQuestion;
Forum: Object-Pascal / Delphi-Language
by AlexII,
28. Sep 2008
Na wenn ich fertig bin, dann könnt ihr vllt ein Auge drüber werfen und gucken was sich besser machen lässt. :-D
Forum: Object-Pascal / Delphi-Language
by AlexII,
27. Sep 2008
Genau :thumb:
Und wie sieht es eleganter aus? :gruebel:
Forum: Object-Pascal / Delphi-Language
by AlexII,
27. Sep 2008
Ne wieso, Close; wird aufgerufen wenn man auf Nein klickt, das Spiel bzw. das Programm wird somit geschloßen. Wenn User auf Ja klickt gehts zu NextQuestion. :-D
Forum: Object-Pascal / Delphi-Language
by AlexII,
27. Sep 2008
Ok Jungs ich hab's anders gemacht und sehr sauber :thumb:
Hab folgendes geändert:
procedure TForm1.ShowResults;
begin
ShowMessage('Das Quiz ist vorbei.'#13#10'Richtig: '+IntToStr(FiCountCorrect)+#13#10'Falsch: '+IntToStr(FiCountError));
FiCountCorrect := 0;
FiCountError := 0;
Forum: Object-Pascal / Delphi-Language
by AlexII,
27. Sep 2008
Also schnell geht es nur mit nil? Hm... hab versucht, das Prog spinnt danach total...
Forum: Object-Pascal / Delphi-Language
by AlexII,
27. Sep 2008
Und wieso ist diese Lösung unsauber?
Darf ich dir vllt mein QuellCode zeigen und du machst das für mich sauber?
Hier der Code
implementation
Forum: Object-Pascal / Delphi-Language
by AlexII,
27. Sep 2008
Danke jfheins, hab aber nix verstanden :(
Kannst du vllt den Code schreiben?
Forum: Object-Pascal / Delphi-Language
by AlexII,
27. Sep 2008
Aber wo und wie soll ich diesen Typ da definieren?
Forum: Object-Pascal / Delphi-Language
by AlexII,
27. Sep 2008
Ich will in einer Procedur FormCreate(Sender); aufrufen, aber bekomme die Fehlermeldung -> undefinierter Bezeichner: 'Sender'
Wer kann mir weiter helfen? Wo und wie muss ich diesen definieren?