ola preciso fazer algo parecido como abaixo, como posso fazer sem usar o CASE ?? Case letra of 'B':ckInfo.State:= cbUnchecked; 'L':ckInfo.State:=cbGrayed; 'C':ckInfo.State:=cbChecked; end; ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤ Marcos Darui Almeida ICQ: 275-639-665 MSN: mdarui em hotmail.com Cel: (55) 8112 9203 ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤