home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / windows / vbcore / stdevent.inc next >
Text File  |  1993-09-10  |  5KB  |  159 lines
  1.   CONST vbs_MaxStdEvent = IEVENT_STD_LINKCHANGE;
  2.         StdEventInfo    : array[0..vbs_MaxStdEvent] of tvbsEventInfo =
  3.          (
  4.            (
  5.            id            : peventinfo_std_Click;
  6.            pszName       : 'Click';
  7.            cParms        : 0;
  8.            cwParms       : 0;
  9.            pParmTypes    : nil;
  10.            pszParmProf   : nil;
  11.            fl            : 0
  12.            ),
  13.            (
  14.            id            : peventinfo_std_DblClick;
  15.            pszName       : 'DblClick';
  16.            cParms        : 0;
  17.            cwParms       : 0;
  18.            pParmTypes    : nil;
  19.            pszParmProf   : nil;
  20.            fl            : 0
  21.            ),
  22.            (
  23.            id            : peventinfo_std_DragDrop;
  24.            pszName       : 'DragDrop';
  25.            cParms        : 4;
  26.            cwParms       : 8;
  27.            pParmTypes    : chr(DT_OBJECT)+chr(DT_SHORT)+chr(DT_SHORT)+#0;
  28.            pszParmProf   : 'Source As Control, X As Single, Y As Single';
  29.            fl            : 0
  30.            ),
  31.            (
  32.            id            : peventinfo_std_DragOver;
  33.            pszName       : 'DragOver';
  34.            cParms        : 3;
  35.            cwParms       : 6;
  36.            pParmTypes    : chr(DT_OBJECT)+chr(DT_SHORT)+chr(DT_SHORT)+#0;
  37.            pszParmProf   : 'Source As Control, X As Single, Y As Single, State As Integer';
  38.            fl            : 0
  39.            ),
  40.            (
  41.            id            : peventinfo_std_GotFocus;
  42.            pszName       : 'GotFocus';
  43.            cParms        : 0;
  44.            cwParms       : 0;
  45.            pParmTypes    : nil;
  46.            pszParmProf   : nil;
  47.            fl            : 0
  48.            ),
  49.            (
  50.            id            : peventinfo_std_KeyDown;
  51.            pszName       : 'KeyDown';
  52.            cParms        : 2;
  53.            cwParms       : 4;
  54.            pParmTypes    : chr(DT_SHORT)+chr(DT_SHORT)+#0;
  55.            pszParmProf   : 'KeyCode As Integer, Shift As Integer';
  56.            fl            : 0
  57.            ),
  58.            (
  59.            id            : peventinfo_std_KeyPress;
  60.            pszName       : 'KeyPress';
  61.            cParms        : 1;
  62.            cwParms       : 2;
  63.            pParmTypes    : chr(DT_SHORT)+#0;
  64.            pszParmProf   : 'KeyAscii As Integer';
  65.            fl            : 0
  66.            ),
  67.            (
  68.            id            : peventinfo_std_KeyUp;
  69.            pszName       : 'KeyUp';
  70.            cParms        : 2;
  71.            cwParms       : 4;
  72.            pParmTypes    : chr(DT_SHORT)+chr(DT_SHORT)+#0;
  73.            pszParmProf   : 'KeyCode As Integer, Shift As Integer';
  74.            fl            : 0
  75.            ),
  76.            (
  77.            id            : peventinfo_std_LostFocus;
  78.            pszName       : 'LostFocus';
  79.            cParms        : 0;
  80.            cwParms       : 0;
  81.            pParmTypes    : nil;
  82.            pszParmProf   : nil;
  83.            fl            : 0
  84.            ),
  85.            (
  86.            id            : peventinfo_std_MouseDown;
  87.            pszName       : 'MouseDown';
  88.            cParms        : 4;
  89.            cwParms       : 8;
  90.            pParmTypes    : chr(DT_SHORT)+chr(DT_SHORT)+chr(DT_SHORT)+chr(DT_SHORT)+#0;
  91.            pszParmProf   : 'Button As Integer, Shift As Integer, X As Single, Y As Single';
  92.            fl            : 0
  93.            ),
  94.            (
  95.            id            : peventinfo_std_MouseMove;
  96.            pszName       : 'MouseMove';
  97.            cParms        : 4;
  98.            cwParms       : 8;
  99.            pParmTypes    : chr(DT_SHORT)+chr(DT_SHORT)+chr(DT_SHORT)+chr(DT_SHORT)+#0;
  100.            pszParmProf   : 'Button As Integer, Shift As Integer, X As Single, Y As Single';
  101.            fl            : 0
  102.            ),
  103.            (
  104.            id            : peventinfo_std_MouseUp;
  105.            pszName       : 'MouseUp';
  106.            cParms        : 4;
  107.            cwParms       : 8;
  108.            pParmTypes    : chr(DT_SHORT)+chr(DT_SHORT)+chr(DT_SHORT)+chr(DT_SHORT)+#0;
  109.            pszParmProf   : 'Button As Integer, Shift As Integer, X As Single, Y As Single';
  110.            fl            : 0
  111.            ),
  112.            (
  113.            id            : peventinfo_std_LinkError;
  114.            pszName       : 'LinkError';
  115.            cParms        : 1;
  116.            cwParms       : 2;
  117.            pParmTypes    : chr(DT_SHORT)+#0;
  118.            pszParmProf   : 'LinkErr As Integer';
  119.            fl            : 0
  120.            ),
  121.            (
  122.            id            : peventinfo_std_LinkOpen;
  123.            pszName       : 'LinkOpen';
  124.            cParms        : 1;
  125.            cwParms       : 2;
  126.            pParmTypes    : chr(DT_SHORT)+#0;
  127.            pszParmProf   : 'Cancel As Integer';
  128.            fl            : 0
  129.            ),
  130.            (
  131.            id            : peventinfo_std_LinkClose;
  132.            pszName       : 'LinkClose';
  133.            cParms        : 0;
  134.            cwParms       : 0;
  135.            pParmTypes    : nil;
  136.            pszParmProf   : nil;
  137.            fl            : 0
  138.            ),
  139.            (
  140.            id            : peventinfo_std_LinkNotify;
  141.            pszName       : 'LinkNotify';
  142.            cParms        : 0;
  143.            cwParms       : 0;
  144.            pParmTypes    : nil;
  145.            pszParmProf   : nil;
  146.            fl            : 0
  147.            ),
  148.            (
  149.            id            : peventinfo_std_LinkChange;
  150.            pszName       : nil;
  151.            cParms        : 0;
  152.            cwParms       : 0;
  153.            pParmTypes    : nil;
  154.            pszParmProf   : nil;
  155.            fl            : 0
  156.            )
  157.          );
  158.  
  159.