Ver Mensaje Individual
  #1  
Antiguo 23-05-2013
Avatar de bulc
bulc bulc is offline
Miembro
 
Registrado: jun 2010
Posts: 416
Reputación: 17
bulc Va por buen camino
TQuery con parámetro

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 );
//Try to use Parameters but failes:
   IBQuery1.Close;       // 1
  IBTransaction1.Active:= False; //2
  ClientDataSet1.Active:=False; //3
  DataSource1.Enabled := False;  //4
  DBGrid1.Enabled:= False;   //5

IBQuery1.SQL.Clear;
IBQuery1.SQL.Add('SELECT * FROM WB WHERE ITEM STARTING WITH :cInicial  ');
IBQuery1.ParamByName('cInicial').Value:=cIni ;
IBQuery1.Open;
   DataSource1.Enabled := True; //4
   IBTransaction1.Active:= True;  //2
      ClientDataSet1.Active:=True;
      DBGrid1.Enabled:= True;
   //DBGrid1.Refresh; Not needed
end;
Responder Con Cita