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
public
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