Ver Mensaje Individual
  #13  
Antiguo 31-01-2013
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 25
Caral Va por buen camino
Hola
Vamos por partes a ver si lo solucionas.
1, declaramos el procedimiento donde estan los demas en el form, asi:
Código Delphi [-]
type
  TForm1 = class(TForm)
    ADOQuery1: TAdoQuery;
     ..... los demas 
   
    procedure FormCreate(Sender: TObject);
    procedure refrescargrid;
    .... los demas
      
  private
    { Private declarations }
  public
    { Public declarations }
  end;


Luego el procedimento:


Código Delphi [-]
procedure TForm1.refrescargrid; // Lo declaro en el form1 si asi se llama el form que usas, con el mismo nombre que lo declaraste
 begin
 adconnection1.ConnectionString:= cadenaconexion; // cadenaconexion tiene que ser string si no tiene que estar asi: 'cadenaconexion'
 ADPhysIBDriverLink1.VendorLib:= 'FBCLIENT.DLL'; // enlazas la dll
 adquery1.Close;
 adconnection1.Connected:=True;
 end;

A ver que pasa.
saludos
__________________
Siempre Novato
Responder Con Cita