iscopepanelchannels.hpp

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

// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'iScopePanelChannels.pas' rev: 6.00

#ifndef iScopePanelChannelsHPP
#define iScopePanelChannelsHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <iPlotDataScopeList.hpp>	// Pascal unit
#include <iPlotAxis.hpp>	// Pascal unit
#include <iScopeChannel.hpp>	// Pascal unit
#include <iPlotChannelCustom.hpp>	// Pascal unit
#include <iPlotChannel.hpp>	// Pascal unit
#include <iPlot.hpp>	// Pascal unit
#include <iCheckBox.hpp>	// Pascal unit
#include <iLinkedListBox.hpp>	// Pascal unit
#include <iSpinSelector.hpp>	// Pascal unit
#include <iEditorBasicComponents.hpp>	// Pascal unit
#include <Buttons.hpp>	// Pascal unit
#include <iGPFunctions.hpp>	// Pascal unit
#include <iTypes.hpp>	// Pascal unit
#include <ExtCtrls.hpp>	// Pascal unit
#include <StdCtrls.hpp>	// Pascal unit
#include <ComCtrls.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Variants.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Types.hpp>	// Pascal unit
#include <Clipbrd.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <TypInfo.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Iscopepanelchannels
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TiScopePanelChannels;
class PASCALIMPLEMENTATION TiScopePanelChannels : public Controls::TCustomControl 
{
	typedef Controls::TCustomControl inherited;
	
private:
	Controls::TWinControl* FScope;
	Classes::TStringList* FScopeChannelList;
	bool FBlockActive;
	Stdctrls::TLabel* FLabel;
	Stdctrls::TLabel* FVoltageLabel;
	Stdctrls::TLabel* FPositionLabel;
	Stdctrls::TLabel* FCouplingLabel;
	Ilinkedlistbox::TiLinkedListBox* FChannelListDisplay;
	Ispinselector::TiSpinSelector* FVoltageSelector;
	Ispinselector::TiSpinSelector* FPositionSelector;
	Ispinselector::TiSpinSelector* FCouplingSelector;
	Icheckbox::TiCheckBox* FVisibleCheckBox;
	Icheckbox::TiCheckBox* FRefLineCheckBox;
	int FMaxWidthTitle;
	int FMaxWidthCoupling;
	int FMaxWidthVoltsPerDiv;
	int FMaxWidthPosition;
	bool FCreationComplete;
	bool __fastcall GetDataBlockSynchronized(void);
	
protected:
	virtual void __fastcall Paint(void);
	DYNAMIC void __fastcall Resize(void);
	void __fastcall AdjustLayout(void);
	void __fastcall AdjustAnnotations(void);
	Iscopechannel::TiScopeChannel* __fastcall GetScopeChannel(int Index);
	int __fastcall GetCount(void);
	void __fastcall VoltageSelectorChange(System::TObject* Sender);
	void __fastcall PositionSelectorChange(System::TObject* Sender);
	void __fastcall CouplingChange(System::TObject* Sender);
	void __fastcall VisibleClick(System::TObject* Sender);
	void __fastcall RefLineClick(System::TObject* Sender);
	void __fastcall ChannelChange(System::TObject* Sender);
	AnsiString __fastcall GetCouplingText(Iscopechannel::TiScopeChannelCoupling Value);
	AnsiString __fastcall GetVoltsPerDivText(double Value);
	AnsiString __fastcall GetPositionText(double Value);
	void __fastcall ChannelListGetItemCount(System::TObject* Sender, int &Value);
	void __fastcall ChannelListGetItemString(System::TObject* Sender, int Index, AnsiString &Value);
	void __fastcall ChannelListPaintItem(System::TObject* Sender, Graphics::TCanvas* Canvas, const Types::TRect &ARect, Windows::TOwnerDrawState State, int Index, AnsiString AText, bool &Handled);
	void __fastcall ChannelListChange(System::TObject* Sender);
	void __fastcall ChannelListPaintSetup(System::TObject* Sender, Graphics::TCanvas* Canvas);
	
public:
	__fastcall virtual TiScopePanelChannels(Classes::TComponent* AOwner);
	__fastcall virtual ~TiScopePanelChannels(void);
	void __fastcall DataBlockBegin(void);
	void __fastcall DataBlockEnd(void);
	void __fastcall DataBlockClear(void);
	__property bool DataBlockActive = {read=FBlockActive, nodefault};
	__property bool DataBlockSynchronized = {read=GetDataBlockSynchronized, nodefault};
	void __fastcall AddChannelData(int Channel, double Y);
	Iscopechannel::TiScopeChannel* __fastcall GetScopeChannelFromLimitIndex(int Index);
	Iscopechannel::TiScopeChannel* __fastcall GetScopeChannelFromAnnotation(int Index);
	void __fastcall CheckForSynchronizedData(void);
	void __fastcall UpdateDisplay(void);
	int __fastcall AddChannel(void);
	void __fastcall RemoveAllChannels(void);
	void __fastcall DeleteChannel(int Index);
	__property Iscopechannel::TiScopeChannel* ScopeChannel[int Index] = {read=GetScopeChannel};
	__property int Count = {read=GetCount, nodefault};
	__property Controls::TWinControl* Scope = {read=FScope, write=FScope};
	__property Ispinselector::TiSpinSelector* VoltageSelector = {read=FVoltageSelector};
	__property Ispinselector::TiSpinSelector* PositionSelector = {read=FPositionSelector};
	__property Ispinselector::TiSpinSelector* CouplingSelector = {read=FCouplingSelector};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TiScopePanelChannels(HWND ParentWindow) : Controls::TCustomControl(ParentWindow) { }
	#pragma option pop
	
};


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

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

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