Anfänger sucht Hilfe bei ersten Programierschritten

[lun87]

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