Pascal/Turbo Pascal - buscar una letra en un string

hola les consulto a uds que saben muchisimo como tengo que hacer para que pueda buscar la primera letra en un string.
quiero hacer un buscador pero que este me busque unicamente la primera letra de una cadena x ejemplo en el string ingreso la palabra diego
y en el buscador yo solo quiero encontrar aquellos string que comiensen con la letra d
ojala sea posible y muchas gracias x su atencion

Un string es un array de char, por lo tanto...

cadena:='Diego';
c:=cadena[1];
writeln(c); { muestra 'D' }

uhhhhhhhh buenisimo que facil muchisimas gracias men