?? statcurvebig_tlb.pas
字號:
unit StatCurveBig_TLB;
// ************************************************************************ //
// WARNING
// -------
// The types declared in this file were generated from data read from a
// Type Library. If this type library is explicitly or indirectly (via
// another type library referring to this type library) re-imported, or the
// 'Refresh' command of the Type Library Editor activated while editing the
// Type Library, the contents of this file will be regenerated and all
// manual modifications will be lost.
// ************************************************************************ //
// PASTLWTR : $Revision: 1.130.1.0.1.0.1.6 $
// File generated on 2003-11-22 16:40:14 from Type Library described below.
// ************************************************************************ //
// Type Lib: C:\CarMM\Code\Component\FORM\數(shù)據(jù)統(tǒng)計曲線大圖組件\StatCurveBig.tlb (1)
// LIBID: {4D0CABB3-685C-4BB5-BCFE-2BAE85006ABB}
// LCID: 0
// Helpfile:
// DepndLst:
// (1) v2.0 stdole, (C:\WINNT\System32\STDOLE2.TLB)
// (2) v4.0 StdVCL, (C:\WINNT\System32\stdvcl40.dll)
// ************************************************************************ //
{$TYPEDADDRESS OFF} // Unit must be compiled without type-checked pointers.
{$WARN SYMBOL_PLATFORM OFF}
{$WRITEABLECONST ON}
{$VARPROPSETTER ON}
interface
uses Windows, ActiveX, Classes, Graphics, StdVCL, Variants;
// *********************************************************************//
// GUIDS declared in the TypeLibrary. Following prefixes are used:
// Type Libraries : LIBID_xxxx
// CoClasses : CLASS_xxxx
// DISPInterfaces : DIID_xxxx
// Non-DISP interfaces: IID_xxxx
// *********************************************************************//
const
// TypeLibrary Major and minor versions
StatCurveBigMajorVersion = 1;
StatCurveBigMinorVersion = 0;
LIBID_StatCurveBig: TGUID = '{4D0CABB3-685C-4BB5-BCFE-2BAE85006ABB}';
IID_IStatCurveBig_COM: TGUID = '{5B9B968B-8472-45D0-9718-7C8700BB286B}';
CLASS_StatCurveBig_COM: TGUID = '{02233CC9-FC5A-4A8D-A1D1-737FECB6EECF}';
type
// *********************************************************************//
// Forward declaration of types defined in TypeLibrary
// *********************************************************************//
IStatCurveBig_COM = interface;
IStatCurveBig_COMDisp = dispinterface;
// *********************************************************************//
// Declaration of CoClasses defined in Type Library
// (NOTE: Here we map each CoClass to its Default Interface)
// *********************************************************************//
StatCurveBig_COM = IStatCurveBig_COM;
// *********************************************************************//
// Interface: IStatCurveBig_COM
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {5B9B968B-8472-45D0-9718-7C8700BB286B}
// *********************************************************************//
IStatCurveBig_COM = interface(IDispatch)
['{5B9B968B-8472-45D0-9718-7C8700BB286B}']
function MMInvoke(const PCarID: WideString; const PCurveID: WideString;
const PConnString: WideString): WideString; safecall;
end;
// *********************************************************************//
// DispIntf: IStatCurveBig_COMDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {5B9B968B-8472-45D0-9718-7C8700BB286B}
// *********************************************************************//
IStatCurveBig_COMDisp = dispinterface
['{5B9B968B-8472-45D0-9718-7C8700BB286B}']
function MMInvoke(const PCarID: WideString; const PCurveID: WideString;
const PConnString: WideString): WideString; dispid 1;
end;
// *********************************************************************//
// The Class CoStatCurveBig_COM provides a Create and CreateRemote method to
// create instances of the default interface IStatCurveBig_COM exposed by
// the CoClass StatCurveBig_COM. The functions are intended to be used by
// clients wishing to automate the CoClass objects exposed by the
// server of this typelibrary.
// *********************************************************************//
CoStatCurveBig_COM = class
class function Create: IStatCurveBig_COM;
class function CreateRemote(const MachineName: string): IStatCurveBig_COM;
end;
implementation
uses ComObj;
class function CoStatCurveBig_COM.Create: IStatCurveBig_COM;
begin
Result := CreateComObject(CLASS_StatCurveBig_COM) as IStatCurveBig_COM;
end;
class function CoStatCurveBig_COM.CreateRemote(const MachineName: string): IStatCurveBig_COM;
begin
Result := CreateRemoteComObject(MachineName, CLASS_StatCurveBig_COM) as IStatCurveBig_COM;
end;
end.
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -