Consulta con delphi

[zvf]

Tengo la siguiente duda; voy a hacer un programita que me va a mostrar los datos de una tabla de una base de datos, yo voy a escribir una cadena, y despues voy a presionar un boton que dice 'inicia con', 'contiene en' o 'todo'; y la funcion en seudocodigo esta asi:

funcion muestra_datos (nombre_tabla, nombre_campo, cadena, todo_parte_inicia) // donde todo_parte_inicia es un numero entero, es 0 si quiero buscar la cadena exacta, es 1 si quiero saber cuantos registros contienen esa cadena en cualquier lugar, y 2 si quiero que inicien con esa cadena.

inicia
si todo_parte_inicia = 0 entonces
consulta = select * from nombre_tabla where campo= cadena
else
si todo_parte_inicia = 1 entonces
consulta = no se
termina


Como puedo hacer esa consulta?