Thema: Delphi Quiz in Delphi

Einzelnen Beitrag anzeigen

chuck.9

Registriert seit: 20. Jan 2009
18 Beiträge
 
Delphi 2005 Professional
 
#15

Re: Quiz in Delphi

  Alt 20. Jan 2009, 19:27
ich wisses nich worans liegt, aber es tut sich immer noch nix

Delphi-Quellcode:
var
  feld: array [1..60,1..6] of String;
  n:integer;


procedure TForm1.Button2Click(Sender: TObject);
begin
showmessage('Verloren, versuchs noch einmal.');
close;
end;

procedure TForm1.Button1Click(Sender: TObject);


begin
 randomize;

            panel3.Caption:='0 €';
            panel2.caption:='Nr. 1';
            n:=random(3)+1;
            panel1.caption:=quizfragen(n,1);
            radiobutton1.caption:=quizant(feld[2]);
ist bis dahin auch alles richig deklariert...aber denke eig schon, denn 10 pkt in info, heißt bin nich dumm...xDxD!

[edit=mkinzler]Tag aufgefrischt Mfg, mkinzler[/edit]