Klasse TEinkauf_AnfangsbestandZeile

Unit

fr_Einkauf_AnfangsbestandZeile

Deklaration

type TEinkauf_AnfangsbestandZeile = class(TFrame, IFrame_Embedded, IEinkauf_AnfangsbestandZeile)

Beschreibung

Hierarchie

• TFrame
• TEinkauf_AnfangsbestandZeile

Übersicht

Felder

	edName: TEdit;
	pnlFrame: TPanel;
	lblEinheit: TLabel;
	lblTrend: TLabel;
	edWANr: TEdit;
	btnMenu: TPngSpeedButton;
	PopupMenu: TPopupMenu;
	menuaddLink: TMenuItem;
	menuRename: TMenuItem;
	N1: TMenuItem;
	menuDelete: TMenuItem;
	edNewVal: TJvCalcEdit;
	edOldVal: TJvCalcEdit;
	FName: string;
	FWarennr: integer;
	FJahr: integer;
	FMonat: integer;
	FWarengruppe1: integer;
	FWarengruppe2: integer;
	FEinheit: string;
	FNewVal: Extended;
	FOldVal: Extended;
	FIsBestand: Boolean;
	FStripe: Boolean;
	FOnFocus: TNotifyEvent;
	FFrameParent: TComponent;

Methoden

	procedure edNewValEnter(Sender: TObject);
	procedure edNewValExit(Sender: TObject);
	procedure edNewValKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
	procedure btnMenuClick(Sender: TObject);
	procedure DoThreadExec(aQueryThread: TQueryThread);
	procedure DoThreadSync(aQueryThread: TQueryThread);
	procedure DoUpdateGUI;
	procedure DoSetRowColor(aColor: TColor);
	procedure Enter2Tab;
	procedure SetFrameParent(aFrameParent: TComponent);
	function IsSearch(aText: string): boolean;
	function IsBestand: Boolean;
	function GetWarennr: integer;
	procedure Exec(aForce: Boolean = true);

Eigenschaften

	property Warennr: integer read FWarennr write FWarennr;
	property Jahr: integer read FJahr write FJahr;
	property Monat: integer read FMonat write FMonat;
	property Warengruppe1: integer read FWarengruppe1 write FWarengruppe1;
	property Warengruppe2: integer read FWarengruppe2 write FWarengruppe2;
	property Stripe: Boolean read FStripe write FStripe;
	property OnFocus: TNotifyEvent read FOnFocus write FOnFocus;

Beschreibung

Felder

	edName: TEdit;

	pnlFrame: TPanel;

	lblEinheit: TLabel;

	lblTrend: TLabel;

	edWANr: TEdit;

	btnMenu: TPngSpeedButton;

	PopupMenu: TPopupMenu;

	menuaddLink: TMenuItem;

	menuRename: TMenuItem;

	N1: TMenuItem;

	menuDelete: TMenuItem;

	edNewVal: TJvCalcEdit;

	edOldVal: TJvCalcEdit;

	FName: string;

	FWarennr: integer;

	FJahr: integer;

	FMonat: integer;

	FWarengruppe1: integer;

	FWarengruppe2: integer;

	FEinheit: string;

	FNewVal: Extended;

	FOldVal: Extended;

	FIsBestand: Boolean;

	FStripe: Boolean;

	FOnFocus: TNotifyEvent;

	FFrameParent: TComponent;
IFrame_Embedded

Methoden

	procedure edNewValEnter(Sender: TObject);
markiert das Eingabefeld als aktives Feld

	procedure edNewValExit(Sender: TObject);
entfernt die Farbmarkierung

	procedure edNewValKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);

	procedure btnMenuClick(Sender: TObject);

	procedure DoThreadExec(aQueryThread: TQueryThread);

	procedure DoThreadSync(aQueryThread: TQueryThread);

	procedure DoUpdateGUI;

	procedure DoSetRowColor(aColor: TColor);

	procedure Enter2Tab;

	procedure SetFrameParent(aFrameParent: TComponent);

	function IsSearch(aText: string): boolean;
IEinkauf_AnfangsbestandZeile

	function IsBestand: Boolean;

	function GetWarennr: integer;

	procedure Exec(aForce: Boolean = true);

Eigenschaften

	property Warennr: integer read FWarennr write FWarennr;

	property Jahr: integer read FJahr write FJahr;

	property Monat: integer read FMonat write FMonat;

	property Warengruppe1: integer read FWarengruppe1 write FWarengruppe1;

	property Warengruppe2: integer read FWarengruppe2 write FWarengruppe2;

	property Stripe: Boolean read FStripe write FStripe;

	property OnFocus: TNotifyEvent read FOnFocus write FOnFocus;

---

Erstellt mit PasDoc 0.16.0.