Klasse TFrame_Einkauf_Anfangsbestand

Unit

Deklaration

type TFrame_Einkauf_Anfangsbestand = class(TBaseFrameDlg, IFrame_Einkauf_Anfangsbestand)

Beschreibung

Hierarchie

Übersicht

Felder

Public pnlTool: TPanel;
Public Label1: TLabel;
Public cbDate: TComboBox;
Public pnlFooter: TPanel;
Public pb: TProgressBar;
Public lblFooter: TLabel;
Public cbWerk: TComboBox;
Public edSearch: TJvComboEdit;
Public pnlFooterSpace: TPanel;
Public lblSearchResult: TLabel;
Public lblBestand: TLabel;
Public btnMenu: TPngSpeedButton;
Public PopupMenu: TPopupMenu;
Public menuHelp: TMenuItem;
Public menuPrint: TMenuItem;
Public N1: TMenuItem;
Public menuShowNr: TMenuItem;
Public N2: TMenuItem;
Public menuHideNr: TMenuItem;
Public menuBedarfsmitteilungNew: TMenuItem;
Private FSiteNo: integer;
Private FMonat: integer;
Private FJahr: integer;
Private FWarengruppe1: integer;
Private FWarengruppe2: integer;
Private FVon: TDate;
Private FBis: TDate;
Private FScrollBox: TScrollbox;
Private FRowStripe: Boolean;
Private FFrameHeader: TEinkauf_AnfangsbestandHeader;
Private FFramelist: TObjectlist;
Private FRowFocus: TObject;
Private FIsBusy: Boolean;
Private FLastDate: TDateTime;

Methoden

Public procedure edSearchButtonClick(Sender: TObject);
Public procedure edSearchKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
Public procedure lblBestandClick(Sender: TObject);
Public procedure edSearchChange(Sender: TObject);
Public procedure btnMenuClick(Sender: TObject);
Public procedure menuPrintClick(Sender: TObject);
Public procedure menuHelpClick(Sender: TObject);
Public procedure menuShowNrClick(Sender: TObject);
Public procedure menuHideNrClick(Sender: TObject);
Public procedure PopupMenuPopup(Sender: TObject);
Public procedure menuBedarfsmitteilungNewClick(Sender: TObject);
Public procedure DoSetSelection(Sender: TObject);
Private procedure DoBuildFrames;
Private procedure DoSetSelections;
Private procedure DoClearFrames;
Private procedure DoFrameRow(aWarennr, aWarengruppe1, aWarengruppe2: integer);
Private procedure DoFrameHeader(aWarengruppe1, aWarengruppe2: integer);
Private procedure DoSearch;
Private procedure DoOnRowFocus(aSender: TObject);
Private procedure SetIsBusy(const Value: Boolean);
Private procedure DoUpdateBestand;
Private procedure DoPrint;
Public constructor Create(aOwner: TComponent); override;
Public destructor Destroy; override;
Public procedure DoGetSelections(aLastDate: TDateTime; aSiteNo: integer = 0);

Eigenschaften

Public property IsBusy: Boolean read FIsBusy write SetIsBusy;
Public property LastDate: TDateTime read FLastDate;
Public property SiteNo: integer read FSiteNo;

Beschreibung

Felder

Public pnlTool: TPanel;
 
Public Label1: TLabel;
 
Public cbDate: TComboBox;
 
Public pnlFooter: TPanel;
 
Public pb: TProgressBar;
 
Public lblFooter: TLabel;
 
Public cbWerk: TComboBox;
 
Public edSearch: TJvComboEdit;
 
Public pnlFooterSpace: TPanel;
 
Public lblSearchResult: TLabel;
 
Public lblBestand: TLabel;
 
Public btnMenu: TPngSpeedButton;
 
Public PopupMenu: TPopupMenu;
 
Public menuHelp: TMenuItem;
 
Public menuPrint: TMenuItem;
 
Public N1: TMenuItem;
 
Public menuShowNr: TMenuItem;
 
Public N2: TMenuItem;
 
Public menuHideNr: TMenuItem;
 
Public menuBedarfsmitteilungNew: TMenuItem;
 
Private FSiteNo: integer;
 
Private FMonat: integer;
 
Private FJahr: integer;
 
Private FWarengruppe1: integer;
 
Private FWarengruppe2: integer;
 
Private FVon: TDate;
 
Private FBis: TDate;
 
Private FScrollBox: TScrollbox;
 
Private FRowStripe: Boolean;
 
Private FFrameHeader: TEinkauf_AnfangsbestandHeader;
 
Private FFramelist: TObjectlist;
 
Private FRowFocus: TObject;
 
Private FIsBusy: Boolean;
 
Private FLastDate: TDateTime;
 

Methoden

Public procedure edSearchButtonClick(Sender: TObject);
 
Public procedure edSearchKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
 
Public procedure lblBestandClick(Sender: TObject);
 
Public procedure edSearchChange(Sender: TObject);
 
Public procedure btnMenuClick(Sender: TObject);
 
Public procedure menuPrintClick(Sender: TObject);
 
Public procedure menuHelpClick(Sender: TObject);
 
Public procedure menuShowNrClick(Sender: TObject);
 
Public procedure menuHideNrClick(Sender: TObject);
 
Public procedure PopupMenuPopup(Sender: TObject);
 
Public procedure menuBedarfsmitteilungNewClick(Sender: TObject);
 
Public procedure DoSetSelection(Sender: TObject);
 
Private procedure DoBuildFrames;
 
Private procedure DoSetSelections;
 
Private procedure DoClearFrames;
 
Private procedure DoFrameRow(aWarennr, aWarengruppe1, aWarengruppe2: integer);
 
Private procedure DoFrameHeader(aWarengruppe1, aWarengruppe2: integer);
 
Private procedure DoSearch;
 
Private procedure DoOnRowFocus(aSender: TObject);
 
Private procedure SetIsBusy(const Value: Boolean);
 
Private procedure DoUpdateBestand;

IFrame_Einkauf_Anfangsbestand

Private procedure DoPrint;
 
Public constructor Create(aOwner: TComponent); override;
 
Public destructor Destroy; override;
 
Public procedure DoGetSelections(aLastDate: TDateTime; aSiteNo: integer = 0);
 

Eigenschaften

Public property IsBusy: Boolean read FIsBusy write SetIsBusy;
 
Public property LastDate: TDateTime read FLastDate;
 
Public property SiteNo: integer read FSiteNo;
 

Erstellt mit PasDoc 0.16.0.