Klick Zähler

zangelo · Beiträge: 50

Hi
ich will ein Quiz Spiel programmieren. ich habe pro Frage eine Form, und pro frage 4 antworten, wenn ich auf die falsche klick kommt falsch wenn ich auf die richtige klick geht es zu folie X. Wie kann ich es jetzt so machen, dass wenn ich auf den falschen button klick, dass in Label1 ,die zahl, die gerade gezeigt wird mit 1 addiert wird, und das mit richtig auch. es müsste naturlich die zahl auf allen labels auf allen forms ändern.

Ehemaliges Mitglied Erhaltene Danke: 1

Ich glaube du solltest im Vorwege erst einmal dein gesamtes Konzept überdenken, weil dann nämlich solche haarstreubenden Probleme gar nicht aufträten.Versuche mal, mit nur einer einzigen Form auszukommen, bevor du weiter machst. Du kannst ja zB Captions der Label auch dynamisch zuweisen.
Ich weiß nicht, wie weit du schon in der Materie steckst, aber ein richtiger Einstieg in die Grundlagen scheint mir das Richtige.

zangelo · Beiträge: 50

Also, ich bin nfänger, und will delphi lernen, ich kann nicht viel, ich kann sachen verschwinden lassen, oder auftauchen lassen, oder zur form wechseln, wie du das meinst weis ich leider nicht.

Coder · Beiträge: 1383 Erhaltene Danke: 1 WinXP D2005 PE

Das geht beschissen zu erklären. :gruebel:

Aber wenn wir dir jetzt den ganzen Quellcode vorkauen lernst du ja nichts dabei. :nixweiss:

Wir können dir hier nicht die Grundkenntnise von Delphi beibringen, darum würde ich dir sowieso erstmal ein Einsteiger Buch ans Herz legen.
Delphi für Kids ist sehr beliebt. (Damit hab ich auch angefangen :wink:

)

rolulo · Hält's aus hier Beiträge: 15 Win XP D7 Ent

Hallo zangelo,

Ich gebe Elite Recht, Du solltest Dein Konzept überarbeiten, Wenn Du für Jede Frage ein einzelnes Formular hast, macht das Mächtig viel Aufwand. Du mußt nämlich die Richtig und Falsch Zähler sonst auf jedem Formular anpassen, was bei 20 Fragen schon mindestens 40 Quelltextzeilen entspricht (je nach deklaration deiner Formulare).

Also wie hast Du denn die Formulare aufgebaut? Sind deine Fragen als "Labels" oder als "StaticText" erstellt.

Du kannst ja mit

markieren

Delphi-Quelltext

1:	label2.caption:='Hier steht Deine Frage';

Fragen in einem Formular ändern, außerdem würden die läßtigen Formularaufrufe entfallen. Außerdem würde es dann bloß einen Zähler für Falsch und einen für Richtig geben (Ebenso die Labels zum Anzeigen).
Willst Du eigenlich auch Bilder einfügen oder hast Du nur Textfragen?

Moderiert von Christian S.: Code- durch Delphi-Tags ersetzt.

_________________
Gott beware uns vor dem DAU (Dümmster anzunehmender User)

zangelo · Beiträge: 50

Also, ich hab die fragen auf Labels. Bilder hab ich noch keine drin, weil damit möchte ich mich erst am ende beschäftigen, ihr habt recht, wenn ihr mir alles fertig gibt war es euer verdienst und nicht meiner. ich werde mir das Buch mal Anschauen. Danke.

Müsste ich das dann so machen, dass ich bei 20 Fragen 1 sichtbares Label hab, und 19 versteckte, und 4 sichtbare buttons, 76 unsichtbare?
wenn ich auf die richtige antwort klicke werden die buttons 1-4 versteckt, und 5-8 gezeigt, und dann das mit label1 und 2?

Blutiger-Anfänger · Beiträge: 35 Win XP D3 Prof

HI Zangelo
Du brauchst die Labels nicht zu verstecken, du kannst sie mit der If Struktur
verändern nach dem Motto

markieren

Delphi-Quelltext

1:
2:

IF Frage.richtig then
  Label1.Caption:= 'neue Frage';

Moderiert von Christian S.: Code- durch Delphi-Tags ersetzt.

zangelo · Beiträge: 50

Also das verstehe ich jetzt nicht so ganz, was muss ich in den button dann eingeben, dass der weis, dass es richig ist, und neue frage kommen kann, und kann ich das dann auch mit den buttons machen, weil da muss sich der text ja auch ändern.

Ehemaliges Mitglied Erhaltene Danke: 1

Erst die Arbeit, dann das Vergnügen. Du musst zunächst ein paar Einsteiger-Tutorials lesen, um überhaupt eine Vorstellung von den Möglichkeiten zu bekommen, die Delphi bietet.
Hier würde ich anfangen:
delphi-source.de/tutorials/erstesprog/

zangelo · Beiträge: 50

sowas brauch ich danke, das buch ist auch gut nur wenn ich das jetzt bestelle wird es eh erst am 27.12 oder später ankommen, daher nütz es mir noch nichts.

Edit:
das tut ist denk ich mal gut, nur ich hab von pascal keine ahnung, ich kann ein bisschen java code für meine bedürfnisse umändern, und das war es aber fast schon.

GTA-Place · Verfasst: Fr 24.12.04 14:02

Das merkt man, dass du keine Ahnung von Pascal hast, deshalb lies es dir durch.

_________________
"Wer Ego-Shooter Killerspiele nennt, muss konsequenterweise jeden Horrorstreifen als Killerfilm bezeichnen." (Zeit.de)

Blutiger-Anfänger · Beiträge: 35 Win XP D3 Prof

HI Zangelo
lies dir auf der seite mal was zum Thema RadioButtons durch :les:

, mit Hilfe dieser Buttons zum Aktivieren kann man auf Knopfdruck überprüfen ob die Frage richtig beantwortet ist, und entsprechende Schritte einleiten z.b. ändern der Label Beschriftungen. Wenn dir das Totorial dazu nicht reicht, google mal ein bischen.(Für mehrere richtige antwortmöglichkeiten benötigst du checkboxen).
Frohes Fest an alle User :party:

zangelo · Beiträge: 50

Ich hab jetzt was rausgefunden, mit dem Tut, es klappt aber nicht, was ist an dem Code jetzt Falsch?

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

procedure TForm1.Button1Click(Sender: TObject);
 Var
    X, Y, Z: integer;
begin
X:=StrToInt(Button1.1)
Y:=StrToInt(Label1.Text)
Z:= X+Y;
Label1.Caption:=IntToStr(z);
end;

end.

Blutiger-Anfänger · Beiträge: 35 Win XP D3 Prof

was soll der code denn können

Monty7 · Beiträge: 26

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:

var richtig, flasch : integer;
begin
// "eingabe"
richtig:=strtoint(richtiglabel.caption);
falsch:=strtoint(falschlabel.caption);
// verarbeitung
// welches genommen wird klärst du mit ner if-abfrage
//if ... then
{falsch:=falsch+1;} 
//else
{richtig:=richtig+1;}
// ausgabe
richtiglabel.caption:=inttostr(richtig);
falschlabel.caption:=inttostr(falsch);
end;

suchst du sowas ?

Blutiger-Anfänger · Beiträge: 35 Win XP D3 Prof

Hast du alles nur in den code abgeschrieben???

Blutiger-Anfänger · Beiträge: 35 Win XP D3 Prof

Auch
Procedure TForm1.Button1Click(sender TObjekt); ?

zangelo · Beiträge: 50

Also, ob das der richtige code ist weis ich nicht, mein delphi meint, das falsch nicht richtig sei.
@Blutiger-Anfänger
Was meinst du den mit abgeschrieben, ich bin in den quellcode on dem button, und dann habe ich alles was da war makiert, kopiert, und hier eingefügt.

Blutiger-Anfänger · Beiträge: 35 Win XP D3 Prof

Ich meine ob du diese Methode auch deklarierst hast, denn da würde ein fehler entschstehen wenn du es nicht gemacht hast

zangelo · Beiträge: 50

Ich weis nicht, was deklarieren ist, aber daher denke ich mal, dass ich es nicht gemacht habe

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme