Un código de llamada TQuery que funciona, pero al adaptarlo a un parámetro deja el TDBGrid activo pero vacío. Aquí va:
Código Delphi
[-]
Var
cIni : String ;
begin
InputBox('Introduzca lo que busca: ', 'Item:', cIni );
IBQuery1.Close; IBTransaction1.Active:= False; ClientDataSet1.Active:=False; DataSource1.Enabled := False; DBGrid1.Enabled:= False;
IBQuery1.SQL.Clear;
IBQuery1.SQL.Add('SELECT * FROM WB WHERE ITEM STARTING WITH :cInicial ');
IBQuery1.ParamByName('cInicial').Value:=cIni ;
IBQuery1.Open;
DataSource1.Enabled := True; IBTransaction1.Active:= True; ClientDataSet1.Active:=True;
DBGrid1.Enabled:= True;
end;