cambiar un texto con un botton

[yusnerqui]

Código Delphi [-]

If Form1.label1.Caption = 'Primer Texto'  Then 
   Form1.Label1.Caption:= 'Segundo Texto'
else  
  If Form1.Label1.Caption ='Segundo Texto'  Then 
     Form1.Label1.Caption:= 'Tercer Texto'
  else       
     Form1.Label1.Caption:= 'Primer Texto';

Puedes seguir el bloque de If cuantas veces quieras en dependencia de la cantidad de estados....

Saludos