Klasse TMainForm
Unit
Deklaration
type TMainForm = class(TForm, IFormShare)
Beschreibung
Hierarchie
- TForm
- TMainForm
Übersicht
Felder
 |
MainMenu: TJvMainMenu; |
|
Datei2: TMenuItem; |
|
Beenden2: TMenuItem; |
|
Bearbeiten1: TMenuItem; |
|
Ausschneiden1: TMenuItem; |
|
Kopieren1: TMenuItem; |
|
Einfgen1: TMenuItem; |
|
Window1: TMenuItem; |
|
M_WindowTileVertical1: TMenuItem; |
|
M_WindowCascade1: TMenuItem; |
|
Hilfe2: TMenuItem; |
|
menu_Hilfe: TMenuItem; |
|
men_Info: TMenuItem; |
|
M_WindowTileHorizontal1: TMenuItem; |
|
M_WindowArrange1: TMenuItem; |
|
M_Anmelden: TMenuItem; |
|
N1: TMenuItem; |
|
Anfang1: TMenuItem; |
|
sprung1: TMenuItem; |
|
Navigation1: TMenuItem; |
|
zurueck1: TMenuItem; |
|
N6: TMenuItem; |
|
weiter1: TMenuItem; |
|
sprung2: TMenuItem; |
|
Ende1: TMenuItem; |
|
N9: TMenuItem; |
|
Datensatz1: TMenuItem; |
|
Einfuegen1: TMenuItem; |
|
Edit1: TMenuItem; |
|
Loeschen1: TMenuItem; |
|
N10: TMenuItem; |
|
Verwerfen1: TMenuItem; |
|
N12: TMenuItem; |
|
Refresh1: TMenuItem; |
|
N13: TMenuItem; |
|
M_Modulleiste: TMenuItem; |
|
DatensatzInfo1: TMenuItem; |
|
menuOptionen: TMenuItem; |
|
Toolbar2: TMenuItem; |
|
N4: TMenuItem; |
|
Suchen1: TMenuItem; |
|
Sortierung1: TMenuItem; |
|
Anzahl1: TMenuItem; |
|
SQLText1: TMenuItem; |
|
Druck1: TMenuItem; |
|
TabellenDruck1: TMenuItem; |
|
Gerlingen1: TMenuItem; |
|
Schnellsuche1: TMenuItem; |
|
N5: TMenuItem; |
|
Bildschirmdrucken1: TMenuItem; |
|
FormStorage1: TFormStorage; |
|
ImageList1: TImageList; |
|
menuSysdba: TMenuItem; |
|
Mehr1: TMenuItem; |
|
N14: TMenuItem; |
|
Einstellungen1: TMenuItem; |
|
N21: TMenuItem; |
|
Einstellungen2: TMenuItem; |
|
N22: TMenuItem; |
|
M_TabellenLayout: TMenuItem; |
|
SQLTextvollst1: TMenuItem; |
|
N20: TMenuItem; |
|
Finden1: TMenuItem; |
|
Drucken1: TMenuItem; |
|
FlexiReport2: TMenuItem; |
|
N2: TMenuItem; |
|
ImageList3: TImageList; |
|
pnlTop: TPanel; |
|
Panel2: TPanel; |
|
ToolPanel: TPanel; |
|
frDesigner: TfrDesigner; |
|
RightManager: TIBP_RightManager; |
|
Profiles: TIBP_Profiles; |
|
FlexiAdminMnu: TMenuItem; |
|
LMS: TIBP_LMS; |
|
pw1: TMenuItem; |
|
HotkeyfrMensystem1: TMenuItem; |
|
Bevel1: TBevel; |
|
BottomPanel: TPanel; |
|
pnlMenu: TPanel; |
|
Panel10: TPanel; |
|
Panel12: TPanel; |
|
Panel13: TPanel; |
|
pnlStatusFooter: TPanel; |
|
Panel15: TPanel; |
|
BtnStatEdi: TColor95Button; |
|
BtnOTStat: TColor95Button; |
|
BtnFakStat: TColor95Button; |
|
ImageList2: TImageList; |
|
AppEvents: TJvAppEvents; |
|
estfunktionen1: TMenuItem; |
|
SQLBefehle1: TMenuItem; |
|
menu_FehlerSimulation: TMenuItem; |
|
ActionList: TActionList; |
|
EditCut1: TEditCut; |
|
EditCopy1: TEditCopy; |
|
EditPaste1: TEditPaste; |
|
N11: TMenuItem; |
|
Pausenzeitverrechnung1: TMenuItem; |
|
PngImageList48: TPngImageList; |
|
PngImageList24: TPngImageList; |
|
dsTaskBar: TdsTaskBar; |
|
FilePrintSetup1: TFilePrintSetup; |
|
FilePageSetup1: TFilePageSetup; |
|
FileRun1: TFileRun; |
|
Act_FileExit: TFileExit; |
|
Act_Anmelden: TAction; |
|
Act_Modulleiste: TAction; |
|
Act_DSInfo: TAction; |
|
Act_TabellenLayout: TAction; |
|
WindowCascade1: TWindowCascade; |
|
WindowTileHorizontal1: TWindowTileHorizontal; |
|
WindowTileVertical1: TWindowTileVertical; |
|
WindowArrange1: TWindowArrange; |
|
IB_ActionFirst1: TIB_ActionFirst; |
|
IB_ActionPrior1: TIB_ActionPrior; |
|
IB_ActionNext1: TIB_ActionNext; |
|
IB_ActionLast1: TIB_ActionLast; |
|
IB_ActionEdit1: TIB_ActionEdit; |
|
IB_ActionNew1: TIB_ActionNew; |
|
IB_ActionPost1: TIB_ActionPost; |
|
IB_ActionCancel1: TIB_ActionCancel; |
|
IB_ActionDelete1: TIB_ActionDelete; |
|
IB_ActionRefresh1: TIB_ActionRefresh; |
|
IB_ActionRefreshKeys1: TIB_ActionRefreshKeys; |
|
IB_ActionRefreshRows1: TIB_ActionRefreshRows; |
|
IB_ActionAppend1: TIB_ActionAppend; |
|
IB_ActionOrder1: TIB_ActionOrder; |
|
IB_ActionSearch1: TIB_ActionSearch; |
|
IB_ActionCount1: TIB_ActionCount; |
|
BG48: TPngImageList; |
|
FG32: TPngImageList; |
|
FG24: TPngImageList; |
|
PngImageList32: TPngImageList; |
|
png24_ActList: TPngImageList; |
|
act_Menu: TAction; |
|
btnMenu: TPngSpeedButton; |
|
MadExcept: TMadExceptionHandler; |
|
N17: TMenuItem; |
|
Toolbar3: TJvPanel; |
|
Toolbar4: TJvPanel; |
|
DatasetPanel: TJvPanel; |
|
JvToolBar1: TJvToolBar; |
|
Panel4: TPanel; |
|
ToolButton1: TToolButton; |
|
DSInfoPanel: TPanel; |
|
JvToolBar2: TJvToolBar; |
|
Panel3: TPanel; |
|
ToolButton2: TToolButton; |
|
IB_UtilityBar1: TIB_UtilityBar; |
|
DataSetToolbar: TJvToolBar; |
|
ubPanel: TPanel; |
|
ToolButton3: TToolButton; |
|
IB_UB: TIB_UpdateBar; |
|
ToolButton4: TToolButton; |
|
IB_NB: TIB_NavigationBar; |
|
ToolButton5: TToolButton; |
|
IB_SB: TIB_SearchBar; |
|
Bevel4: TBevel; |
|
PngColl: TPngImageCollection; |
|
IconPanel: TJvPanel; |
|
BackGroundGradient: TGradient; |
|
PanelImage: TImage; |
|
Bevel2: TBevel; |
|
Bevel3: TBevel; |
|
ubPanelBG: TGradient; |
|
ubPanelLabel: TJvLabel; |
|
SysdbaBlinkLabel: TJvBehaviorLabel; |
|
ToolButton6: TToolButton; |
|
FlexiNotizMenu: TMenuItem; |
|
N18: TMenuItem; |
|
FontGro1: TMenuItem; |
|
N19: TMenuItem; |
|
N16: TMenuItem; |
|
N24: TMenuItem; |
|
Skalierung1: TMenuItem; |
|
shpStatusPanel: TShape; |
|
act_FlexiNotiz: TAction; |
|
act_FlexiHelp: TAction; |
|
menu_FlexiHelp: TMenuItem; |
|
act_TV_Pohl: TAction; |
|
act_TV_Wetter: TAction; |
|
eamViewerWetter1: TMenuItem; |
|
menuCoverage: TMenuItem; |
|
menuLinkBar: TMenuItem; |
|
act_Linkbar: TAction; |
|
pnlLinkbar: TPanel; |
|
splitterLink: TRxSplitter; |
|
menuTestDruck: TMenuItem; |
 |
FOnLMSExecute: TNotifyEvent; |
|
FOnMenuInfo: TNotifyEvent; |
|
FOnIdle2000: TNotifyEvent; |
|
FFirstActivated: Boolean; |
|
FGerlingen: Boolean; |
|
FCommandLines: TStringList; |
|
FFlexiMenuShortCuts: string; |
|
FLastMDIChildCount: integer; |
|
FFirst: Boolean; |
|
FMDILoading: Boolean; |
|
FInActiveFormChanged: Boolean; |
|
FMenuCalled: Boolean; |
|
vl_an: Boolean; |
|
FDBChange: Boolean; |
|
FItemListCreated: Boolean; |
|
Active_ReportViewer: TReportViewer; |
|
PrevForm: TForm; |
|
PrevControl: TWinControl; |
|
FImageIndex: Integer; |
|
FImageList: TImageList; |
|
MSG_ID: Integer; |
|
MSG_Kdnr: Integer; |
|
MSG_Kontakt: Integer; |
Methoden
|
procedure Act_Execute(Sender: TObject); |
|
procedure AppEventsActiveFormChange(Sender: TObject); |
|
procedure FormClose(Sender: TObject; var Action: TCloseAction); |
|
procedure Bearbeiten1Click(Sender: TObject); |
|
procedure Anfang1Click(Sender: TObject); |
|
procedure Zeige_Fenster(aFenster: Integer; aNr: string); |
|
procedure ClickNext(Sender: TObject); |
|
procedure PanelResize(Sender: TObject); |
|
procedure IB_UBButtonsStateChanged(Sender: TObject); |
|
procedure SQLText1Click(Sender: TObject); |
|
procedure Druck1Click(Sender: TObject); |
|
procedure TabellenDruck1Click(Sender: TObject); |
|
procedure SearchPanelDblClick(Sender: TObject); |
|
procedure Update_WindowList(c: Integer; fenster: TForm); |
|
procedure olbOutlookList1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); |
|
procedure MenuItemClick(Sender: TObject); |
|
procedure Gerlingen1Click(Sender: TObject); |
|
procedure Bildschirmdrucken1Click(Sender: TObject); |
|
procedure menuSysdbaClick(Sender: TObject); |
|
procedure Einstellungen1Click(Sender: TObject); |
|
procedure Automatische1Click(Sender: TObject); |
|
procedure GridLayout1Click(Sender: TObject); |
|
procedure FormActivate(Sender: TObject); |
|
procedure menu_HilfeClick(Sender: TObject); |
|
procedure ModulanzeigeBtnClick(Sender: TObject); |
|
function CallFlexiReport(Nr: integer; ShowForm: Boolean; var Report_Main: TFlexiReport; var Report_Child: TReportChild): Boolean; |
|
procedure menuOptionenClick(Sender: TObject); |
|
procedure LMSBeforeExecute(Sender: TObject); |
|
procedure LMSBeforeLogin(Sender: TObject); |
|
procedure LMSGetDBNames(Sender: TObject); |
|
procedure LMSSetShortCut(aSender: TObject; aItemList: string); |
|
procedure DoPreiskalk(Kdnr, Sonpr_nr: Integer); |
|
procedure DoPreiskalkRueck(Kdnr, Sonpr_nr: Integer); |
|
procedure DoGelangensbest(Kdnr: Integer; KDaten: string); |
|
procedure LMSChangeLayout(Sender: TObject); |
|
procedure LMSCheckLogin(sender: TObject; aUserName, aPassword, aDatabaseName, DBRealName, NewPassword1, NewPassword2: string; var LoggedIn: Boolean); |
|
function GetGp: string; |
|
function CheckUserExists(gp: string): Boolean; |
|
procedure pw1Click(Sender: TObject); |
|
procedure FormKeyPress(Sender: TObject; var Key: Char); |
|
procedure ubPanelClick(Sender: TObject); |
|
procedure Reset_ubPanel; |
|
procedure CustomPreview(aReport: TFrReport); |
|
procedure CustomPreview2(var aReport: TFrCompositeReport); |
|
procedure Lohnabschluss(Sender: TObject); |
|
procedure MessageFormClose(Sender: TObject; var Action: TCloseAction); |
|
procedure BtnStatEdiClick(Sender: TObject); |
|
procedure IB_SBRowCount(Sender: TObject; aRowCount: Integer); |
|
procedure estfunktionen1Click(Sender: TObject); |
|
procedure LMSMenuWindowClose(Sender: TObject); |
|
procedure LMSMenuWindowShow(Sender: TObject); |
|
procedure PU1Click(Sender: TObject); |
|
procedure Shutdown1Click(Sender: TObject); |
|
procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean); |
|
procedure Pausenzeitverrechnung1Click(Sender: TObject); |
|
procedure dsTaskBarAddButton(Sender: TObject; Button: TTaskBarButton); |
|
procedure menu_FehlerSimulationClick(Sender: TObject); |
|
function isRefaMann: Boolean; |
|
function AppDataDir: string; |
|
procedure PanelImageDblClick(Sender: TObject); |
|
procedure LMSItemExecute(Sender: TObject); |
|
procedure LMSDockingChanged(Sender: TObject); |
|
function FlexiNotizisForm(s: string): Boolean; |
|
procedure FlexiNotizlog(aDataset: TIB_Dataset); |
|
procedure FontGro1Click(Sender: TObject); |
|
procedure Skalierung1Click(Sender: TObject); |
|
procedure ResetFakturierung(Sender: TObject); |
|
procedure MadExceptException(const exceptIntf: IMEException; var handled: Boolean); |
|
procedure act_FlexiNotizExecute(Sender: TObject); |
|
procedure act_FlexiHelpExecute(Sender: TObject); |
|
procedure act_TV_PohlExecute(Sender: TObject); |
|
procedure act_TV_WetterExecute(Sender: TObject); |
|
procedure menuCoverageClick(Sender: TObject); |
|
procedure act_MenuExecute(Sender: TObject); |
|
procedure menuTestDruckClick(Sender: TObject); |
|
procedure LMSPortal(Sender: TObject); |
|
function ErzeugeFenster(aFenster: TComponentClass; aID: Integer; aOwner: TForm = nil; aModal: Boolean = false): TForm; |
|
procedure FlexiMenu_ShowDelayed; |
|
function CheckShortCut(aPolicy: TPolicy): TShortCut; |
|
procedure DoCheckItemList; |
|
function CheckCategoryLine(aCategoryLine: string): Boolean; |
|
procedure DoExecTBot; |
|
procedure DoExecTBotLogin; |
|
function RenameLog(aPrefix, aFileName: string): string; |
|
procedure DoExecLogFiles; |
|
procedure DoExecLogFile(aPrefix, aFileName: string); |
|
function IsActiveChild(aFenster: TComponentClass; aID: integer; aModal: Boolean; var aForm: TForm): boolean; |
|
procedure DoFormActivate; |
|
procedure DoCheckCommandLine; |
|
procedure DoCheckDoc4NewRelease; |
|
procedure DoShowLinkbar; |
|
procedure DoShowMenu; |
|
procedure DoExecLMSItem; |
|
procedure FlexiMenu_Toggle; |
|
procedure SetCommandLine(const aValue: string); |
|
function GetLinkfromForm(aForm: TForm; aLink2HTML: Boolean = false): string; |
|
function GetLinkfromAllForms(aLink2HTML: Boolean = false): string; |
|
constructor Create(aOwner: TComponent); override; |
|
destructor Destroy; override; |
|
procedure InitForm; |
|
procedure AutologinExec; |
|
procedure DoSetPanelImageIcon(aImageID: Integer = -1); |
|
procedure DoOnMDIClose; |
|
function FlexiMenuShortCuts: string; |
|
procedure DoOnNotification(aType: TFS_Notification; aMsg: string); |
|
procedure DoShowHelp(aHelpUrl: string = ''); |
|
function GetLogoBitmap: TBitmap; |
|
function GetLogoNBitmap: TBitmap; |
|
procedure HandleFormStorages; |
|
procedure DoExecMenuFunction(aId: Integer); |
Eigenschaften
|
property OnLMSExecute: TNotifyEvent read FOnLMSExecute write FOnLMSExecute; |
|
property OnIdle2000: TNotifyEvent read FOnIdle2000 write FOnIdle2000; |
|
property OnMenuInfo: TNotifyEvent read FOnMenuInfo write FOnMenuInfo; |
Beschreibung
Felder
|
MainMenu: TJvMainMenu; |
|
Datei2: TMenuItem; |
|
Beenden2: TMenuItem; |
|
Bearbeiten1: TMenuItem; |
|
Ausschneiden1: TMenuItem; |
|
Kopieren1: TMenuItem; |
|
Einfgen1: TMenuItem; |
|
Window1: TMenuItem; |
|
M_WindowTileVertical1: TMenuItem; |
|
M_WindowCascade1: TMenuItem; |
|
Hilfe2: TMenuItem; |
|
menu_Hilfe: TMenuItem; |
|
men_Info: TMenuItem; |
|
M_WindowTileHorizontal1: TMenuItem; |
|
M_WindowArrange1: TMenuItem; |
|
M_Anmelden: TMenuItem; |
|
N1: TMenuItem; |
|
Anfang1: TMenuItem; |
|
sprung1: TMenuItem; |
|
Navigation1: TMenuItem; |
|
zurueck1: TMenuItem; |
|
N6: TMenuItem; |
|
weiter1: TMenuItem; |
|
sprung2: TMenuItem; |
|
Ende1: TMenuItem; |
|
N9: TMenuItem; |
|
Datensatz1: TMenuItem; |
|
Einfuegen1: TMenuItem; |
|
Edit1: TMenuItem; |
|
Loeschen1: TMenuItem; |
|
N10: TMenuItem; |
|
Verwerfen1: TMenuItem; |
|
N12: TMenuItem; |
|
Refresh1: TMenuItem; |
|
N13: TMenuItem; |
|
M_Modulleiste: TMenuItem; |
|
DatensatzInfo1: TMenuItem; |
|
menuOptionen: TMenuItem; |
|
Toolbar2: TMenuItem; |
|
N4: TMenuItem; |
|
Suchen1: TMenuItem; |
|
Sortierung1: TMenuItem; |
|
Anzahl1: TMenuItem; |
|
SQLText1: TMenuItem; |
|
Druck1: TMenuItem; |
|
TabellenDruck1: TMenuItem; |
|
Gerlingen1: TMenuItem; |
|
Schnellsuche1: TMenuItem; |
|
N5: TMenuItem; |
|
Bildschirmdrucken1: TMenuItem; |
|
FormStorage1: TFormStorage; |
|
ImageList1: TImageList; |
|
menuSysdba: TMenuItem; |
|
Mehr1: TMenuItem; |
|
N14: TMenuItem; |
|
Einstellungen1: TMenuItem; |
|
N21: TMenuItem; |
|
Einstellungen2: TMenuItem; |
|
N22: TMenuItem; |
|
M_TabellenLayout: TMenuItem; |
|
SQLTextvollst1: TMenuItem; |
|
N20: TMenuItem; |
|
Finden1: TMenuItem; |
|
Drucken1: TMenuItem; |
|
FlexiReport2: TMenuItem; |
|
N2: TMenuItem; |
|
ImageList3: TImageList; |
|
pnlTop: TPanel; |
|
Panel2: TPanel; |
|
ToolPanel: TPanel; |
|
frDesigner: TfrDesigner; |
|
RightManager: TIBP_RightManager; |
|
Profiles: TIBP_Profiles; |
|
FlexiAdminMnu: TMenuItem; |
|
LMS: TIBP_LMS; |
|
pw1: TMenuItem; |
|
HotkeyfrMensystem1: TMenuItem; |
|
Bevel1: TBevel; |
|
BottomPanel: TPanel; |
|
pnlMenu: TPanel; |
|
Panel10: TPanel; |
|
Panel12: TPanel; |
|
Panel13: TPanel; |
|
pnlStatusFooter: TPanel; |
|
Panel15: TPanel; |
|
BtnStatEdi: TColor95Button; |
|
BtnOTStat: TColor95Button; |
|
BtnFakStat: TColor95Button; |
|
ImageList2: TImageList; |
|
AppEvents: TJvAppEvents; |
|
estfunktionen1: TMenuItem; |
|
SQLBefehle1: TMenuItem; |
|
menu_FehlerSimulation: TMenuItem; |
|
ActionList: TActionList; |
|
EditCut1: TEditCut; |
|
EditCopy1: TEditCopy; |
|
EditPaste1: TEditPaste; |
|
N11: TMenuItem; |
|
Pausenzeitverrechnung1: TMenuItem; |
|
PngImageList48: TPngImageList; |
|
PngImageList24: TPngImageList; |
|
dsTaskBar: TdsTaskBar; |
|
FilePrintSetup1: TFilePrintSetup; |
|
FilePageSetup1: TFilePageSetup; |
|
FileRun1: TFileRun; |
|
Act_FileExit: TFileExit; |
|
Act_Anmelden: TAction; |
|
Act_Modulleiste: TAction; |
|
Act_DSInfo: TAction; |
|
Act_TabellenLayout: TAction; |
|
WindowCascade1: TWindowCascade; |
|
WindowTileHorizontal1: TWindowTileHorizontal; |
|
WindowTileVertical1: TWindowTileVertical; |
|
WindowArrange1: TWindowArrange; |
|
IB_ActionFirst1: TIB_ActionFirst; |
|
IB_ActionPrior1: TIB_ActionPrior; |
|
IB_ActionNext1: TIB_ActionNext; |
|
IB_ActionLast1: TIB_ActionLast; |
|
IB_ActionEdit1: TIB_ActionEdit; |
|
IB_ActionNew1: TIB_ActionNew; |
|
IB_ActionPost1: TIB_ActionPost; |
|
IB_ActionCancel1: TIB_ActionCancel; |
|
IB_ActionDelete1: TIB_ActionDelete; |
|
IB_ActionRefresh1: TIB_ActionRefresh; |
|
IB_ActionRefreshKeys1: TIB_ActionRefreshKeys; |
|
IB_ActionRefreshRows1: TIB_ActionRefreshRows; |
|
IB_ActionAppend1: TIB_ActionAppend; |
|
IB_ActionOrder1: TIB_ActionOrder; |
|
IB_ActionSearch1: TIB_ActionSearch; |
|
IB_ActionCount1: TIB_ActionCount; |
|
BG48: TPngImageList; |
|
FG32: TPngImageList; |
|
FG24: TPngImageList; |
|
PngImageList32: TPngImageList; |
|
png24_ActList: TPngImageList; |
|
act_Menu: TAction; |
|
btnMenu: TPngSpeedButton; |
|
MadExcept: TMadExceptionHandler; |
|
N17: TMenuItem; |
|
Toolbar3: TJvPanel; |
|
Toolbar4: TJvPanel; |
|
DatasetPanel: TJvPanel; |
|
JvToolBar1: TJvToolBar; |
|
Panel4: TPanel; |
|
ToolButton1: TToolButton; |
|
DSInfoPanel: TPanel; |
|
JvToolBar2: TJvToolBar; |
|
Panel3: TPanel; |
|
ToolButton2: TToolButton; |
|
IB_UtilityBar1: TIB_UtilityBar; |
|
DataSetToolbar: TJvToolBar; |
|
ubPanel: TPanel; |
|
ToolButton3: TToolButton; |
|
IB_UB: TIB_UpdateBar; |
|
ToolButton4: TToolButton; |
|
IB_NB: TIB_NavigationBar; |
|
ToolButton5: TToolButton; |
|
IB_SB: TIB_SearchBar; |
|
Bevel4: TBevel; |
|
PngColl: TPngImageCollection; |
|
IconPanel: TJvPanel; |
|
BackGroundGradient: TGradient; |
|
PanelImage: TImage; |
|
Bevel2: TBevel; |
|
Bevel3: TBevel; |
|
ubPanelBG: TGradient; |
|
ubPanelLabel: TJvLabel; |
|
SysdbaBlinkLabel: TJvBehaviorLabel; |
|
ToolButton6: TToolButton; |
|
FlexiNotizMenu: TMenuItem; |
|
N18: TMenuItem; |
|
FontGro1: TMenuItem; |
|
N19: TMenuItem; |
|
N16: TMenuItem; |
|
N24: TMenuItem; |
|
Skalierung1: TMenuItem; |
|
shpStatusPanel: TShape; |
|
act_FlexiNotiz: TAction; |
|
act_FlexiHelp: TAction; |
|
menu_FlexiHelp: TMenuItem; |
|
act_TV_Pohl: TAction; |
|
act_TV_Wetter: TAction; |
|
eamViewerWetter1: TMenuItem; |
|
menuCoverage: TMenuItem; |
|
menuLinkBar: TMenuItem; |
|
act_Linkbar: TAction; |
|
pnlLinkbar: TPanel; |
|
splitterLink: TRxSplitter; |
|
menuTestDruck: TMenuItem; |
|
FOnLMSExecute: TNotifyEvent; |
|
FOnMenuInfo: TNotifyEvent; |
|
FOnIdle2000: TNotifyEvent; |
|
FFirstActivated: Boolean; |
|
FGerlingen: Boolean; |
|
FCommandLines: TStringList; |
|
FFlexiMenuShortCuts: string; |
|
FLastMDIChildCount: integer; |
|
FFirst: Boolean; |
|
FMDILoading: Boolean; |
|
FInActiveFormChanged: Boolean; |
|
FMenuCalled: Boolean; |
|
vl_an: Boolean; |
|
FDBChange: Boolean; |
|
FItemListCreated: Boolean; |
|
Active_ReportViewer: TReportViewer; |
|
PrevForm: TForm; |
|
PrevControl: TWinControl; |
|
FImageIndex: Integer; |
|
FFlexiPortal: TFrame_FlexiPortal; | |
|
FImageList: TImageList; |
|
MSG_ID: Integer; |
|
MSG_Kdnr: Integer; |
|
MSG_Kontakt: Integer; |
Methoden
|
procedure Act_Execute(Sender: TObject); |
|
procedure AppEventsActiveFormChange(Sender: TObject); |
|
procedure FormClose(Sender: TObject; var Action: TCloseAction); |
|
procedure Bearbeiten1Click(Sender: TObject); |
|
procedure Anfang1Click(Sender: TObject); |
|
procedure Zeige_Fenster(aFenster: Integer; aNr: string); |
|
procedure ClickNext(Sender: TObject); |
|
procedure PanelResize(Sender: TObject); |
|
procedure IB_UBButtonsStateChanged(Sender: TObject); |
|
procedure SQLText1Click(Sender: TObject); |
|
procedure Druck1Click(Sender: TObject); |
|
procedure TabellenDruck1Click(Sender: TObject); |
|
procedure SearchPanelDblClick(Sender: TObject); |
|
procedure Update_WindowList(c: Integer; fenster: TForm); |
|
procedure olbOutlookList1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); |
|
procedure MenuItemClick(Sender: TObject); |
|
procedure Gerlingen1Click(Sender: TObject); |
|
procedure Bildschirmdrucken1Click(Sender: TObject); |
|
procedure menuSysdbaClick(Sender: TObject); |
|
procedure Einstellungen1Click(Sender: TObject); |
|
procedure Automatische1Click(Sender: TObject); |
|
procedure GridLayout1Click(Sender: TObject); |
|
procedure FormActivate(Sender: TObject); |
|
procedure menu_HilfeClick(Sender: TObject); |
|
procedure ModulanzeigeBtnClick(Sender: TObject); |
|
function CallFlexiReport(Nr: integer; ShowForm: Boolean; var Report_Main: TFlexiReport; var Report_Child: TReportChild): Boolean; |
|
procedure menuOptionenClick(Sender: TObject); |
|
procedure LMSBeforeExecute(Sender: TObject); |
|
procedure LMSBeforeLogin(Sender: TObject); |
|
procedure LMSGetDBNames(Sender: TObject); |
|
procedure LMSSetShortCut(aSender: TObject; aItemList: string); |
|
procedure DoPreiskalk(Kdnr, Sonpr_nr: Integer); |
|
procedure DoPreiskalkRueck(Kdnr, Sonpr_nr: Integer); |
|
procedure DoGelangensbest(Kdnr: Integer; KDaten: string); |
|
procedure LMSChangeLayout(Sender: TObject); |
|
Mü06.12.2017 | |
|
procedure LMSCheckLogin(sender: TObject; aUserName, aPassword, aDatabaseName, DBRealName, NewPassword1, NewPassword2: string; var LoggedIn: Boolean); |
|
function GetGp: string; |
|
function CheckUserExists(gp: string): Boolean; |
|
procedure pw1Click(Sender: TObject); |
|
procedure FormKeyPress(Sender: TObject; var Key: Char); |
|
procedure ubPanelClick(Sender: TObject); |
|
procedure Reset_ubPanel; |
|
procedure CustomPreview(aReport: TFrReport); |
|
procedure CustomPreview2(var aReport: TFrCompositeReport); |
|
procedure Lohnabschluss(Sender: TObject); |
|
procedure MessageFormClose(Sender: TObject; var Action: TCloseAction); |
|
procedure BtnStatEdiClick(Sender: TObject); |
|
procedure IB_SBRowCount(Sender: TObject; aRowCount: Integer); |
|
procedure estfunktionen1Click(Sender: TObject); |
|
procedure LMSMenuWindowClose(Sender: TObject); |
|
PROCEDURE LMSPortal(Sender: TObject); | |
|
procedure LMSMenuWindowShow(Sender: TObject); |
|
procedure PU1Click(Sender: TObject); |
|
procedure Shutdown1Click(Sender: TObject); |
|
procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean); |
|
procedure Pausenzeitverrechnung1Click(Sender: TObject); |
|
procedure dsTaskBarAddButton(Sender: TObject; Button: TTaskBarButton); |
|
procedure menu_FehlerSimulationClick(Sender: TObject); |
|
function isRefaMann: Boolean; |
|
function AppDataDir: string; |
|
procedure PanelImageDblClick(Sender: TObject); |
|
procedure LMSItemExecute(Sender: TObject); |
|
procedure LMSDockingChanged(Sender: TObject); |
|
function FlexiNotizisForm(s: string): Boolean; |
|
procedure FlexiNotizlog(aDataset: TIB_Dataset); |
|
procedure FontGro1Click(Sender: TObject); |
|
PROCEDURE CheckFlexiNotiz; PROCEDURE FlexiNotizTimerTimer(Sender: TObject); | |
|
procedure Skalierung1Click(Sender: TObject); |
|
procedure ResetFakturierung(Sender: TObject); |
|
procedure MadExceptException(const exceptIntf: IMEException; var handled: Boolean); |
|
procedure act_FlexiNotizExecute(Sender: TObject); |
|
procedure act_FlexiHelpExecute(Sender: TObject); |
|
procedure act_TV_PohlExecute(Sender: TObject); |
|
procedure act_TV_WetterExecute(Sender: TObject); |
|
procedure menuCoverageClick(Sender: TObject); |
|
procedure act_MenuExecute(Sender: TObject); |
|
procedure menuTestDruckClick(Sender: TObject); |
|
procedure LMSPortal(Sender: TObject); |
|
function ErzeugeFenster(aFenster: TComponentClass; aID: Integer; aOwner: TForm = nil; aModal: Boolean = false): TForm; |
|
procedure FlexiMenu_ShowDelayed; |
|
PROCEDURE NotifySecondInstance(VAR WinMsg: TMessage); MESSAGE WM_USER + 2; | |
|
function CheckShortCut(aPolicy: TPolicy): TShortCut; |
|
procedure DoCheckItemList; |
|
function CheckCategoryLine(aCategoryLine: string): Boolean; |
|
procedure DoExecTBot; |
|
procedure DoOnRefreshLMS(aSender: TObject); | |
|
procedure DoExecTBotLogin; |
|
function RenameLog(aPrefix, aFileName: string): string; |
|
procedure DoExecLogFiles; |
|
procedure DoExecLogFile(aPrefix, aFileName: string); |
|
function IsActiveChild(aFenster: TComponentClass; aID: integer; aModal: Boolean; var aForm: TForm): boolean; |
|
procedure DoFormActivate; |
|
procedure DoCheckCommandLine; |
|
procedure DoCheckDoc4NewRelease; |
|
procedure DoShowLinkbar; |
|
procedure DoShowMenu; |
|
procedure DoExecLMSItem; |
|
procedure FlexiMenu_Toggle; |
|
procedure SetCommandLine(const aValue: string); |
|
function GetLinkfromForm(aForm: TForm; aLink2HTML: Boolean = false): string; |
|
function GetLinkfromAllForms(aLink2HTML: Boolean = false): string; |
|
constructor Create(aOwner: TComponent); override; |
|
destructor Destroy; override; |
|
procedure InitForm; |
|
procedure AutologinExec; |
|
procedure DoSetPanelImageIcon(aImageID: Integer = -1); |
|
procedure DoOnMDIClose; |
|
function FlexiMenuShortCuts: string; |
|
procedure DoOnNotification(aType: TFS_Notification; aMsg: string); |
|
procedure DoShowHelp(aHelpUrl: string = ''); |
|
function GetLogoBitmap: TBitmap; |
|
function GetLogoNBitmap: TBitmap; |
|
procedure HandleFormStorages; |
|
procedure DoExecMenuFunction(aId: Integer); |
Eigenschaften
|
property OnLMSExecute: TNotifyEvent read FOnLMSExecute write FOnLMSExecute; |
|
property OnIdle2000: TNotifyEvent read FOnIdle2000 write FOnIdle2000; |
|
property OnMenuInfo: TNotifyEvent read FOnMenuInfo write FOnMenuInfo; |
Erstellt mit PasDoc 0.16.0.