Autor Beitrag
Wackl Dackl
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Mi 15.06.05 12:11 
ich habe mir einen rechentrainer programmiert un moechte nun die funktion einfuegen, die es dem rechentrainer ermoeglichen nur eine gewisse anzahl an fragen zum beispiel nur 20 bzw genau 20 fragen zu stellen. ich braeuchte so schnell wie moeglich eine antwort, da ich in 2 wochen diesen rechentrainer bei meinem lehrer abgeben muss. danke schon mal im voraus
retnyg
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2754

SNES, GB, GBA, CPC, A500, 486/66, P4/3.0HT: NintendOS, AmigaOS, DoS
Delphi 5, Delphi 7
BeitragVerfasst: Mi 15.06.05 12:14 
du brauchst nur ne zählvariable zu verwenden, die du immer um eins erhöhst wenn ne frage gestellt wird. ist die variable > 20, kommt halt ne entsprechende meldung.

_________________
es gibt leute, die sind genetisch nicht zum programmieren geschaffen.
in der regel haben diese leute die regel...
Wackl Dackl Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Mi 15.06.05 12:18 
ja ddarauf bin ich auch gekommen, nur ich hab keine ahnung wie ich diese integrieren kann-.- das is mein problem^^
retnyg
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2754

SNES, GB, GBA, CPC, A500, 486/66, P4/3.0HT: NintendOS, AmigaOS, DoS
Delphi 5, Delphi 7
BeitragVerfasst: Mi 15.06.05 12:23 
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
var form1: tform1;
    zaehler: integer = 0//globale variabel

....

procedure button1click;
begin
  if zaehler > 20 then showmessage('nur 20 versuche erlaubt');
  else begin
    NeueFrage; 
    inc(zaehler);
  end;

end;

_________________
es gibt leute, die sind genetisch nicht zum programmieren geschaffen.
in der regel haben diese leute die regel...
Wackl Dackl Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Di 21.06.05 13:35 
ich bedanke mich. entschuldigung, dass ich erst jetzt antworte nur mein internet spinnte rum und ich mir nun dsl geholt^^.