Consulta SQL en Procedimiento individual

[[Caral]]

Hola
declara tu procedimiento como parte del form en donde se declaran los demas, aqui:

Código Delphi [-]
type
  TForm4 = class(TForm)
  ZQuery1.TZquery;
  procedure BuscarFactura(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

Luego simplemente lo usas asi:

Código Delphi [-]
procedure TForm4.BuscarFactura;
begin
  ZQuery1.Close;
  ZQuery1.SQL.Text:= 'Select * From FacturaDetalle';
  ZQuery1.Open;
end;

Saludos