|
Consulta Interbase
ya intentaste ponerlo con el operador "like" no recuerdo exactamente cual es en interbase, si es el mismo de SQL Server podria servir a tus propositos debe de ser ese.
procedure TPeliculas.tituloKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then { si es la tecla <enter> }
begin
IBDATASET2.SelectSQL.Clear;
IBDATASET2.SelectSQL.ADD('SELECT TITULO,GENERO,FORMATO,CLASIFIC FROM PELICULAS WHERE PELICULAS.TITULO like "'+titulo.Text +'%"');
IBDATASET2.Active :=TRUE;
titulo.Text:='';
end;
end;
|