CPP_Builder/TPVwin
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

First commit 14/02/1999

Browse Source
This commit is contained in:
José David Guillén
2021-09-12 22:19:30 +02:00
commit d031fca570
464 changed files with 22399 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

128
TpvStockActual1.h Normal file
View File

@ -0,0 +1,128 @@
//---------------------------------------------------------------------------
#ifndef TpvStockActual1H
#define TpvStockActual1H
//---------------------------------------------------------------------------
#include <vcl\Classes.hpp>
#include <vcl\Controls.hpp>
#include <vcl\StdCtrls.hpp>
#include <vcl\Forms.hpp>
#include <vcl\ExtCtrls.hpp>
#include <vcl\ComCtrls.hpp>
#include <vcl\DBGrids.hpp>
#include "Grids.hpp"
#include <vcl\DBCtrls.hpp>
#include <vcl\Buttons.hpp>
#include <vcl\DB.hpp>
#include <vcl\Mask.hpp>
#include <vcl\DBTables.hpp>
#include <Db.hpp>
#include <Chart.hpp>
#include <TeEngine.hpp>
#include <TeeProcs.hpp>
#include "ElastFrm.hpp"
#include <DBChart.hpp>
#include <Series.hpp>
#include <ImgList.hpp>
//---------------------------------------------------------------------------
class TStockActual : public TForm
{
__published: // IDE-managed Components
TStatusBar *StatusBar1;
TDBGrid *DBGrid1;
TDataSource *DataSource1;
TTable *TbProductos;
TIntegerField *TbProductosCdigodeBarras;
TStringField *TbProductosIDProducto;
TStringField *TbProductosNombredelProducto;
TCurrencyField *TbProductosPrecioCosto;
TFloatField *TbProductosIVA;
TCurrencyField *TbProductosPrecioVenta1;
TCurrencyField *TbProductosPrecioVenta2;
TCurrencyField *TbProductosPrecioVenta3;
TCurrencyField *TbProductosPrecioVenta4;
TCurrencyField *TbProductosPrecioVenta5;
TBooleanField *TbProductosCOMBINADO;
TStringField *TbProductosLocalizacion;
TSmallintField *TbProductosEnviarA;
TCurrencyField *TbProductosValorStock;
TCurrencyField *TbProductosBeneficioStock;
TPanel *Panel2;
TSpeedButton *CloseForm;
TSpeedButton *btnBuscar;
TSpeedButton *BusqSig;
TSpeedButton *RegAnt;
TSpeedButton *BusqAnt;
TSpeedButton *RegSig;
TSplitter *Splitter1;
TSplitter *Splitter2;
TTreeView *Indices;
TImageList *ImageList1;
TAutoIncField *TbProductosForcedIndex;
TIntegerField *TbProductosFamilia;
TIntegerField *TbProductosFamilia2;
TSmallintField *TbProductosEsNodo;
TPageControl *PageControl1;
TTabSheet *TabSheet1;
TTabSheet *TabSheet2;
TScrollBox *ScrollBox1;
TLabel *Label2;
TLabel *Label3;
TPaintBox *PaintBox1;
TLabel *Label1;
TDBEdit *DBEdit1;
TElasticForm *ElasticForm1;
TSpeedButton *ImprimirStock;
TFloatField *TbProductosStockActual;
TFloatField *TbProductosCantUnitaria;
TIntegerField *TbProductosStockMinimo;
TTable *TbSeguimiento;
TDBChart *DBChart1;
TLineSeries *Series1;
TLineSeries *Series2;
TIntegerField *TbSeguimientoCodProd;
TDateField *TbSeguimientoFecha;
TCurrencyField *TbSeguimientoPrecioVenta;
TCurrencyField *TbSeguimientoPrecioCosto;
TCurrencyField *TbSeguimientoPCreal;
TCheckBox *BajoMinimos;
void __fastcall DBGrid1DrawColumnCell(TObject *Sender, const TRect &Rect,
int DataCol, TColumn *Column, TGridDrawState State);
void __fastcall BuscarFichaClick(TObject *Sender);
void __fastcall BusqAntClick(TObject *Sender);
void __fastcall BusqSigClick(TObject *Sender);
void __fastcall DataSource1DataChange(TObject *Sender, TField *Field);
void __fastcall BackMainClick(TObject *Sender);
void __fastcall PaintBox1Paint(TObject *Sender);
void __fastcall DBGrid1KeyPress(TObject *Sender, char &Key);
void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
void __fastcall RegAntClick(TObject *Sender);
void __fastcall RegSigClick(TObject *Sender);
void __fastcall TbProductosAfterOpen(TDataSet *DataSet);
void __fastcall IndicesExpanding(TObject *Sender, TTreeNode *Node,
bool &AllowExpansion);
void __fastcall IndicesCollapsing(TObject *Sender, TTreeNode *Node,
bool &AllowCollapse);
void __fastcall IndicesChange(TObject *Sender, TTreeNode *Node);
void __fastcall TabSheet2Show(TObject *Sender);
void __fastcall BajoMinimosClick(TObject *Sender);
void __fastcall TbProductosFilterRecord(TDataSet *DataSet,
bool &Accept);
void __fastcall TbProductosBeforeInsert(TDataSet *DataSet);
void __fastcall ImprimirStockClick(TObject *Sender);
void __fastcall TbProductosCalcFields(TDataSet *DataSet);
void __fastcall FormResize(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TStockActual(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern TStockActual *StockActual;
//---------------------------------------------------------------------------
#endif