Delphi - CASE

Hola me gustaria saber como se aplica en delphi el case YO en visual basic pongo

select case DATA
CASE IS = "1"
buton1.visible = false
case is = "3"
buton1.visible = ture
case else
text=data
End Select
''''''
Gracias

En Delphi se escribe de la siguiente manera:
CASE DATA OF
1:buton1.visible:=false;
3:buton1.visible:=true;
else text:=data
END
suponiendo que DATA no es de tipo STRING porque en ese caso la sentencia CASE no funciona y te las tendrías que apañar con varios IFs.