programa en lazarus

[cuteprincess]

hola estoi aprendiendo este lenguaje y necesito hacer un programa que convierta de decimal a binario este es mi codigo empezado solo que no c declarar un arreglo y como recorrerlo

a := decimal.Text;
if(a > 255)then
a := b;
else
Application.MessageBox(introduce un numero menor a 255);