Delphi - como lo hago

Hola, amigos

Como hago esto: parece que no me explique bien lo que puse con los apellidos
con la S, fue solo un ejemplo,-

Yo lo que necesito es una busqueda que cuando yo ingrese en un edit, la primera letra de un appellidos me salgan todos los apellidos que empiecen con esa letra, ejemplo:

si pongo S.
me salgan todos los apellidos que empiecen con esa letra

si pongo M, me salgan todos los apellidos que empiecen con M, y asi sucesivamente.-

No nada mas con una sola letra en particular, sino con cualquier letra.

Att. Torres

Ya te lo han contestado anteriormente con

Select * from tabla_empleados where apellido1 like '%S'

esto sería para la S como lo que tu quieres es lo que pongas en el edit, pues sutituye la S por el texto del edit

Select * from tabla_empleados where apellido1 like '%' + Edit1.text

Si quieres que sirva para mayúsculas y minúsculas transforma apellido1 y Edit1.text a mayúsculas con UPPER.

UPPER(apellido1) y UPPER(Edit1.text)

Tambien puedes hacerlo con la propiedad Filter de los datasets, puedes utilisarlo tambien con la forma LIKE, te doi un ejemplo:
cdsPersonas.Filter := 'APELLIDO LIKE ' + QuotedStr('%' + edBuscar.Text + '%');
cdsPersonas.Filtered := True;
Tambien puedes usar las cadenas con Format():
cdsPersonas.Filter := Format('APELLIDO LIKE %s', [QuotedStr('%' + edBuscar.Text + '%']);
cdsPersonas.Filtered := True;
Puedes hacer la busqueda cuando el usuario presione la tecla enter por ejemplo.
Espero que te sirva.