Nach bestimmer Variable bestimme Aktion ausführen

[Sir Rufo]

Zitat von Fractal:

Zitat:

Zitat:

Fatal: Syntax error, ";" expected but "ELSE" found

Wo?

Da wo's erste Else gesetzt wird.

Delphi-Quellcode:

procedure TErgebnisse.FormActivate(Sender: TObject);
begin
   Schlecht.Visible := n < 4;
   Ok.Visible := (n > 3) and (n < 7);
   Gut.Visible := (n > 6) and (n < 10);
   Perfekt.visible := n = 10;
end;

Ach da, ja da musst du einfach nur 42 in den Projekt-Optionen ankreuzen, dann geht es

[Fractal]

42 ist wo & was.. ?

[Sir Rufo]

Zitat von Fractal:

42 ist wo & was.. ?

http://de.wikipedia.org/wiki/42_(Antwort)

[CocoPops]

Fractal,

gemeint ist, dass du dich nicht nur deine Fehler hier posten sollst, sondern auch den passenden Code dazu.

Zitat:

Fatal: Syntax error, ";" expected but "ELSE" found...
jedoch krieg ich immer noch Schlecht angezeigt, obwohl 4/10 Ok anzeigen müsste.

Lösung wurde schon mehr als ein Mal gepostet:

Delphi-Quellcode:

procedure TErgebnisse.FormActivate(Sender: TObject);
begin
   PresentRatePictures;
end;

procedure TErgebnisse.PresentRatePictures;
begin
   Schlecht.Visible := n < 4;             // 0, 1, 2, 3
   Ok.Visible := (n > 3) and (n < 7);     // 4, 5, 6
   Gut.Visible := (n > 6) and (n < 10);   // 7, 8, 9
   Perfekt.visible := n = 10;             // 10
end;

Zudem würde ich, wie auch bereits erwähnt, von den vier Labels wegkommen.
Entweder ein einziges Label und bei der Ergebnisauswertung das Caption ändern, oder, wie ebenfalls bereits erwähnt, ein TImage nutzen und dann das passende Image (Ergebnis) aus einer TImageList laden.

[p80286]

Der Link funktioniert wohl nicht ganz richtig, darum ein Zitat:

Zitat:

Die Antwort 42 ist das kürzeste und bekannteste Zitat aus der verfilmten[1] Roman- und Hörspielreihe Per Anhalter durch die Galaxis von Douglas Adams.

Es ist die Antwort auf die vom Autor unklar gestellte Frage „nach dem Leben, dem Universum und dem ganzen Rest“ (“life, the universe and everything”), die in der Geschichte der größte existierende Computer des Universums zu errechnen hat und sie als mit absoluter Sicherheit korrekt darstellt. Letztlich aber können die Protagonisten mit der Antwort nichts anfangen, weil niemand weiß, wie die eigentliche Frage lautete.

(Wikipedia 42(Antwort))

Gruß
K-H