Sage-ST ä Objdialog Documentation

  procedure Close
             (var   dataH : pointer); stdcall;

  exports Close name 'ObjDialog_Close';

  function DoInitialize
             (const dataH : pointer) : boolean; stdcall;

  exports DoInitialize name 'ObjDialog_DoInitialize';

  function DoFinalize
             (const dataH : pointer) : boolean; stdcall;

  exports DoFinalize name 'ObjDialog_DoFinalize';

  procedure DefineIOProc
             (const IPROC : ObjDef.IOPROCTYPE); stdcall;

  exports DefineIOProc name 'ObjDialog_DefineIOProc';

  procedure Edit
             (const dataH : pointer); stdcall;

  exports Edit name 'ObjDialog_Edit';

  procedure Execute
             (var   dataH : pointer;
              const gProc : ObjDef.GeneralProc); stdcall;

  exports Execute name 'ObjDialog_Execute';

  procedure GetExtraData
             (const dataH : pointer;
              var   extra : pointer); stdcall;

  exports GetExtraData name 'ObjDialog_GetExtraData';

  procedure GetLastError
             (const dataH : pointer;
              var   Error : integer;
              var   Des   : array of char); stdcall;

  exports GetLastError name 'ObjDialog_GetLastError';

  procedure GetLibraryName
             (var   libraryName : array of char); stdcall;

  exports GetLibraryName name 'ObjDialog_GetLibraryName';

  function GlobalCloseRequested
             (const dataH : pointer) : boolean; stdcall;

  exports GlobalCloseRequested name 'ObjDialog_GlobalCloseRequested';

  procedure HistoricalLink
             (const dataH        : pointer;
              var   Link         : integer;
              var   exitType     : integer;
              var   InterfaceNum : integer;
              var   ObjectLabel  : array of char;
              var   done         : boolean); stdcall;

  exports HistoricalLink name 'ObjDialog_HistoricalLink';

  function IsDone
             (const dataH : pointer) : boolean; stdcall;

  exports IsDone name 'ObjDialog_IsDone';

  function IsOpen
             (const dataH : pointer) : boolean; stdcall;

  exports IsOpen name 'ObjDialog_IsOpen';

  function LargeBitmapId
             (const dataH : pointer) : cardinal; stdcall;

  exports LargeBitmapId name 'ObjDialog_LargeBitmapId';

  procedure LinkOccurred
             (const dataH        : pointer;
              var   Link         : integer;
              var   exitType     : integer;
              var   InterfaceNum : integer;
              var   ObjectLabel  : array of char;
              var   done         : boolean); stdcall;

  exports LinkOccurred name 'ObjDialog_LinkOccurred';

  procedure ObjectClassDes
             (var   Des : array of char); stdcall;

  exports ObjectClassDes name 'ObjDialog_ObjectClassDes';

  procedure ObjectClassName
             (var   ClassName : array of char); stdcall;

  exports ObjectClassName name 'ObjDialog_ObjectClassName';

  procedure ObjectComponentName
             (const dataH         : pointer;
              var   componentName : array of char); stdcall;

  exports ObjectComponentName name 'ObjDialog_ObjectComponentName';

  procedure Open
             (const dialogName     : array of char;
              const instanceNumber : cardinal;
              const extra          : pointer;
              var   dataH          : pointer); stdcall;

  exports Open name 'ObjDialog_Open';

  procedure RegisterClass; stdcall;

  exports RegisterClass name 'ObjDialog_RegisterClass';

  procedure Run
             (const dialogName : array of char;
              const UProc      : ObjDef.GeneralProc;
              var   Link       : integer); overload; stdcall;

  exports Run (const dialogName : array of char;
               const UProc      : ObjDef.GeneralProc;
               var   Link       : integer) name 'ObjDialog_Run';

  procedure Run
             (const dialogName : string;
              const UProc      : ObjDef.GeneralProc;
              var   Link       : integer); overload; stdcall;

  exports Run (const dialogName : string;
               const UProc      : ObjDef.GeneralProc;
               var   Link       : integer) name 'ObjDialog_STRRun';

  procedure SetExtraData
             (const dataH     : pointer;
              const extraData : pointer); stdcall;

  exports SetExtraData name 'ObjDialog_SetExtraData';

  procedure SetLinkInfo
             (const dataH         : pointer;
              const Link          : integer;
              const exitType      : integer;
              const LinkInterface : integer;
              const ObjectLabel   : array of char;
              const isLink        : boolean); overload; stdcall;

  exports SetLinkInfo (const dataH         : pointer;
                       const Link          : integer;
                       const exitType      : integer;
                       const LinkInterface : integer;
                       const ObjectLabel   : array of char;
                       const isLink        : boolean) name 'ObjDialog_SetLinkInfo';

  procedure SetLinkInfo
             (const dataH         : pointer;
              const Link          : integer;
              const exitType      : integer;
              const LinkInterface : integer;
              const ObjectLabel   : string;
              const isLink        : boolean); overload; stdcall;

  exports SetLinkInfo (const dataH         : pointer;
                       const Link          : integer;
                       const exitType      : integer;
                       const LinkInterface : integer;
                       const ObjectLabel   : string;
                       const isLink        : boolean) name 'ObjDialog_STRSetLinkInfo';

  function SmallBitmapId
             (const dataH : pointer) : cardinal; stdcall;

  exports SmallBitmapId name 'ObjDialog_SmallBitmapId';

  procedure StoreDefault
             (const editFlag   : boolean;
              var   objectName : array of char;
              const objectDes  : array of char;
              var   ObjID      : cardinal); overload; stdcall;

  exports StoreDefault (const editFlag   : boolean;
                        var   objectName : array of char;
                        const objectDes  : array of char;
                        var   ObjID      : cardinal) name 'ObjDialog_StoreDefault';

  procedure StoreDefault
             (const editFlag   : boolean;
              var   objectName : array of char;
              const objectDes  : string;
              var   ObjID      : cardinal); overload; stdcall;

  exports StoreDefault (const editFlag   : boolean;
                        var   objectName : array of char;
                        const objectDes  : string;
                        var   ObjID      : cardinal) name 'ObjDialog_STRStoreDefault';

  procedure TerminateObject
             (const dataH : pointer); stdcall;

  exports TerminateObject name 'ObjDialog_TerminateObject';

  function ValidObject
             (const dataH : pointer) : boolean; stdcall;

  exports ValidObject name 'ObjDialog_ValidObject';

  procedure CancelLink
             (const dataH : pointer); stdcall;

  exports CancelLink name 'ObjDialog_CancelLink';

  procedure GetActionInfo
             (const dataH   : pointer;
              var   msgType : DisplayW.DisplayMessageType;
              var   msgData : pointer); stdcall;

  exports GetActionInfo name 'ObjDialog_GetActionInfo';

  procedure SetActionResponse
             (const dataH    : pointer;
              const response : boolean); stdcall;

  exports SetActionResponse name 'ObjDialog_SetActionResponse';

  function ReturnUniqueID
             (const dataH : pointer) : cardinal; stdcall;

  exports ReturnUniqueID name 'ObjDialog_ReturnUniqueID';

  function ReturnOriginalID
             (const dataH : pointer) : cardinal; stdcall;

  exports ReturnOriginalID name 'ObjDialog_ReturnOriginalID';

  procedure GetEventInfo
             (const dataH   : pointer;
              var   hwndDlg : Windows.Hwnd;
              var   Message : Windows.UINT;
              var   WParam  : Windows.WParam;
              var   LParam  : Windows.LParam); stdcall;

  exports GetEventInfo name 'ObjDialog_GetEventInfo';

  procedure SetEventResponse
             (const dataH    : pointer;
              const response : boolean); stdcall;

  exports SetEventResponse name 'ObjDialog_SetEventResponse';

Send mail to   warren.merrill@inl.gov with questions or comments about this web site.
Copyright © 1989-2006 Battelle Energy Alliance