wwintl.hpp

胜天进销存源码,国产优秀的进销存

};


class DELPHICLASS TwwMonthCalendarIntl;
class PASCALIMPLEMENTATION TwwMonthCalendarIntl : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	AnsiString FPopupYearLabel;
	AnsiString FEnterYearPrompt;
	
__published:
	__property AnsiString PopupYearLabel = {read=FPopupYearLabel, write=FPopupYearLabel};
	__property AnsiString EnterYearPrompt = {read=FEnterYearPrompt, write=FEnterYearPrompt};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TwwMonthCalendarIntl(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TwwMonthCalendarIntl(void) : Classes::TPersistent() { }
	#pragma option pop
	
};


class DELPHICLASS TwwLocateDialogIntl;
class PASCALIMPLEMENTATION TwwLocateDialogIntl : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	AnsiString FFieldValueLabel;
	AnsiString FSearchTypeLabel;
	AnsiString FCaseSensitiveLabel;
	AnsiString FMatchExactLabel;
	AnsiString FMatchStartLabel;
	AnsiString FMatchAnyLabel;
	AnsiString FFieldsLabel;
	AnsiString FButtonFirst;
	AnsiString FButtonNext;
	AnsiString FButtonCancel;
	AnsiString FButtonClose;
	AnsiString FFieldValueHint;
	AnsiString FCaseSensitiveHint;
	AnsiString FMatchExactHint;
	AnsiString FMatchStartHint;
	AnsiString FMatchAnyHint;
	AnsiString FButtonFirstHint;
	AnsiString FButtonNextHint;
	AnsiString FFieldNameHint;
	
__published:
	__property AnsiString FieldValueLabel = {read=FFieldValueLabel, write=FFieldValueLabel};
	__property AnsiString SearchTypeLabel = {read=FSearchTypeLabel, write=FSearchTypeLabel};
	__property AnsiString CaseSensitiveLabel = {read=FCaseSensitiveLabel, write=FCaseSensitiveLabel};
	__property AnsiString MatchExactLabel = {read=FMatchExactLabel, write=FMatchExactLabel};
	__property AnsiString MatchStartLabel = {read=FMatchStartLabel, write=FMatchStartLabel};
	__property AnsiString MatchAnyLabel = {read=FMatchAnyLabel, write=FMatchAnyLabel};
	__property AnsiString FieldsLabel = {read=FFieldsLabel, write=FFieldsLabel};
	__property AnsiString BtnFirst = {read=FButtonFirst, write=FButtonFirst};
	__property AnsiString BtnNext = {read=FButtonNext, write=FButtonNext};
	__property AnsiString BtnCancel = {read=FButtonCancel, write=FButtonCancel};
	__property AnsiString BtnClose = {read=FButtonClose, write=FButtonClose};
	__property AnsiString FieldValueHint = {read=FFieldValueHint, write=FFieldValueHint};
	__property AnsiString CaseSensitiveHint = {read=FCaseSensitiveHint, write=FCaseSensitiveHint};
	__property AnsiString MatchExactHint = {read=FMatchExactHint, write=FMatchExactHint};
	__property AnsiString MatchStartHint = {read=FMatchStartHint, write=FMatchStartHint};
	__property AnsiString MatchAnyHint = {read=FMatchAnyHint, write=FMatchAnyHint};
	__property AnsiString BtnFirstHint = {read=FButtonFirstHint, write=FButtonFirstHint};
	__property AnsiString BtnNextHint = {read=FButtonNextHint, write=FButtonNextHint};
	__property AnsiString FieldNameHint = {read=FFieldNameHint, write=FFieldNameHint};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TwwLocateDialogIntl(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TwwLocateDialogIntl(void) : Classes::TPersistent() { }
	#pragma option pop
	
};


class DELPHICLASS TwwDBNavigatorIntlHints;
class PASCALIMPLEMENTATION TwwDBNavigatorIntlHints : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	AnsiString FFirstHint;
	AnsiString FPriorHint;
	AnsiString FNextHint;
	AnsiString FLastHint;
	AnsiString FInsertHint;
	AnsiString FDeleteHint;
	AnsiString FEditHint;
	AnsiString FPostHint;
	AnsiString FCancelHint;
	AnsiString FRefreshHint;
	AnsiString FPriorPageHint;
	AnsiString FNextPageHint;
	AnsiString FSaveBookmarkHint;
	AnsiString FRestoreBookmarkHint;
	AnsiString FRecordViewDialogHint;
	AnsiString FLocateDialogHint;
	AnsiString FFilterDialogHint;
	AnsiString FSearchDialogHint;
	
public:
	__fastcall TwwDBNavigatorIntlHints(void);
	
__published:
	__property AnsiString FirstHint = {read=FFirstHint, write=FFirstHint};
	__property AnsiString PriorHint = {read=FPriorHint, write=FPriorHint};
	__property AnsiString NextHint = {read=FNextHint, write=FNextHint};
	__property AnsiString LastHint = {read=FLastHint, write=FLastHint};
	__property AnsiString InsertHint = {read=FInsertHint, write=FInsertHint};
	__property AnsiString DeleteHint = {read=FDeleteHint, write=FDeleteHint};
	__property AnsiString EditHint = {read=FEditHint, write=FEditHint};
	__property AnsiString PostHint = {read=FPostHint, write=FPostHint};
	__property AnsiString CancelHint = {read=FCancelHint, write=FCancelHint};
	__property AnsiString RefreshHint = {read=FRefreshHint, write=FRefreshHint};
	__property AnsiString PriorPageHint = {read=FPriorPageHint, write=FPriorPageHint};
	__property AnsiString NextPageHint = {read=FNextPageHint, write=FNextPageHint};
	__property AnsiString SaveBookmarkHint = {read=FSaveBookmarkHint, write=FSaveBookmarkHint};
	__property AnsiString RestoreBookmarkHint = {read=FRestoreBookmarkHint, write=FRestoreBookmarkHint};
	__property AnsiString RecordViewDialogHint = {read=FRecordViewDialogHint, write=FRecordViewDialogHint};
	__property AnsiString LocateDialogHint = {read=FLocateDialogHint, write=FLocateDialogHint};
	__property AnsiString FilterDialogHint = {read=FFilterDialogHint, write=FFilterDialogHint};
	__property AnsiString SearchDialogHint = {read=FSearchDialogHint, write=FSearchDialogHint};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TwwDBNavigatorIntlHints(void) { }
	#pragma option pop
	
};


class DELPHICLASS TwwADOIntl;
class PASCALIMPLEMENTATION TwwADOIntl : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	bool FUseLocateWhenFindingValue;
	
__published:
	__property bool UseLocateWhenFindingValue = {read=FUseLocateWhenFindingValue, write=FUseLocateWhenFindingValue, default=1};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TwwADOIntl(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TwwADOIntl(void) : Classes::TPersistent() { }
	#pragma option pop
	
};


class DELPHICLASS TwwDBNavigatorIntl;
class PASCALIMPLEMENTATION TwwDBNavigatorIntl : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	AnsiString FConfirmDeleteMessage;
	TwwDBNavigatorIntlHints* FHints;
	
public:
	__fastcall TwwDBNavigatorIntl(void);
	__fastcall virtual ~TwwDBNavigatorIntl(void);
	
__published:
	__property AnsiString ConfirmDeleteMessage = {read=FConfirmDeleteMessage, write=FConfirmDeleteMessage};
	__property TwwDBNavigatorIntlHints* Hints = {read=FHints, write=FHints};
};


#pragma option push -b-
enum TwwCheckBoxInGridStyle { cbStyleAuto, cbStyleCheckmark, cbStyleXmark, cbStyleCheckmarkFlat };
#pragma option pop

#pragma option push -b-
enum TwwGridPaintStyle { gpsBitmapCanvas, gpsDynamicDeviceContext };
#pragma option pop

class DELPHICLASS TwwIntl;
class PASCALIMPLEMENTATION TwwIntl : public Classes::TComponent 
{
	typedef Classes::TComponent inherited;
	
private:
	TwwADOIntl* FADO;
	TwwDBNavigatorIntl* FNavigator;
	TwwSearchDialogIntl* FSearchDialog;
	TwwLocateDialogIntl* FLocateDialog;
	TwwMonthCalendarIntl* FMonthCalendar;
	bool FOKCancelBitmapped;
	Graphics::TFontStyles FDialogFontStyle;
	AnsiString FBtnOKCaption;
	AnsiString FBtnCancelCaption;
	bool FConnected;
	TwwUserMessagesIntl* FUserMessages;
	TwwFilterDialogIntl* FFilterDialog;
	TwwValidationFeedback* FValidationFeedback;
	TwwDBRichEditIntl* FRichEdit;
	AnsiString FIPVersion;
	AnsiString FIniFileName;
	AnsiString FRegistrationNo;
	bool FFastSQLCancelRange;
	TwwCheckBoxInGridStyle FCheckBoxInGridStyle;
	TwwGridPaintStyle FGridPaintStyle;
	bool FUseLocateMethodForSearch;
	int FDefaultEpochYear;
	int FFilterMemoSize;
	TwwPictureValidationError FOnValidationErrorUsingMask;
	void __fastcall SetConnected(bool val);
	void __fastcall SetIPVersion(AnsiString val);
	void __fastcall SetRegistrationNo(AnsiString val);
	void __fastcall SetCheckboxInGridStyle(TwwCheckBoxInGridStyle val);
	void __fastcall SetGridPaintStyle(TwwGridPaintStyle val);
	
protected:
	virtual void __fastcall Loaded(void);
	void __fastcall Connect(void);
	
public:
	__fastcall virtual TwwIntl(Classes::TComponent* AOwner);
	__fastcall virtual ~TwwIntl(void);
	virtual void __fastcall ValidationErrorUsingMask(Classes::TComponent* Component, Db::TField* Field, AnsiString Msg = "");
	__property bool FastSQLCancelRange = {read=FFastSQLCancelRange, write=FFastSQLCancelRange, nodefault};
	
__published:
	__property TwwADOIntl* ADO = {read=FADO, write=FADO};
	__property TwwDBNavigatorIntl* Navigator = {read=FNavigator, write=FNavigator};
	__property TwwSearchDialogIntl* SearchDialog = {read=FSearchDialog, write=FSearchDialog};
	__property TwwLocateDialogIntl* LocateDialog = {read=FLocateDialog, write=FLocateDialog};
	__property TwwMonthCalendarIntl* MonthCalendar = {read=FMonthCalendar, write=FMonthCalendar};
	__property TwwFilterDialogIntl* FilterDialog = {read=FFilterDialog, write=FFilterDialog};
	__property TwwValidationFeedback* ValidationFeedback = {read=FValidationFeedback, write=FValidationFeedback};
	__property TwwDBRichEditIntl* RichEdit = {read=FRichEdit, write=FRichEdit};
	__property TwwUserMessagesIntl* UserMessages = {read=FUserMessages, write=FUserMessages};
	__property bool OKCancelBitmapped = {read=FOKCancelBitmapped, write=FOKCancelBitmapped, nodefault};
	__property AnsiString BtnOKCaption = {read=FBtnOKCaption, write=FBtnOKCaption};
	__property AnsiString BtnCancelCaption = {read=FBtnCancelCaption, write=FBtnCancelCaption};
	__property TwwCheckBoxInGridStyle CheckBoxInGridStyle = {read=FCheckBoxInGridStyle, write=SetCheckboxInGridStyle, nodefault};
	__property TwwGridPaintStyle GridPaintStyle = {read=FGridPaintStyle, write=SetGridPaintStyle, default=1};
	__property AnsiString VersionInfoPower = {read=FIPVersion, write=SetIPVersion};
	__property int FilterMemoSize = {read=FFilterMemoSize, write=FFilterMemoSize, nodefault};
	__property AnsiString IniFileName = {read=FIniFileName, write=FIniFileName};
	__property bool UseLocateMethodForSearch = {read=FUseLocateMethodForSearch, write=FUseLocateMethodForSearch, default=1};
	__property Graphics::TFontStyles DialogFontStyle = {read=FDialogFontStyle, write=FDialogFontStyle, nodefault};
	__property int DefaultEpochYear = {read=FDefaultEpochYear, write=FDefaultEpochYear, default=1950};
	__property AnsiString RegistrationNo = {read=FRegistrationNo, write=SetRegistrationNo};
	__property TwwPictureValidationError OnValidationErrorUsingMask = {read=FOnValidationErrorUsingMask, write=FOnValidationErrorUsingMask};
	__property bool Connected = {read=FConnected, write=SetConnected, nodefault};
};


class DELPHICLASS TwwController;
class PASCALIMPLEMENTATION TwwController : public Classes::TComponent 
{
	typedef Classes::TComponent inherited;
	
private:
	Wwframe::TwwEditFrame* FFrame;
	Wwframe::TwwButtonEffects* FButtonEffects;
	Classes::TList* FControlList;
	
protected:
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	
public:
	__fastcall virtual TwwController(Classes::TComponent* AOwner);
	__fastcall virtual ~TwwController(void);
	void __fastcall ApplyFrame(void);
	void __fastcall AddControl(Controls::TControl* Control);
	void __fastcall RemoveControl(Controls::TControl* Control);
	
__published:
	__property Wwframe::TwwEditFrame* Frame = {read=FFrame, write=FFrame};
	__property Wwframe::TwwButtonEffects* ButtonEffects = {read=FButtonEffects, write=FButtonEffects};
	__property Classes::TList* ControlList = {read=FControlList};
};


//-- var, const, procedure ---------------------------------------------------
extern PACKAGE TwwIntl* wwInternational;
extern PACKAGE void __fastcall Register(void);
extern PACKAGE Classes::TComponent* __fastcall wwCreateCommonButton(Forms::TForm* AOwner, Buttons::TBitBtnKind ButtonKind);

}	/* namespace Wwintl */
using namespace Wwintl;
#pragma pack(pop)
#pragma option pop

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// Wwintl