opțiuni de răspuns (listă) este creat în proprietatea Elemente (RadioGrouppri acest lucru este evidențiat)
Testul constă, de exemplu, de la 5 forme. La fiecare întrebare formă situată, răspunsuri, butonul (New-Formotkrytie nouă formă, Shift + F12 pentru a vă deplasa între formulare).
Procedura este scrisă pe butonul Next. În toate lucrările va fi unul peremennayai: număr întreg; este la nivel mondial. Am descrie într-un loc în care:
i: integer; se înscrie
Descrierea variabilei globale apare numai în Unit1. dezvoltator de testare trebuie să știe răspunsul corect, pentru că acest lucru este indicat în program.
Procedura pentru butonul următor:
Dacă RadioGroup1.Itemindex = -1 atunci ShowMessage ( „Am uitat să răspundă la întrebarea!“)
Inceput daca RadioGroup1.Itemindex = 2, atunci i: = i + 1;
Deschide un nou formular (New-Form) fac o întrebare - răspunsuri knopkaDalee:
Dacă RadioGroup1.Itemindex = -1 atunci ShowMessage ( „Am uitat să răspundă la întrebarea!“)
Beginif RadioGroup1.Itemindex = 1, atunci i: = i + 1;
Pornind de la al doilea modul (UNIT2), se adaugă cuvântul Unit1 în locul unde există un transfer de: Ferestre, Mesaje, SysUtils, Clase, Grafică, Controale, Formulare, Dialoguri,
Lucrarea similară se face cu forma 3 și 4.
5 pe formular au o întrebare, răspunde la alegeri, faceți clic pe Finish, apoi a scrie o procedură pe butonul
Dacă RadioGroup1.Itemindex = -1 atunci ShowMessage ( „Am uitat să răspundă la întrebarea!“)
Inceput daca RadioGroup1.Itemindex = 3, atunci i: = i + 1;
0,1,2: ShowMessage ( 'Ați primit 2');
3: ShowMessage ( 'Ai 3');
4: ShowMessage ( 'Ai 4');
5: ShowMessage ( 'Ai 5');
Creat un test, nu prima dată rula programul, va apărea o fereastră în care trebuie să selectați YES, fereastra va apărea ori de câte ori au existat forme de comunicare este stabilit.
Prima formă poate fi utilizat pentru a afișa informații generale despre test, o astfel: