Hola
A ver asi:
Código Delphi
[-]
var Dato: String;
Begin
Dato:= DBEdit1.Text;
Query1.SQL.Text:= 'SELECT Numero from T_telcliente where Cod_cliente= :a';
Query1.Parameters[0].Value:= Dato;
Query1.active:=true;
Saludos
PD: Con que base de datos esta trabajando?