Einzelnen Beitrag anzeigen

lun87

Registriert seit: 19. Nov 2006
29 Beiträge
 
#9

Re: Anfänger sucht Hilfe bei ersten Programierschritten

  Alt 16. Dez 2006, 00:28
Danke Dir aber ich check das nicht mehr jetzt...-.- Kopf ist zu. Muss pennen morgen in aller frische wieder

jedenfalls müsste es so sein:

User gibt Zahl ein.
programm guckt ob anzahl der versuche = 4 ist
wenn nein dann startet er und vergleicht ratezahl mit eingabezahl
wenn treu dann ausgabe der ratezahl ansonsten neuer versuch und ratezahl im feld merken
man hat 5 versuche wenns nicht klappt wird gesagt: tja klappt wohl nicht
wenn beim 4. versuch-> werden die 4 Zahlen ausgeben und die randomzahl

naja Gute NAcht gucke noch kurz aber globe net das ich zu einem vernünftigen Ergebnis komme mehr...


Delphi-Quellcode:
begin
i := 0;


For i := 0 to 4 do


   If (i = 4) then
     showmessage('Tja war wohl nichts!') ----> neuer versuch initialisieren *aaaaargh* nicht mehr denkfähig heute xD
   else
   begin
    eingabezahl := strtoint(eingabeedt.text);
    Zahl[i] := eingabezahl;
     inc(i); ----> sobald ich hier begin und end setze kennt der i nicht mehr *grrrrrr* -.-
    end;




For i := 0 to 4 do
ausgabeedt.caption := inttostr(Zahl[i]);
inc(i);
end;



mfg
LUn87
  Mit Zitat antworten Zitat