Einzelnen Beitrag anzeigen

Benutzerbild von theomega
theomega

Registriert seit: 18. Jun 2002
684 Beiträge
 
#3
  Alt 12. Apr 2003, 23:58
Ich glaube, das er zufällig eines der 3 Antworten ausgeben will. Deshalb würde ich es so machen:

Delphi-Quellcode:
var i:integer

randomize;
i:=random(2)+1;

if i=1 then label1.caption := 'Erster Text';
if i=2 then label1.caption := 'Zweiter Text';
if i=3 then label1.caption := 'Dritter Text';
Aber Achtung: Der Code muß nicht funktionieren, hatte Delphi schon seit MOnaten nichtmehr an und ist also aus dem Kopf!
  Mit Zitat antworten Zitat