Sería así desde Delphi:
Utilizando un componente TEdit = ed_Cadena_Buscar y un IBQuery (Firebird / Interbase)
Código Delphi
[-]
With IBQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select E.NOMBRES || ' ' || E.APELLIDO1 || ' ' || E.APELLIDO2 Nombre, nu.descripcion centro, e.direccion, e.telefono');
SQL.Add('from no_epla ne inner join STG_EGRAL.nom_empl e on e.id_empl = ne.id_empl');
SQL.Add('inner join no_uorg nu on nu.id_uorg = ne.id_uorg');
SQL.Add('where e.activo = 1 and e.nombres like :CADENA');
SQL.Add('order by nu.descripcion, e.nombres');
ParambyName('CADENA').AsString:='%'+ed_Cadena_Buscar.Text+'%';
Open;
end;