ieditorbasiccomponents.hpp

Iocomp Ultra Pack v3.0.2 Sources.For.Delphi 数据显示编程插件,可用于工业控制

	__property Visible  = {default=1};
public:
	#pragma option push -w-inl
	/* TCustomComboBox.Destroy */ inline __fastcall virtual ~TiComponentEditorComboBox(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorComboBox(HWND ParentWindow) : Stdctrls::TComboBox(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TiComponentEditorListBox;
class PASCALIMPLEMENTATION TiComponentEditorListBox : public Stdctrls::TCustomListBox 
{
	typedef Stdctrls::TCustomListBox inherited;
	
private:
	TiListBoxGetDataEvent FOnGetData;
	Classes::TNotifyEvent FOnItemMove;
	
protected:
	virtual void __fastcall DrawItem(int Index, const Types::TRect &Rect, Windows::TOwnerDrawState State);
	DYNAMIC void __fastcall DragOver(System::TObject* Source, int X, int Y, Controls::TDragState State, bool &Accept);
	HIDESBASE MESSAGE void __fastcall CNCommand(Messages::TWMCommand &Message);
	MESSAGE void __fastcall WMGetDLGCode(Messages::TMessage &Message);
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	virtual void __fastcall CreateWnd(void);
	DYNAMIC void __fastcall KeyPress(char &Key);
	DYNAMIC void __fastcall DoEnter(void);
	
public:
	__fastcall virtual TiComponentEditorListBox(Classes::TComponent* AOwner);
	DYNAMIC void __fastcall DragDrop(System::TObject* Source, int X, int Y);
	void __fastcall SelectLast(void);
	void __fastcall DeleteSelectedObject(void);
	void __fastcall DeleteObjectIndex(System::TObject* AObject);
	__property Items ;
	
__published:
	__property Enabled  = {default=1};
	__property Font ;
	__property TabOrder  = {default=-1};
	__property TabStop  = {default=1};
	__property Visible  = {default=1};
	__property OnClick ;
	__property OnDblClick ;
	__property Style  = {default=1};
	__property Sorted  = {default=0};
	__property TiListBoxGetDataEvent OnGetData = {read=FOnGetData, write=FOnGetData};
	__property Classes::TNotifyEvent OnItemMove = {read=FOnItemMove, write=FOnItemMove};
	__property OnDrawItem ;
	__property DragMode  = {default=1};
public:
	#pragma option push -w-inl
	/* TCustomListBox.Destroy */ inline __fastcall virtual ~TiComponentEditorListBox(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorListBox(HWND ParentWindow) : Stdctrls::TCustomListBox(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TiComponentEditorColorPicker;
class PASCALIMPLEMENTATION TiComponentEditorColorPicker : public Controls::TCustomControl 
{
	typedef Controls::TCustomControl inherited;
	
private:
	Stdctrls::TButton* FButton;
	Graphics::TColor FColor;
	Classes::TNotifyEvent FOnChange;
	HIDESBASE void __fastcall SetColor(const Graphics::TColor Value);
	
protected:
	void __fastcall OpenVCL(void);
	void __fastcall ButtonClick(System::TObject* Sender);
	virtual void __fastcall Paint(void);
	DYNAMIC void __fastcall DblClick(void);
	DYNAMIC void __fastcall KeyPress(char &Key);
	MESSAGE void __fastcall WMGetDLGCode(Messages::TMessage &Message);
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	DYNAMIC void __fastcall DoEnter(void);
	
public:
	__fastcall virtual TiComponentEditorColorPicker(Classes::TComponent* AOwner);
	virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
	void __fastcall Disable(void);
	void __fastcall Enable(void);
	__property Graphics::TColor Color = {read=FColor, write=SetColor, nodefault};
	
__published:
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property TabOrder  = {default=-1};
public:
	#pragma option push -w-inl
	/* TCustomControl.Destroy */ inline __fastcall virtual ~TiComponentEditorColorPicker(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorColorPicker(HWND ParentWindow) : Controls::TCustomControl(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TiComponentEditorComputerPicker;
class PASCALIMPLEMENTATION TiComponentEditorComputerPicker : public TiComponentEditorButton 
{
	typedef TiComponentEditorButton inherited;
	
private:
	AnsiString FComputerName;
	Classes::TNotifyEvent FOnChange;
	
public:
	__fastcall virtual TiComponentEditorComputerPicker(Classes::TComponent* AOwner);
	DYNAMIC void __fastcall Click(void);
	
__published:
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property AnsiString ComputerName = {read=FComputerName, write=FComputerName};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorComputerPicker(HWND ParentWindow) : TiComponentEditorButton(ParentWindow) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TWinControl.Destroy */ inline __fastcall virtual ~TiComponentEditorComputerPicker(void) { }
	#pragma option pop
	
};


class DELPHICLASS TiComponentEditorFontPicker;
class PASCALIMPLEMENTATION TiComponentEditorFontPicker : public TiComponentEditorButton 
{
	typedef TiComponentEditorButton inherited;
	
private:
	Graphics::TFont* FFont;
	Classes::TNotifyEvent FOnChange;
	
protected:
	void __fastcall OpenVCL(void);
	HIDESBASE void __fastcall SetFont(const Graphics::TFont* Value);
	DYNAMIC void __fastcall KeyPress(char &Key);
	HIDESBASE MESSAGE void __fastcall WMGetDLGCode(Messages::TMessage &Message);
	DYNAMIC void __fastcall DoEnter(void);
	
public:
	__fastcall virtual TiComponentEditorFontPicker(Classes::TComponent* AOwner);
	__fastcall virtual ~TiComponentEditorFontPicker(void);
	DYNAMIC void __fastcall Click(void);
	void __fastcall Disable(void);
	void __fastcall Enable(void);
	__property Graphics::TFont* Font = {read=FFont, write=SetFont};
	
__published:
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorFontPicker(HWND ParentWindow) : TiComponentEditorButton(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TiComponentEditorOpenPicker;
class PASCALIMPLEMENTATION TiComponentEditorOpenPicker : public TiComponentEditorButton 
{
	typedef TiComponentEditorButton inherited;
	
private:
	AnsiString FFileName;
	AnsiString FFilter;
	AnsiString FDefaultExt;
	bool FFileMustExist;
	bool FAllowMultiSelect;
	Classes::TNotifyEvent FOnChange;
	Classes::TStrings* FFiles;
	
protected:
	void __fastcall OpenVCL(void);
	DYNAMIC void __fastcall KeyPress(char &Key);
	DYNAMIC void __fastcall DoEnter(void);
	HIDESBASE MESSAGE void __fastcall WMGetDLGCode(Messages::TMessage &Message);
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	
public:
	__fastcall virtual TiComponentEditorOpenPicker(Classes::TComponent* AOwner);
	__fastcall virtual ~TiComponentEditorOpenPicker(void);
	DYNAMIC void __fastcall Click(void);
	void __fastcall Disable(void);
	void __fastcall Enable(void);
	__property Classes::TStrings* Files = {read=FFiles};
	
__published:
	__property AnsiString FileName = {read=FFileName, write=FFileName};
	__property AnsiString Filter = {read=FFilter, write=FFilter};
	__property AnsiString DefaultExt = {read=FDefaultExt, write=FDefaultExt};
	__property bool FileMustExist = {read=FFileMustExist, write=FFileMustExist, nodefault};
	__property bool AllowMultiSelect = {read=FAllowMultiSelect, write=FAllowMultiSelect, nodefault};
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property Caption ;
	__property Font ;
	__property TabOrder  = {default=-1};
	__property TabStop  = {default=1};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorOpenPicker(HWND ParentWindow) : TiComponentEditorButton(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TiComponentEditorSavePicker;
class PASCALIMPLEMENTATION TiComponentEditorSavePicker : public TiComponentEditorButton 
{
	typedef TiComponentEditorButton inherited;
	
private:
	AnsiString FFileName;
	AnsiString FFilter;
	AnsiString FDefaultExt;
	Classes::TNotifyEvent FOnChange;
	
protected:
	bool __fastcall OpenVCL(void);
	DYNAMIC void __fastcall KeyPress(char &Key);
	DYNAMIC void __fastcall DoEnter(void);
	HIDESBASE MESSAGE void __fastcall WMGetDLGCode(Messages::TMessage &Message);
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	
public:
	__fastcall virtual TiComponentEditorSavePicker(Classes::TComponent* AOwner);
	DYNAMIC void __fastcall Click(void);
	void __fastcall Disable(void);
	void __fastcall Enable(void);
	bool __fastcall Execute(void);
	
__published:
	__property AnsiString FileName = {read=FFileName, write=FFileName};
	__property AnsiString Filter = {read=FFilter, write=FFilter};
	__property AnsiString DefaultExt = {read=FDefaultExt, write=FDefaultExt};
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property Caption ;
	__property Font ;
	__property TabOrder  = {default=-1};
	__property TabStop  = {default=1};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorSavePicker(HWND ParentWindow) : TiComponentEditorButton(ParentWindow) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TWinControl.Destroy */ inline __fastcall virtual ~TiComponentEditorSavePicker(void) { }
	#pragma option pop
	
};


class DELPHICLASS TiComponentEditorValueConverterPicker;
class PASCALIMPLEMENTATION TiComponentEditorValueConverterPicker : public TiComponentEditorButton 
{
	typedef TiComponentEditorButton inherited;
	
private:
	double FDateTime;
	Classes::TNotifyEvent FOnChange;
	TiComponentEditorEdit* FAssociate;
	TiValueConverterPageType FDefaultPage;
	TFormTranslationMethod FTranslationMethod;
	
protected:
	DYNAMIC void __fastcall KeyPress(char &Key);
	DYNAMIC void __fastcall DoEnter(void);
	HIDESBASE MESSAGE void __fastcall WMGetDLGCode(Messages::TMessage &Message);
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	void __fastcall SetAssociate(const TiComponentEditorEdit* Value);
	
public:
	__fastcall virtual TiComponentEditorValueConverterPicker(Classes::TComponent* AOwner);
	DYNAMIC void __fastcall Click(void);
	void __fastcall Disable(void);
	void __fastcall Enable(void);
	
__published:
	__property TiComponentEditorEdit* Associate = {read=FAssociate, write=SetAssociate};
	__property double DateTime = {read=FDateTime, write=FDateTime};
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property Caption ;
	__property Font ;
	__property TabOrder  = {default=-1};
	__property TabStop  = {default=1};
	__property TiValueConverterPageType DefaultPage = {read=FDefaultPage, write=FDefaultPage, nodefault};
	__property TFormTranslationMethod TranslationMethod = {read=FTranslationMethod, write=FTranslationMethod};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorValueConverterPicker(HWND ParentWindow) : TiComponentEditorButton(ParentWindow) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TWinControl.Destroy */ inline __fastcall virtual ~TiComponentEditorValueConverterPicker(void) { }
	#pragma option pop
	
};


class DELPHICLASS TiComponentEditorPanel;
class PASCALIMPLEMENTATION TiComponentEditorPanel : public Extctrls::TPanel 
{
	typedef Extctrls::TPanel inherited;
	
protected:
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
public:
	#pragma option push -w-inl
	/* TCustomPanel.Create */ inline __fastcall virtual TiComponentEditorPanel(Classes::TComponent* AOwner) : Extctrls::TPanel(AOwner) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TCustomControl.Destroy */ inline __fastcall virtual ~TiComponentEditorPanel(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorPanel(HWND ParentWindow) : Extctrls::TPanel(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TiComponentEditorGroupBox;
class PASCALIMPLEMENTATION TiComponentEditorGroupBox : public Stdctrls::TGroupBox 
{
	typedef Stdctrls::TGroupBox inherited;
	
protected:
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
public:
	#pragma option push -w-inl
	/* TCustomGroupBox.Create */ inline __fastcall virtual TiComponentEditorGroupBox(Classes::TComponent* AOwner) : Stdctrls::TGroupBox(AOwner) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TCustomControl.Destroy */ inline __fastcall virtual ~TiComponentEditorGroupBox(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiComponentEditorGroupBox(HWND ParentWindow) : Stdctrls::TGroupBox(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TiPaintBox;
class PASCALIMPLEMENTATION TiPaintBox : public Controls::TCustomControl 
{
	typedef Controls::TCustomControl inherited;
	
private:
	Classes::TNotifyEvent FOnPaint;
	
protected:
	virtual void __fastcall Paint(void);
	
public:
	__fastcall virtual TiPaintBox(Classes::TComponent* AOwner);
	
__published:
	__property Classes::TNotifyEvent OnPaint = {read=FOnPaint, write=FOnPaint};
	__property Canvas ;
	__property Align  = {default=0};
public:
	#pragma option push -w-inl
	/* TCustomControl.Destroy */ inline __fastcall virtual ~TiPaintBox(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiPaintBox(HWND ParentWindow) : Controls::TCustomControl(ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------

}	/* namespace Ieditorbasiccomponents */
using namespace Ieditorbasiccomponents;
#pragma option pop	// -w-
#pragma option pop	// -Vx

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