Autor Beitrag
nilz
Hält's aus hier
Beiträge: 13



BeitragVerfasst: Fr 22.02.08 08:47 
ich muss für die schule wer wird millionär programmieren und muss ganz ehrlich zugeben ich hab keine ahnung von informatik (kaum gundlagen)

müssen das in delphi 5 machen und wollte gerne 3 joker einbauen

einen 1/2 joker...wo zwei falsche antworten gelöscht werden soll
einen 1/4 joker...wo eine falsche antwort gelöscht werden soll
und einen "next-question-joker" bei dem eine frage weitergeleitet wird

kann mir jmd vllt anregungen tipps oder hilfestellungen geben

würde mir sehr geholfen werden^^ :)
oldmax
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 380


D3 Prof, D4 Prof
BeitragVerfasst: Fr 22.02.08 09:48 
Hi
Sicher hast du schon deine Form mit einem Textfeld für die Frage und den Checkboxen für die Antwortmöglichkeiten gegeben.
Eigentlich eignen sich da RadioButtons in einer Groupbox ganz gut. Da kann immer nur ein Button gesetzt werden. Die Captions der Radiobuttons besetzt du mit den Antworttexten. Ich hab hier auf der Maschine kein Delphi, daher gibt's nur Denkanstöße.
Bei Jokern kannst du über die Eigenschaft Visible zum beispiel Buttons ausblenden.
ausblenden Delphi-Quelltext
1:
2:
3:
MyRadiobutton.Visible:=False; // nicht sichtbar
MyRadiobutton.Visible:=True; // sichtbar
MyRadiobutton.Caption:='Auswahlantwort A,B,C oder D'; // Text dranschreiben

Die Radiobuttons mußt du in eine Groupbox packen, dann ist auch immer nur einer gesetzt.
Für die Joker würd ich Checkboxen nehmen
Wenn du sie anklickst, setzt du deine Bedingung und anschließend sperrst du die Checkbox
MyCheckbox_Joker_x.Enabled:=Not Checkbox.Checked; // kann nur einmal gesetzt werden
Natürlich mußt du bei einer neuen Runde dafür sorgen, das die Checkboxen wieder freigegeben werden
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
MyCheckbox_Joker_1.Enabled:=true;
MyCheckbox_Joker_2.Enabled:=true;
MyCheckbox_Joker_3.Enabled:=true;

MyCheckbox_Joker_1.Checked:=False;
MyCheckbox_Joker_2.Checked:=False;
MyCheckbox_Joker_3.Checked:=False;

Vielleicht sind das ein paar nützliche Denkanstöße

Gruß oldmax

_________________
Zier dich nich so, ich krieg dich schon....
Zorro
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 76

Win 2000, Win XP Pro
Delphi 7 Architect
BeitragVerfasst: Fr 22.02.08 09:51 
user profile iconoldmax hat folgendes geschrieben:
Die Radiobuttons mußt du in eine Groupbox packen, dann ist auch immer nur einer gesetzt.


Oder du nimmst gleich TRadioGroup...

Greetz
Zorro
oldmax
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 380


D3 Prof, D4 Prof
BeitragVerfasst: Fr 22.02.08 09:54 
Hi

Zitat:
Oder du nimmst gleich TRadioGroup...

Ja, aber kannst du auch einzelne Items einfach Unvisible schalten ?
Natürlich lassen sich Items löschen, aber die Ansicht geht dabei zum Teufel....
Gruß oldmax

_________________
Zier dich nich so, ich krieg dich schon....