Module SigCjW_TaskPanel.pkg
1//==============================================================================
2// Project : SigCj - VDF Classes for Codejock
3// File : SigCjW_TaskPanel.pkg
4// Description : VDF Class for Codejock control
5//
6// Created by : Ian Smith
7// Revision : $Rev: $
8// $Date: $
9// $Author: $
10//
11// Requirements : Visual DataFlex 14.1
12// Codejock SuitePro - Version 13.4.2
13//
14// Copyright : (c) 2009 VDF SIG UK
15// Visual DataFlex Special Interest Group UK.
16// http://www.vdfsig.co.uk/
17// dev@vdfsig.co.uk
18//
19// This file is part of SigCj.
20//
21// SigCj is free software: you can redistribute it and/or modify
22// it under the terms of the GNU Lesser General Public License
23// as published by the Free Software Foundation, either version
24// 2.1 of the License, or (at your option) any later version.
25//
26// SigCj is distributed in the hope that it will be useful, but
27// WITHOUT ANY WARRANTY; without even the implied warranty of
28// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
29// GNU Lesser General Public License for more details.
30//
31// If you have the complete SigCj workspace then a copy of the
32// GNU Lesser General Public License is in the Docs folder. If
33// not, see <http://www.gnu.org/licenses/>.
34//
35//==============================================================================
36
37Use FlexCom20.pkg
38Use SigCjLicense_v13.4.2.pkg
39Use SigCjC_ColorManager.pkg
40Use SigCjC_DataObjectFiles.pkg
41Use SigCjC_ImageManager.pkg
42Use SigCjC_PropExchange.pkg
43Use SigCjC_ToolTipContext.pkg
44
45Define OLEOLEDropConstants for Integer
46 Define OLExtpOLEDropNone for 0
47 Define OLExtpOLEDropManual for 1
48
49Define OLEOLEDragConstants for Integer
50 Define OLExtpOLEDragManual for 0
51 Define OLExtpOLEDragAutomatic for 1
52
53// Task Panel Item Type
54Define OLEXTPTaskPanelItemType for Integer
55 // Link Item
56 Define OLExtpTaskItemTypeLink for 1
57 // Text Item
58 Define OLExtpTaskItemTypeText for 2
59 // Control Item
60 Define OLExtpTaskItemTypeControl for 3
61
62// Task Panel Visual Themes
63Define OLEXTPTaskPanelVisualTheme for Integer
64 Define OLExtpTaskPanelThemeOffice2000 for 0
65 Define OLExtpTaskPanelThemeOffice2003 for 1
66 Define OLExtpTaskPanelThemeNativeWinXP for 2
67 Define OLExtpTaskPanelThemeOffice2000Plain for 3
68 Define OLExtpTaskPanelThemeOfficeXPPlain for 4
69 Define OLExtpTaskPanelThemeOffice2003Plain for 5
70 Define OLExtpTaskPanelThemeNativeWinXPPlain for 6
71 Define OLExtpTaskPanelThemeToolbox for 7
72 Define OLExtpTaskPanelThemeToolboxWhidbey for 8
73 Define OLExtpTaskPanelThemeListView for 9
74 Define OLExtpTaskPanelThemeListViewOfficeXP for 10
75 Define OLExtpTaskPanelThemeListViewOffice2003 for 11
76 Define OLExtpTaskPanelThemeShortcutBarOffice2003 for 12
77 Define OLExtpTaskPanelThemeShortcutBarOffice2007 for 13
78
79// Task Panel Animation
80Define OLEXTPTaskPanelAnimation for Integer
81 Define OLExtpTaskPanelAnimationYes for 0
82 Define OLExtpTaskPanelAnimationNo for 1
83 Define OLExtpTaskPanelAnimationSystem for 2
84
85// Task Panel Item layout
86Define OLEXTPTaskPanelItemLayout for Integer
87 Define OLExtpTaskItemLayoutDefault for 0
88 Define OLExtpTaskItemLayoutImages for 1
89 Define OLExtpTaskItemLayoutImagesWithText for 2
90 Define OLExtpTaskItemLayoutImagesWithTextBelow for 3
91
92// Task Panel Item Highlight
93Define OLEXTPTaskPanelHotTrackStyle for Integer
94 Define OLExtpTaskPanelHighlightDefault for 0
95 Define OLExtpTaskPanelHighlightText for 1
96 Define OLExtpTaskPanelHighlightImage for 2
97 Define OLExtpTaskPanelHighlightItem for 3
98 Define OLExtpTaskPanelHighlightNone for 4
99
100// Task Panel Behaviour
101Define OLEXTPTaskPanelBehaviour for Integer
102 Define OLExtpTaskPanelBehaviourExplorer for 0
103 Define OLExtpTaskPanelBehaviourList for 1
104 Define OLExtpTaskPanelBehaviourToolbox for 2
105
106// Ite drag options
107Define OLEXTPTaskPanelItemAllowDrag for Integer
108 Define OLExtpTaskItemAllowDragNone for 0
109 Define OLExtpTaskItemAllowDragDefault for 1
110 Define OLExtpTaskItemAllowDragCopyWithinGroup for 2
111 Define OLExtpTaskItemAllowDragCopyWithinControl for 4
112 Define OLExtpTaskItemAllowDragCopyOutsideControl for 8
113 Define OLExtpTaskItemAllowDragCopy for 12
114 Define OLExtpTaskItemAllowDragMoveWithinGroup for 32
115 Define OLExtpTaskItemAllowDragMoveWithinControl for 64
116 Define OLExtpTaskItemAllowDragMoveOutsideControl for 128
117 Define OLExtpTaskItemAllowDragMove for 192
118 Define OLExtpTaskItemAllowDragWithinGroup for 34
119 Define OLExtpTaskItemAllowDragWithinControl for 68
120 Define OLExtpTaskItemAllowDrag for 204
121
122Define OLEXTPItemAlignment for Integer
123 Define OLEDT_TOP for 0
124 Define OLEDT_LEFT for 0
125 Define OLEDT_CENTER for 1
126 Define OLEDT_RIGHT for 2
127 Define OLEDT_VCENTER for 4
128 Define OLEDT_BOTTOM for 8
129 Define OLEDT_WORDBREAK for 16
130 Define OLEDT_SINGLELINE for 32
131 Define OLEDT_END_ELLIPSIS for 32768
132
133Define OLEXTPTaskPanelBorderStyle for Integer
134 Define OLExtpBorderNone for 0
135 Define OLExtpBorderFlat for 1
136 Define OLExtpBorderStaticEdge for 2
137 Define OLExtpBorderClientEdge for 3
138 Define OLExtpBorderFrame for 4
139
140Class cSigCjComITaskPanelItem is a Mixin
141
142 { MethodType=Property DesignTime=False }
143 Function ComCaption Returns String
144 String retVal
145 Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to retVal
146 Function_Return retVal
147 End_Function
148
149 { MethodType=Property DesignTime=False }
150 Procedure Set ComCaption String value
151 Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to value
152 End_Procedure
153
154 { MethodType=Property DesignTime=False }
155 Function ComTooltip Returns String
156 String retVal
157 Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to retVal
158 Function_Return retVal
159 End_Function
160
161 { MethodType=Property DesignTime=False }
162 Procedure Set ComTooltip String value
163 Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to value
164 End_Procedure
165
166 { MethodType=Property DesignTime=False }
167 Function ComEnabled Returns Boolean
168 Boolean retVal
169 Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
170 Function_Return retVal
171 End_Function
172
173 { MethodType=Property DesignTime=False }
174 Procedure Set ComEnabled Boolean value
175 Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
176 End_Procedure
177
178 { MethodType=Property DesignTime=False }
179 Function ComType Returns OLEXTPTaskPanelItemType
180 OLEXTPTaskPanelItemType retVal
181 Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
182 Function_Return retVal
183 End_Function
184
185 { MethodType=Property DesignTime=False }
186 Procedure Set ComType OLEXTPTaskPanelItemType value
187 Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
188 End_Procedure
189
190 { MethodType=Property DesignTime=False }
191 Function ComId Returns Integer
192 Integer retVal
193 Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
194 Function_Return retVal
195 End_Function
196
197 { MethodType=Property DesignTime=False }
198 Procedure Set ComId Integer value
199 Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
200 End_Procedure
201
202 { MethodType=Property DesignTime=False }
203 Function ComIconIndex Returns Integer
204 Integer retVal
205 Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
206 Function_Return retVal
207 End_Function
208
209 { MethodType=Property DesignTime=False }
210 Procedure Set ComIconIndex Integer value
211 Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
212 End_Procedure
213
214 { MethodType=Property DesignTime=False }
215 Function ComAllowDrag Returns OLEXTPTaskPanelItemAllowDrag
216 OLEXTPTaskPanelItemAllowDrag retVal
217 Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
218 Function_Return retVal
219 End_Function
220
221 { MethodType=Property DesignTime=False }
222 Procedure Set ComAllowDrag OLEXTPTaskPanelItemAllowDrag value
223 Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
224 End_Procedure
225
226 { MethodType=Property DesignTime=False }
227 Function ComAllowDrop Returns Boolean
228 Boolean retVal
229 Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
230 Function_Return retVal
231 End_Function
232
233 { MethodType=Property DesignTime=False }
234 Procedure Set ComAllowDrop Boolean value
235 Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
236 End_Procedure
237
238 { MethodType=Property DesignTime=False }
239 Function ComTag Returns Variant
240 Variant retVal
241 Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_VARIANT to retVal
242 Function_Return retVal
243 End_Function
244
245 { MethodType=Property DesignTime=False }
246 Procedure Set ComTag Variant value
247 Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_VARIANT to value
248 End_Procedure
249
250 { MethodType=Property DesignTime=False }
251 Function ComVisible Returns Boolean
252 Boolean retVal
253 Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to retVal
254 Function_Return retVal
255 End_Function
256
257 { MethodType=Property DesignTime=False }
258 Procedure Set ComVisible Boolean value
259 Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to value
260 End_Procedure
261
262 { MethodType=Property DesignTime=False }
263 Function ComFont Returns Variant
264 Variant retVal
265 Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
266 Function_Return retVal
267 End_Function
268
269 { MethodType=Property DesignTime=False }
270 Procedure Set ComFont Variant value
271 Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
272 End_Procedure
273
274 { MethodType=Property DesignTime=False }
275 Function ComIndex Returns Integer
276 Handle hDispatchDriver
277 Integer retVal
278 Get phDispatchDriver to hDispatchDriver
279 Get InvokeComMethod of hDispatchDriver 9 OLE_VT_I4 to retVal
280 Function_Return retVal
281 End_Function
282
283 Procedure ComSetIconPadding Integer llleft Integer lltop Integer llright Integer llbottom
284 Handle hDispatchDriver
285 Get phDispatchDriver to hDispatchDriver
286 Send PrepareParams to hDispatchDriver 4
287 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
288 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
289 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
290 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
291 Send InvokeComMethod to hDispatchDriver 32 OLE_VT_VOID
292 End_Procedure
293
294 { MethodType=Property DesignTime=False }
295 Function ComGroup Returns Variant
296 Handle hDispatchDriver
297 Variant retVal
298 Get phDispatchDriver to hDispatchDriver
299 Get InvokeComMethod of hDispatchDriver 100 OLE_VT_DISPATCH to retVal
300 Function_Return retVal
301 End_Function
302
303 { MethodType=Property DesignTime=False }
304 Function ComParentItems Returns Variant
305 Handle hDispatchDriver
306 Variant retVal
307 Get phDispatchDriver to hDispatchDriver
308 Get InvokeComMethod of hDispatchDriver 101 OLE_VT_DISPATCH to retVal
309 Function_Return retVal
310 End_Function
311
312 Function ComIsGroup Returns Boolean
313 Handle hDispatchDriver
314 Boolean retVal
315 Get phDispatchDriver to hDispatchDriver
316 Get InvokeComMethod of hDispatchDriver 102 OLE_VT_BOOL to retVal
317 Function_Return retVal
318 End_Function
319
320 Procedure ComRemove
321 Handle hDispatchDriver
322 Get phDispatchDriver to hDispatchDriver
323 Send InvokeComMethod to hDispatchDriver 103 OLE_VT_VOID
324 End_Procedure
325
326 Procedure ComEnsureVisible
327 Handle hDispatchDriver
328 Get phDispatchDriver to hDispatchDriver
329 Send InvokeComMethod to hDispatchDriver 105 OLE_VT_VOID
330 End_Procedure
331End_Class
332
333// CoClass
334Class cSigCjComTaskPanelItem is a cComAutomationObject
335 Import_Class_Protocol cSigCjComITaskPanelItem
336
337 Procedure Construct_Object
338 Forward Send Construct_Object
339 Set peAutoCreate to acNoAutoCreate
340 End_Procedure
341End_Class
342
343Class cSigCjComITaskPanelGroupItem is a Mixin
344
345 { MethodType=Property DesignTime=False }
346 Function ComCaption Returns String
347 String retVal
348 Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to retVal
349 Function_Return retVal
350 End_Function
351
352 { MethodType=Property DesignTime=False }
353 Procedure Set ComCaption String value
354 Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to value
355 End_Procedure
356
357 { MethodType=Property DesignTime=False }
358 Function ComTooltip Returns String
359 String retVal
360 Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to retVal
361 Function_Return retVal
362 End_Function
363
364 { MethodType=Property DesignTime=False }
365 Procedure Set ComTooltip String value
366 Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to value
367 End_Procedure
368
369 { MethodType=Property DesignTime=False }
370 Function ComEnabled Returns Boolean
371 Boolean retVal
372 Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
373 Function_Return retVal
374 End_Function
375
376 { MethodType=Property DesignTime=False }
377 Procedure Set ComEnabled Boolean value
378 Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
379 End_Procedure
380
381 { MethodType=Property DesignTime=False }
382 Function ComType Returns OLEXTPTaskPanelItemType
383 OLEXTPTaskPanelItemType retVal
384 Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
385 Function_Return retVal
386 End_Function
387
388 { MethodType=Property DesignTime=False }
389 Procedure Set ComType OLEXTPTaskPanelItemType value
390 Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
391 End_Procedure
392
393 { MethodType=Property DesignTime=False }
394 Function ComId Returns Integer
395 Integer retVal
396 Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
397 Function_Return retVal
398 End_Function
399
400 { MethodType=Property DesignTime=False }
401 Procedure Set ComId Integer value
402 Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
403 End_Procedure
404
405 { MethodType=Property DesignTime=False }
406 Function ComIconIndex Returns Integer
407 Integer retVal
408 Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
409 Function_Return retVal
410 End_Function
411
412 { MethodType=Property DesignTime=False }
413 Procedure Set ComIconIndex Integer value
414 Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
415 End_Procedure
416
417 { MethodType=Property DesignTime=False }
418 Function ComAllowDrag Returns OLEXTPTaskPanelItemAllowDrag
419 OLEXTPTaskPanelItemAllowDrag retVal
420 Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
421 Function_Return retVal
422 End_Function
423
424 { MethodType=Property DesignTime=False }
425 Procedure Set ComAllowDrag OLEXTPTaskPanelItemAllowDrag value
426 Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
427 End_Procedure
428
429 { MethodType=Property DesignTime=False }
430 Function ComAllowDrop Returns Boolean
431 Boolean retVal
432 Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
433 Function_Return retVal
434 End_Function
435
436 { MethodType=Property DesignTime=False }
437 Procedure Set ComAllowDrop Boolean value
438 Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
439 End_Procedure
440
441 { MethodType=Property DesignTime=False }
442 Function ComBold Returns Boolean
443 Boolean retVal
444 Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to retVal
445 Function_Return retVal
446 End_Function
447
448 { MethodType=Property DesignTime=False }
449 Procedure Set ComBold Boolean value
450 Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to value
451 End_Procedure
452
453 { MethodType=Property DesignTime=False }
454 Function ComControl Returns Variant
455 Variant retVal
456 Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_DISPATCH to retVal
457 Function_Return retVal
458 End_Function
459
460 { MethodType=Property DesignTime=False }
461 Procedure Set ComControl Variant value
462 Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_DISPATCH to value
463 End_Procedure
464
465 { MethodType=Property DesignTime=False }
466 Function ComSelected Returns Boolean
467 Boolean retVal
468 Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to retVal
469 Function_Return retVal
470 End_Function
471
472 { MethodType=Property DesignTime=False }
473 Procedure Set ComSelected Boolean value
474 Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to value
475 End_Procedure
476
477 { MethodType=Property DesignTime=False }
478 Function ComHandle Returns OLE_HANDLE
479 OLE_HANDLE retVal
480 Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
481 Function_Return retVal
482 End_Function
483
484 { MethodType=Property DesignTime=False }
485 Procedure Set ComHandle OLE_HANDLE value
486 Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
487 End_Procedure
488
489 { MethodType=Property DesignTime=False }
490 Function ComTag Returns Variant
491 Variant retVal
492 Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_VARIANT to retVal
493 Function_Return retVal
494 End_Function
495
496 { MethodType=Property DesignTime=False }
497 Procedure Set ComTag Variant value
498 Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_VARIANT to value
499 End_Procedure
500
501 { MethodType=Property DesignTime=False }
502 Function ComVisible Returns Boolean
503 Boolean retVal
504 Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to retVal
505 Function_Return retVal
506 End_Function
507
508 { MethodType=Property DesignTime=False }
509 Procedure Set ComVisible Boolean value
510 Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to value
511 End_Procedure
512
513 { MethodType=Property DesignTime=False }
514 Function ComFont Returns Variant
515 Variant retVal
516 Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
517 Function_Return retVal
518 End_Function
519
520 { MethodType=Property DesignTime=False }
521 Procedure Set ComFont Variant value
522 Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
523 End_Procedure
524
525 { MethodType=Property DesignTime=False }
526 Function ComDragText Returns String
527 String retVal
528 Get ComProperty of (phDispatchDriver(Self)) 50 OLE_VT_BSTR to retVal
529 Function_Return retVal
530 End_Function
531
532 { MethodType=Property DesignTime=False }
533 Procedure Set ComDragText String value
534 Set ComProperty of (phDispatchDriver(Self)) 50 OLE_VT_BSTR to value
535 End_Procedure
536
537 { MethodType=Property DesignTime=False }
538 Function ComTextColor Returns OLE_COLOR
539 OLE_COLOR retVal
540 Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
541 Function_Return retVal
542 End_Function
543
544 { MethodType=Property DesignTime=False }
545 Procedure Set ComTextColor OLE_COLOR value
546 Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
547 End_Procedure
548
549 { MethodType=Property DesignTime=False }
550 Function ComIndex Returns Integer
551 Handle hDispatchDriver
552 Integer retVal
553 Get phDispatchDriver to hDispatchDriver
554 Get InvokeComMethod of hDispatchDriver 9 OLE_VT_I4 to retVal
555 Function_Return retVal
556 End_Function
557
558 Procedure ComSetMargins Integer llleft Integer lltop Integer llright Integer llbottom
559 Handle hDispatchDriver
560 Get phDispatchDriver to hDispatchDriver
561 Send PrepareParams to hDispatchDriver 4
562 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
563 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
564 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
565 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
566 Send InvokeComMethod to hDispatchDriver 11 OLE_VT_VOID
567 End_Procedure
568
569 { MethodType=Property DesignTime=False }
570 Function ComBackColor Returns OLE_COLOR
571 Handle hDispatchDriver
572 OLE_COLOR retVal
573 Get phDispatchDriver to hDispatchDriver
574 Get InvokeComMethod of hDispatchDriver -501 OLE_VT_I4 to retVal
575 Function_Return retVal
576 End_Function
577
578 Procedure ComSetIconPadding Integer llleft Integer lltop Integer llright Integer llbottom
579 Handle hDispatchDriver
580 Get phDispatchDriver to hDispatchDriver
581 Send PrepareParams to hDispatchDriver 4
582 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
583 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
584 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
585 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
586 Send InvokeComMethod to hDispatchDriver 32 OLE_VT_VOID
587 End_Procedure
588
589 Procedure ComGetRect Integer ByRef llleft Integer ByRef lltop Integer ByRef llright Integer ByRef llbottom
590 Handle hDispatchDriver
591 Get phDispatchDriver to hDispatchDriver
592 Send PrepareParams to hDispatchDriver 4
593 Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llleft
594 Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) lltop
595 Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llright
596 Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llbottom
597 Send InvokeComMethod to hDispatchDriver 53 OLE_VT_VOID
598 End_Procedure
599
600 { MethodType=Property DesignTime=False }
601 Function ComGroup Returns Variant
602 Handle hDispatchDriver
603 Variant retVal
604 Get phDispatchDriver to hDispatchDriver
605 Get InvokeComMethod of hDispatchDriver 100 OLE_VT_DISPATCH to retVal
606 Function_Return retVal
607 End_Function
608
609 { MethodType=Property DesignTime=False }
610 Function ComParentItems Returns Variant
611 Handle hDispatchDriver
612 Variant retVal
613 Get phDispatchDriver to hDispatchDriver
614 Get InvokeComMethod of hDispatchDriver 101 OLE_VT_DISPATCH to retVal
615 Function_Return retVal
616 End_Function
617
618 Function ComIsGroup Returns Boolean
619 Handle hDispatchDriver
620 Boolean retVal
621 Get phDispatchDriver to hDispatchDriver
622 Get InvokeComMethod of hDispatchDriver 102 OLE_VT_BOOL to retVal
623 Function_Return retVal
624 End_Function
625
626 Procedure ComRemove
627 Handle hDispatchDriver
628 Get phDispatchDriver to hDispatchDriver
629 Send InvokeComMethod to hDispatchDriver 103 OLE_VT_VOID
630 End_Procedure
631
632 Procedure ComSetSize Integer llcx Integer llcy Boolean llAutoHeight
633 Handle hDispatchDriver
634 Get phDispatchDriver to hDispatchDriver
635 Send PrepareParams to hDispatchDriver 3
636 Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
637 Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
638 Send DefineParam to hDispatchDriver OLE_VT_BOOL llAutoHeight
639 Send InvokeComMethod to hDispatchDriver 104 OLE_VT_VOID
640 End_Procedure
641
642 Procedure ComEnsureVisible
643 Handle hDispatchDriver
644 Get phDispatchDriver to hDispatchDriver
645 Send InvokeComMethod to hDispatchDriver 105 OLE_VT_VOID
646 End_Procedure
647
648 Procedure ComSetHandle OLE_HANDLE llhWnd
649 Handle hDispatchDriver
650 Get phDispatchDriver to hDispatchDriver
651 Send PrepareParams to hDispatchDriver 1
652 Send DefineParam to hDispatchDriver OLE_VT_I4 llhWnd
653 Send InvokeComMethod to hDispatchDriver 51 OLE_VT_VOID
654 End_Procedure
655End_Class
656
657// CoClass
658Class cSigCjComTaskPanelGroupItem is a cComAutomationObject
659 Import_Class_Protocol cSigCjComITaskPanelGroupItem
660
661 Procedure Construct_Object
662 Forward Send Construct_Object
663 Set peAutoCreate to acNoAutoCreate
664 End_Procedure
665End_Class
666
667Class cSigCjComITaskPanelGroupItems is a Mixin
668
669 { MethodType=Property DesignTime=False }
670 Function ComCount Returns Integer
671 Handle hDispatchDriver
672 Integer retVal
673 Get phDispatchDriver to hDispatchDriver
674 Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
675 Function_Return retVal
676 End_Function
677
678 Procedure ComRemove Integer llIndex
679 Handle hDispatchDriver
680 Get phDispatchDriver to hDispatchDriver
681 Send PrepareParams to hDispatchDriver 1
682 Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
683 Send InvokeComMethod to hDispatchDriver 2 OLE_VT_VOID
684 End_Procedure
685
686 Procedure ComClear
687 Handle hDispatchDriver
688 Get phDispatchDriver to hDispatchDriver
689 Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
690 End_Procedure
691
692 Function ComAdd Integer llId String llCaption OLEXTPTaskPanelItemType llType Variant llIconIndex Returns Variant
693 Handle hDispatchDriver
694 Variant retVal
695 Get phDispatchDriver to hDispatchDriver
696 Send PrepareParams to hDispatchDriver 4
697 Send DefineParam to hDispatchDriver OLE_VT_I4 llId
698 Send DefineParam to hDispatchDriver OLE_VT_BSTR llCaption
699 Send DefineParam to hDispatchDriver OLE_VT_I4 llType
700 Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIconIndex
701 Get InvokeComMethod of hDispatchDriver 4 OLE_VT_DISPATCH to retVal
702 Function_Return retVal
703 End_Function
704
705 Function ComFind Integer llId Returns Variant
706 Handle hDispatchDriver
707 Variant retVal
708 Get phDispatchDriver to hDispatchDriver
709 Send PrepareParams to hDispatchDriver 1
710 Send DefineParam to hDispatchDriver OLE_VT_I4 llId
711 Get InvokeComMethod of hDispatchDriver 5 OLE_VT_DISPATCH to retVal
712 Function_Return retVal
713 End_Function
714
715 Function ComInsert Integer llIndex Integer llId String llCaption OLEXTPTaskPanelItemType llType Variant llIconIndex Returns Variant
716 Handle hDispatchDriver
717 Variant retVal
718 Get phDispatchDriver to hDispatchDriver
719 Send PrepareParams to hDispatchDriver 5
720 Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
721 Send DefineParam to hDispatchDriver OLE_VT_I4 llId
722 Send DefineParam to hDispatchDriver OLE_VT_BSTR llCaption
723 Send DefineParam to hDispatchDriver OLE_VT_I4 llType
724 Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIconIndex
725 Get InvokeComMethod of hDispatchDriver 6 OLE_VT_DISPATCH to retVal
726 Function_Return retVal
727 End_Function
728
729 Procedure ComMove Variant llItem Integer llIndex
730 Handle hDispatchDriver
731 Get phDispatchDriver to hDispatchDriver
732 Send PrepareParams to hDispatchDriver 2
733 Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llItem
734 Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
735 Send InvokeComMethod to hDispatchDriver 8 OLE_VT_VOID
736 End_Procedure
737
738 // Returns a specific item.
739 { MethodType=Property DesignTime=False }
740 Function ComItem Integer llIndex Returns Variant
741 Handle hDispatchDriver
742 Variant retVal
743 Get phDispatchDriver to hDispatchDriver
744 Send PrepareParams to hDispatchDriver 1
745 Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
746 Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
747 Function_Return retVal
748 End_Function
749
750 { MethodType=Property DesignTime=False }
751 Function Com_NewEnum Returns Variant
752 Handle hDispatchDriver
753 Variant retVal
754 Get phDispatchDriver to hDispatchDriver
755 Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
756 Function_Return retVal
757 End_Function
758End_Class
759
760// CoClass
761Class cSigCjComTaskPanelGroupItems is a cComAutomationObject
762 Import_Class_Protocol cSigCjComITaskPanelGroupItems
763
764 Procedure Construct_Object
765 Forward Send Construct_Object
766 Set peAutoCreate to acNoAutoCreate
767 End_Procedure
768End_Class
769
770Class cSigCjComITaskPanelGroup is a Mixin
771
772 { MethodType=Property DesignTime=False }
773 Function ComCaption Returns String
774 String retVal
775 Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to retVal
776 Function_Return retVal
777 End_Function
778
779 { MethodType=Property DesignTime=False }
780 Procedure Set ComCaption String value
781 Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to value
782 End_Procedure
783
784 { MethodType=Property DesignTime=False }
785 Function ComTooltip Returns String
786 String retVal
787 Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to retVal
788 Function_Return retVal
789 End_Function
790
791 { MethodType=Property DesignTime=False }
792 Procedure Set ComTooltip String value
793 Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to value
794 End_Procedure
795
796 { MethodType=Property DesignTime=False }
797 Function ComEnabled Returns Boolean
798 Boolean retVal
799 Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
800 Function_Return retVal
801 End_Function
802
803 { MethodType=Property DesignTime=False }
804 Procedure Set ComEnabled Boolean value
805 Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
806 End_Procedure
807
808 { MethodType=Property DesignTime=False }
809 Function ComId Returns Integer
810 Integer retVal
811 Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
812 Function_Return retVal
813 End_Function
814
815 { MethodType=Property DesignTime=False }
816 Procedure Set ComId Integer value
817 Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
818 End_Procedure
819
820 { MethodType=Property DesignTime=False }
821 Function ComIconIndex Returns Integer
822 Integer retVal
823 Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
824 Function_Return retVal
825 End_Function
826
827 { MethodType=Property DesignTime=False }
828 Procedure Set ComIconIndex Integer value
829 Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
830 End_Procedure
831
832 { MethodType=Property DesignTime=False }
833 Function ComAllowDrag Returns OLEXTPTaskPanelItemAllowDrag
834 OLEXTPTaskPanelItemAllowDrag retVal
835 Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
836 Function_Return retVal
837 End_Function
838
839 { MethodType=Property DesignTime=False }
840 Procedure Set ComAllowDrag OLEXTPTaskPanelItemAllowDrag value
841 Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
842 End_Procedure
843
844 { MethodType=Property DesignTime=False }
845 Function ComAllowDrop Returns Boolean
846 Boolean retVal
847 Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
848 Function_Return retVal
849 End_Function
850
851 { MethodType=Property DesignTime=False }
852 Procedure Set ComAllowDrop Boolean value
853 Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
854 End_Procedure
855
856 { MethodType=Property DesignTime=False }
857 Function ComSpecial Returns Boolean
858 Boolean retVal
859 Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to retVal
860 Function_Return retVal
861 End_Function
862
863 { MethodType=Property DesignTime=False }
864 Procedure Set ComSpecial Boolean value
865 Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to value
866 End_Procedure
867
868 { MethodType=Property DesignTime=False }
869 Function ComCaptionVisible Returns Boolean
870 Boolean retVal
871 Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to retVal
872 Function_Return retVal
873 End_Function
874
875 { MethodType=Property DesignTime=False }
876 Procedure Set ComCaptionVisible Boolean value
877 Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to value
878 End_Procedure
879
880 { MethodType=Property DesignTime=False }
881 Function ComExpandable Returns Boolean
882 Boolean retVal
883 Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to retVal
884 Function_Return retVal
885 End_Function
886
887 { MethodType=Property DesignTime=False }
888 Procedure Set ComExpandable Boolean value
889 Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to value
890 End_Procedure
891
892 { MethodType=Property DesignTime=False }
893 Function ComExpanded Returns Boolean
894 Boolean retVal
895 Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to retVal
896 Function_Return retVal
897 End_Function
898
899 { MethodType=Property DesignTime=False }
900 Procedure Set ComExpanded Boolean value
901 Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to value
902 End_Procedure
903
904 { MethodType=Property DesignTime=False }
905 Function ComItemLayout Returns OLEXTPTaskPanelItemLayout
906 OLEXTPTaskPanelItemLayout retVal
907 Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
908 Function_Return retVal
909 End_Function
910
911 { MethodType=Property DesignTime=False }
912 Procedure Set ComItemLayout OLEXTPTaskPanelItemLayout value
913 Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
914 End_Procedure
915
916 { MethodType=Property DesignTime=False }
917 Function ComTag Returns Variant
918 Variant retVal
919 Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_VARIANT to retVal
920 Function_Return retVal
921 End_Function
922
923 { MethodType=Property DesignTime=False }
924 Procedure Set ComTag Variant value
925 Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_VARIANT to value
926 End_Procedure
927
928 { MethodType=Property DesignTime=False }
929 Function ComVisible Returns Boolean
930 Boolean retVal
931 Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to retVal
932 Function_Return retVal
933 End_Function
934
935 { MethodType=Property DesignTime=False }
936 Procedure Set ComVisible Boolean value
937 Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to value
938 End_Procedure
939
940 { MethodType=Property DesignTime=False }
941 Function ComFont Returns Variant
942 Variant retVal
943 Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
944 Function_Return retVal
945 End_Function
946
947 { MethodType=Property DesignTime=False }
948 Procedure Set ComFont Variant value
949 Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
950 End_Procedure
951
952 { MethodType=Property DesignTime=False }
953 Function ComMinimumClientHeight Returns Integer
954 Integer retVal
955 Get ComProperty of (phDispatchDriver(Self)) 106 OLE_VT_I4 to retVal
956 Function_Return retVal
957 End_Function
958
959 { MethodType=Property DesignTime=False }
960 Procedure Set ComMinimumClientHeight Integer value
961 Set ComProperty of (phDispatchDriver(Self)) 106 OLE_VT_I4 to value
962 End_Procedure
963
964 { MethodType=Property DesignTime=False }
965 Function ComIndex Returns Integer
966 Handle hDispatchDriver
967 Integer retVal
968 Get phDispatchDriver to hDispatchDriver
969 Get InvokeComMethod of hDispatchDriver 9 OLE_VT_I4 to retVal
970 Function_Return retVal
971 End_Function
972
973 { MethodType=Property DesignTime=False }
974 Function ComItems Returns Variant
975 Handle hDispatchDriver
976 Variant retVal
977 Get phDispatchDriver to hDispatchDriver
978 Get InvokeComMethod of hDispatchDriver 10 OLE_VT_DISPATCH to retVal
979 Function_Return retVal
980 End_Function
981
982 Procedure ComSetIconPadding Integer llleft Integer lltop Integer llright Integer llbottom
983 Handle hDispatchDriver
984 Get phDispatchDriver to hDispatchDriver
985 Send PrepareParams to hDispatchDriver 4
986 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
987 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
988 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
989 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
990 Send InvokeComMethod to hDispatchDriver 32 OLE_VT_VOID
991 End_Procedure
992
993 { MethodType=Property DesignTime=False }
994 Function ComGroup Returns Variant
995 Handle hDispatchDriver
996 Variant retVal
997 Get phDispatchDriver to hDispatchDriver
998 Get InvokeComMethod of hDispatchDriver 100 OLE_VT_DISPATCH to retVal
999 Function_Return retVal
1000 End_Function
1001
1002 { MethodType=Property DesignTime=False }
1003 Function ComParentItems Returns Variant
1004 Handle hDispatchDriver
1005 Variant retVal
1006 Get phDispatchDriver to hDispatchDriver
1007 Get InvokeComMethod of hDispatchDriver 101 OLE_VT_DISPATCH to retVal
1008 Function_Return retVal
1009 End_Function
1010
1011 Function ComIsGroup Returns Boolean
1012 Handle hDispatchDriver
1013 Boolean retVal
1014 Get phDispatchDriver to hDispatchDriver
1015 Get InvokeComMethod of hDispatchDriver 102 OLE_VT_BOOL to retVal
1016 Function_Return retVal
1017 End_Function
1018
1019 Procedure ComRemove
1020 Handle hDispatchDriver
1021 Get phDispatchDriver to hDispatchDriver
1022 Send InvokeComMethod to hDispatchDriver 103 OLE_VT_VOID
1023 End_Procedure
1024
1025 Procedure ComSetIconSize Integer llcx Integer llcy
1026 Handle hDispatchDriver
1027 Get phDispatchDriver to hDispatchDriver
1028 Send PrepareParams to hDispatchDriver 2
1029 Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
1030 Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
1031 Send InvokeComMethod to hDispatchDriver 104 OLE_VT_VOID
1032 End_Procedure
1033
1034 Procedure ComEnsureVisible
1035 Handle hDispatchDriver
1036 Get phDispatchDriver to hDispatchDriver
1037 Send InvokeComMethod to hDispatchDriver 105 OLE_VT_VOID
1038 End_Procedure
1039
1040 Procedure ComSetBackgroundImage Integer llImageIndex OLEXTPItemAlignment llAlignment
1041 Handle hDispatchDriver
1042 Get phDispatchDriver to hDispatchDriver
1043 Send PrepareParams to hDispatchDriver 2
1044 Send DefineParam to hDispatchDriver OLE_VT_I4 llImageIndex
1045 Send DefineParam to hDispatchDriver OLE_VT_I4 llAlignment
1046 Send InvokeComMethod to hDispatchDriver 108 OLE_VT_VOID
1047 End_Procedure
1048End_Class
1049
1050// CoClass
1051Class cSigCjComTaskPanelGroup is a cComAutomationObject
1052 Import_Class_Protocol cSigCjComITaskPanelGroup
1053
1054 Procedure Construct_Object
1055 Forward Send Construct_Object
1056 Set peAutoCreate to acNoAutoCreate
1057 End_Procedure
1058End_Class
1059
1060Class cSigCjComITaskPanelGroups is a Mixin
1061
1062 { MethodType=Property DesignTime=False }
1063 Function ComCount Returns Integer
1064 Handle hDispatchDriver
1065 Integer retVal
1066 Get phDispatchDriver to hDispatchDriver
1067 Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
1068 Function_Return retVal
1069 End_Function
1070
1071 Procedure ComRemove Integer llIndex
1072 Handle hDispatchDriver
1073 Get phDispatchDriver to hDispatchDriver
1074 Send PrepareParams to hDispatchDriver 1
1075 Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
1076 Send InvokeComMethod to hDispatchDriver 2 OLE_VT_VOID
1077 End_Procedure
1078
1079 Procedure ComClear
1080 Handle hDispatchDriver
1081 Get phDispatchDriver to hDispatchDriver
1082 Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
1083 End_Procedure
1084
1085 Function ComAdd Integer llId String llCaption Returns Variant
1086 Handle hDispatchDriver
1087 Variant retVal
1088 Get phDispatchDriver to hDispatchDriver
1089 Send PrepareParams to hDispatchDriver 2
1090 Send DefineParam to hDispatchDriver OLE_VT_I4 llId
1091 Send DefineParam to hDispatchDriver OLE_VT_BSTR llCaption
1092 Get InvokeComMethod of hDispatchDriver 4 OLE_VT_DISPATCH to retVal
1093 Function_Return retVal
1094 End_Function
1095
1096 Function ComFind Integer llId Returns Variant
1097 Handle hDispatchDriver
1098 Variant retVal
1099 Get phDispatchDriver to hDispatchDriver
1100 Send PrepareParams to hDispatchDriver 1
1101 Send DefineParam to hDispatchDriver OLE_VT_I4 llId
1102 Get InvokeComMethod of hDispatchDriver 5 OLE_VT_DISPATCH to retVal
1103 Function_Return retVal
1104 End_Function
1105
1106 Procedure ComMove Variant llItem Integer llIndex
1107 Handle hDispatchDriver
1108 Get phDispatchDriver to hDispatchDriver
1109 Send PrepareParams to hDispatchDriver 2
1110 Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llItem
1111 Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
1112 Send InvokeComMethod to hDispatchDriver 8 OLE_VT_VOID
1113 End_Procedure
1114
1115 // Returns a specific item.
1116 { MethodType=Property DesignTime=False }
1117 Function ComItem Integer llIndex Returns Variant
1118 Handle hDispatchDriver
1119 Variant retVal
1120 Get phDispatchDriver to hDispatchDriver
1121 Send PrepareParams to hDispatchDriver 1
1122 Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
1123 Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
1124 Function_Return retVal
1125 End_Function
1126
1127 { MethodType=Property DesignTime=False }
1128 Function Com_NewEnum Returns Variant
1129 Handle hDispatchDriver
1130 Variant retVal
1131 Get phDispatchDriver to hDispatchDriver
1132 Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
1133 Function_Return retVal
1134 End_Function
1135End_Class
1136
1137// CoClass
1138Class cSigCjComTaskPanelGroups is a cComAutomationObject
1139 Import_Class_Protocol cSigCjComITaskPanelGroups
1140
1141 Procedure Construct_Object
1142 Forward Send Construct_Object
1143 Set peAutoCreate to acNoAutoCreate
1144 End_Procedure
1145End_Class
1146
1147Class cSigCjComITaskPanelItems is a Mixin
1148
1149 { MethodType=Property DesignTime=False }
1150 Function ComCount Returns Integer
1151 Handle hDispatchDriver
1152 Integer retVal
1153 Get phDispatchDriver to hDispatchDriver
1154 Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
1155 Function_Return retVal
1156 End_Function
1157
1158 Procedure ComRemove Integer llIndex
1159 Handle hDispatchDriver
1160 Get phDispatchDriver to hDispatchDriver
1161 Send PrepareParams to hDispatchDriver 1
1162 Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
1163 Send InvokeComMethod to hDispatchDriver 2 OLE_VT_VOID
1164 End_Procedure
1165
1166 Procedure ComClear
1167 Handle hDispatchDriver
1168 Get phDispatchDriver to hDispatchDriver
1169 Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
1170 End_Procedure
1171
1172 Procedure ComMove Variant llItem Integer llIndex
1173 Handle hDispatchDriver
1174 Get phDispatchDriver to hDispatchDriver
1175 Send PrepareParams to hDispatchDriver 2
1176 Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llItem
1177 Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
1178 Send InvokeComMethod to hDispatchDriver 8 OLE_VT_VOID
1179 End_Procedure
1180
1181 { MethodType=Property DesignTime=False }
1182 Function Com_NewEnum Returns Variant
1183 Handle hDispatchDriver
1184 Variant retVal
1185 Get phDispatchDriver to hDispatchDriver
1186 Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
1187 Function_Return retVal
1188 End_Function
1189End_Class
1190
1191// CoClass
1192Class cSigCjComTaskPanelItems is a cComAutomationObject
1193 Import_Class_Protocol cSigCjComITaskPanelItems
1194
1195 Procedure Construct_Object
1196 Forward Send Construct_Object
1197 Set peAutoCreate to acNoAutoCreate
1198 End_Procedure
1199End_Class
1200
1201Class cSigCjComITaskPanelColorSet is a Mixin
1202
1203 { MethodType=Property DesignTime=False }
1204 Function ComBackgroundLight Returns OLE_COLOR
1205 OLE_COLOR retVal
1206 Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
1207 Function_Return retVal
1208 End_Function
1209
1210 { MethodType=Property DesignTime=False }
1211 Procedure Set ComBackgroundLight OLE_COLOR value
1212 Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
1213 End_Procedure
1214
1215 { MethodType=Property DesignTime=False }
1216 Function ComBackgroundDark Returns OLE_COLOR
1217 OLE_COLOR retVal
1218 Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
1219 Function_Return retVal
1220 End_Function
1221
1222 { MethodType=Property DesignTime=False }
1223 Procedure Set ComBackgroundDark OLE_COLOR value
1224 Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
1225 End_Procedure
1226
1227 { MethodType=Property DesignTime=False }
1228 Function ComHighlightHot Returns OLE_COLOR
1229 OLE_COLOR retVal
1230 Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
1231 Function_Return retVal
1232 End_Function
1233
1234 { MethodType=Property DesignTime=False }
1235 Procedure Set ComHighlightHot OLE_COLOR value
1236 Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
1237 End_Procedure
1238
1239 { MethodType=Property DesignTime=False }
1240 Function ComHighlightSelected Returns OLE_COLOR
1241 OLE_COLOR retVal
1242 Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
1243 Function_Return retVal
1244 End_Function
1245
1246 { MethodType=Property DesignTime=False }
1247 Procedure Set ComHighlightSelected OLE_COLOR value
1248 Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
1249 End_Procedure
1250
1251 { MethodType=Property DesignTime=False }
1252 Function ComHighlightPressed Returns OLE_COLOR
1253 OLE_COLOR retVal
1254 Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
1255 Function_Return retVal
1256 End_Function
1257
1258 { MethodType=Property DesignTime=False }
1259 Procedure Set ComHighlightPressed OLE_COLOR value
1260 Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
1261 End_Procedure
1262
1263 { MethodType=Property DesignTime=False }
1264 Function ComHighlightBorderTopLeft Returns OLE_COLOR
1265 OLE_COLOR retVal
1266 Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
1267 Function_Return retVal
1268 End_Function
1269
1270 { MethodType=Property DesignTime=False }
1271 Procedure Set ComHighlightBorderTopLeft OLE_COLOR value
1272 Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
1273 End_Procedure
1274
1275 { MethodType=Property DesignTime=False }
1276 Function ComHighlightBorderBottomRight Returns OLE_COLOR
1277 OLE_COLOR retVal
1278 Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
1279 Function_Return retVal
1280 End_Function
1281
1282 { MethodType=Property DesignTime=False }
1283 Procedure Set ComHighlightBorderBottomRight OLE_COLOR value
1284 Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
1285 End_Procedure
1286
1287 { MethodType=Property DesignTime=False }
1288 Function ComNormalGroupCaptionLight Returns OLE_COLOR
1289 OLE_COLOR retVal
1290 Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
1291 Function_Return retVal
1292 End_Function
1293
1294 { MethodType=Property DesignTime=False }
1295 Procedure Set ComNormalGroupCaptionLight OLE_COLOR value
1296 Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
1297 End_Procedure
1298
1299 { MethodType=Property DesignTime=False }
1300 Function ComNormalGroupCaptionDark Returns OLE_COLOR
1301 OLE_COLOR retVal
1302 Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
1303 Function_Return retVal
1304 End_Function
1305
1306 { MethodType=Property DesignTime=False }
1307 Procedure Set ComNormalGroupCaptionDark OLE_COLOR value
1308 Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
1309 End_Procedure
1310
1311 { MethodType=Property DesignTime=False }
1312 Function ComNormalGroupClient Returns OLE_COLOR
1313 OLE_COLOR retVal
1314 Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
1315 Function_Return retVal
1316 End_Function
1317
1318 { MethodType=Property DesignTime=False }
1319 Procedure Set ComNormalGroupClient OLE_COLOR value
1320 Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
1321 End_Procedure
1322
1323 { MethodType=Property DesignTime=False }
1324 Function ComNormalGroupClientBorder Returns OLE_COLOR
1325 OLE_COLOR retVal
1326 Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
1327 Function_Return retVal
1328 End_Function
1329
1330 { MethodType=Property DesignTime=False }
1331 Procedure Set ComNormalGroupClientBorder OLE_COLOR value
1332 Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
1333 End_Procedure
1334
1335 { MethodType=Property DesignTime=False }
1336 Function ComNormalGroupCaptionTextNormal Returns OLE_COLOR
1337 OLE_COLOR retVal
1338 Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to retVal
1339 Function_Return retVal
1340 End_Function
1341
1342 { MethodType=Property DesignTime=False }
1343 Procedure Set ComNormalGroupCaptionTextNormal OLE_COLOR value
1344 Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to value
1345 End_Procedure
1346
1347 { MethodType=Property DesignTime=False }
1348 Function ComNormalGroupCaptionTextHot Returns OLE_COLOR
1349 OLE_COLOR retVal
1350 Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to retVal
1351 Function_Return retVal
1352 End_Function
1353
1354 { MethodType=Property DesignTime=False }
1355 Procedure Set ComNormalGroupCaptionTextHot OLE_COLOR value
1356 Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to value
1357 End_Procedure
1358
1359 { MethodType=Property DesignTime=False }
1360 Function ComNormalGroupClientText Returns OLE_COLOR
1361 OLE_COLOR retVal
1362 Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
1363 Function_Return retVal
1364 End_Function
1365
1366 { MethodType=Property DesignTime=False }
1367 Procedure Set ComNormalGroupClientText OLE_COLOR value
1368 Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
1369 End_Procedure
1370
1371 { MethodType=Property DesignTime=False }
1372 Function ComNormalGroupClientLink Returns OLE_COLOR
1373 OLE_COLOR retVal
1374 Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
1375 Function_Return retVal
1376 End_Function
1377
1378 { MethodType=Property DesignTime=False }
1379 Procedure Set ComNormalGroupClientLink OLE_COLOR value
1380 Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
1381 End_Procedure
1382
1383 { MethodType=Property DesignTime=False }
1384 Function ComNormalGroupClientLinkHot Returns OLE_COLOR
1385 OLE_COLOR retVal
1386 Get ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to retVal
1387 Function_Return retVal
1388 End_Function
1389
1390 { MethodType=Property DesignTime=False }
1391 Procedure Set ComNormalGroupClientLinkHot OLE_COLOR value
1392 Set ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to value
1393 End_Procedure
1394
1395 { MethodType=Property DesignTime=False }
1396 Function ComNormalGroupClientLinkSelected Returns OLE_COLOR
1397 OLE_COLOR retVal
1398 Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to retVal
1399 Function_Return retVal
1400 End_Function
1401
1402 { MethodType=Property DesignTime=False }
1403 Procedure Set ComNormalGroupClientLinkSelected OLE_COLOR value
1404 Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to value
1405 End_Procedure
1406
1407 { MethodType=Property DesignTime=False }
1408 Function ComSpecialGroupCaptionLight Returns OLE_COLOR
1409 OLE_COLOR retVal
1410 Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to retVal
1411 Function_Return retVal
1412 End_Function
1413
1414 { MethodType=Property DesignTime=False }
1415 Procedure Set ComSpecialGroupCaptionLight OLE_COLOR value
1416 Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to value
1417 End_Procedure
1418
1419 { MethodType=Property DesignTime=False }
1420 Function ComSpecialGroupCaptionDark Returns OLE_COLOR
1421 OLE_COLOR retVal
1422 Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to retVal
1423 Function_Return retVal
1424 End_Function
1425
1426 { MethodType=Property DesignTime=False }
1427 Procedure Set ComSpecialGroupCaptionDark OLE_COLOR value
1428 Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to value
1429 End_Procedure
1430
1431 { MethodType=Property DesignTime=False }
1432 Function ComSpecialGroupClient Returns OLE_COLOR
1433 OLE_COLOR retVal
1434 Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to retVal
1435 Function_Return retVal
1436 End_Function
1437
1438 { MethodType=Property DesignTime=False }
1439 Procedure Set ComSpecialGroupClient OLE_COLOR value
1440 Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to value
1441 End_Procedure
1442
1443 { MethodType=Property DesignTime=False }
1444 Function ComSpecialGroupClientBorder Returns OLE_COLOR
1445 OLE_COLOR retVal
1446 Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to retVal
1447 Function_Return retVal
1448 End_Function
1449
1450 { MethodType=Property DesignTime=False }
1451 Procedure Set ComSpecialGroupClientBorder OLE_COLOR value
1452 Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to value
1453 End_Procedure
1454
1455 { MethodType=Property DesignTime=False }
1456 Function ComSpecialGroupCaptionTextNormal Returns OLE_COLOR
1457 OLE_COLOR retVal
1458 Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to retVal
1459 Function_Return retVal
1460 End_Function
1461
1462 { MethodType=Property DesignTime=False }
1463 Procedure Set ComSpecialGroupCaptionTextNormal OLE_COLOR value
1464 Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to value
1465 End_Procedure
1466
1467 { MethodType=Property DesignTime=False }
1468 Function ComSpecialGroupCaptionTextHot Returns OLE_COLOR
1469 OLE_COLOR retVal
1470 Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to retVal
1471 Function_Return retVal
1472 End_Function
1473
1474 { MethodType=Property DesignTime=False }
1475 Procedure Set ComSpecialGroupCaptionTextHot OLE_COLOR value
1476 Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to value
1477 End_Procedure
1478
1479 { MethodType=Property DesignTime=False }
1480 Function ComSpecialGroupClientText Returns OLE_COLOR
1481 OLE_COLOR retVal
1482 Get ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to retVal
1483 Function_Return retVal
1484 End_Function
1485
1486 { MethodType=Property DesignTime=False }
1487 Procedure Set ComSpecialGroupClientText OLE_COLOR value
1488 Set ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to value
1489 End_Procedure
1490
1491 { MethodType=Property DesignTime=False }
1492 Function ComSpecialGroupClientLink Returns OLE_COLOR
1493 OLE_COLOR retVal
1494 Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to retVal
1495 Function_Return retVal
1496 End_Function
1497
1498 { MethodType=Property DesignTime=False }
1499 Procedure Set ComSpecialGroupClientLink OLE_COLOR value
1500 Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to value
1501 End_Procedure
1502
1503 { MethodType=Property DesignTime=False }
1504 Function ComSpecialGroupClientLinkHot Returns OLE_COLOR
1505 OLE_COLOR retVal
1506 Get ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to retVal
1507 Function_Return retVal
1508 End_Function
1509
1510 { MethodType=Property DesignTime=False }
1511 Procedure Set ComSpecialGroupClientLinkHot OLE_COLOR value
1512 Set ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to value
1513 End_Procedure
1514
1515 { MethodType=Property DesignTime=False }
1516 Function ComSpecialGroupClientLinkSelected Returns OLE_COLOR
1517 OLE_COLOR retVal
1518 Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to retVal
1519 Function_Return retVal
1520 End_Function
1521
1522 { MethodType=Property DesignTime=False }
1523 Procedure Set ComSpecialGroupClientLinkSelected OLE_COLOR value
1524 Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to value
1525 End_Procedure
1526End_Class
1527
1528// CoClass
1529Class cSigCjComTaskPanelColorSet is a cComAutomationObject
1530 Import_Class_Protocol cSigCjComITaskPanelColorSet
1531
1532 Procedure Construct_Object
1533 Forward Send Construct_Object
1534 Set peAutoCreate to acNoAutoCreate
1535 End_Procedure
1536End_Class
1537
1538// Dispatch interface for Xtreme TaskPanel Control
1539Class cSigCjCom_DTaskPanel is a Mixin
1540
1541 { MethodType=Property DesignTime=False }
1542 Function ComVisualTheme Returns OLEXTPTaskPanelVisualTheme
1543 OLEXTPTaskPanelVisualTheme retVal
1544 Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
1545 Function_Return retVal
1546 End_Function
1547
1548 { MethodType=Property DesignTime=False }
1549 Procedure Set ComVisualTheme OLEXTPTaskPanelVisualTheme value
1550 Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
1551 End_Procedure
1552
1553 { MethodType=Property DesignTime=False }
1554 Function ComExpandable Returns Boolean
1555 Boolean retVal
1556 Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
1557 Function_Return retVal
1558 End_Function
1559
1560 { MethodType=Property DesignTime=False }
1561 Procedure Set ComExpandable Boolean value
1562 Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
1563 End_Procedure
1564
1565 { MethodType=Property DesignTime=False }
1566 Function ComAnimation Returns OLEXTPTaskPanelAnimation
1567 OLEXTPTaskPanelAnimation retVal
1568 Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
1569 Function_Return retVal
1570 End_Function
1571
1572 { MethodType=Property DesignTime=False }
1573 Procedure Set ComAnimation OLEXTPTaskPanelAnimation value
1574 Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
1575 End_Procedure
1576
1577 { MethodType=Property DesignTime=False }
1578 Function ComHWnd Returns OLE_HANDLE
1579 OLE_HANDLE retVal
1580 Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
1581 Function_Return retVal
1582 End_Function
1583
1584 { MethodType=Property DesignTime=False }
1585 Procedure Set ComHWnd OLE_HANDLE value
1586 Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
1587 End_Procedure
1588
1589 { MethodType=Property DesignTime=False }
1590 Function ComEnabled Returns Boolean
1591 Boolean retVal
1592 Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
1593 Function_Return retVal
1594 End_Function
1595
1596 { MethodType=Property DesignTime=False }
1597 Procedure Set ComEnabled Boolean value
1598 Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
1599 End_Procedure
1600
1601 { MethodType=Property DesignTime=False }
1602 Function ComIcons Returns Variant
1603 Variant retVal
1604 Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_DISPATCH to retVal
1605 Function_Return retVal
1606 End_Function
1607
1608 { MethodType=Property DesignTime=False }
1609 Procedure Set ComIcons Variant value
1610 Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_DISPATCH to value
1611 End_Procedure
1612
1613 { MethodType=Property DesignTime=False }
1614 Function ComCaptionFont Returns Variant
1615 Variant retVal
1616 Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DISPATCH to retVal
1617 Function_Return retVal
1618 End_Function
1619
1620 { MethodType=Property DesignTime=False }
1621 Procedure Set ComCaptionFont Variant value
1622 Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DISPATCH to value
1623 End_Procedure
1624
1625 { MethodType=Property DesignTime=False }
1626 Function ComItemsFont Returns Variant
1627 Variant retVal
1628 Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_DISPATCH to retVal
1629 Function_Return retVal
1630 End_Function
1631
1632 { MethodType=Property DesignTime=False }
1633 Procedure Set ComItemsFont Variant value
1634 Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_DISPATCH to value
1635 End_Procedure
1636
1637 { MethodType=Property DesignTime=False }
1638 Function ComBehaviour Returns OLEXTPTaskPanelBehaviour
1639 OLEXTPTaskPanelBehaviour retVal
1640 Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to retVal
1641 Function_Return retVal
1642 End_Function
1643
1644 { MethodType=Property DesignTime=False }
1645 Procedure Set ComBehaviour OLEXTPTaskPanelBehaviour value
1646 Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to value
1647 End_Procedure
1648
1649 { MethodType=Property DesignTime=False }
1650 Function ComSelectItemOnFocus Returns Boolean
1651 Boolean retVal
1652 Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to retVal
1653 Function_Return retVal
1654 End_Function
1655
1656 { MethodType=Property DesignTime=False }
1657 Procedure Set ComSelectItemOnFocus Boolean value
1658 Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to value
1659 End_Procedure
1660
1661 { MethodType=Property DesignTime=False }
1662 Function ComAllowDrag Returns OLEXTPTaskPanelItemAllowDrag
1663 OLEXTPTaskPanelItemAllowDrag retVal
1664 Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
1665 Function_Return retVal
1666 End_Function
1667
1668 { MethodType=Property DesignTime=False }
1669 Procedure Set ComAllowDrag OLEXTPTaskPanelItemAllowDrag value
1670 Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
1671 End_Procedure
1672
1673 { MethodType=Property DesignTime=False }
1674 Function ComItemLayout Returns OLEXTPTaskPanelItemLayout
1675 OLEXTPTaskPanelItemLayout retVal
1676 Get ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to retVal
1677 Function_Return retVal
1678 End_Function
1679
1680 { MethodType=Property DesignTime=False }
1681 Procedure Set ComItemLayout OLEXTPTaskPanelItemLayout value
1682 Set ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to value
1683 End_Procedure
1684
1685 { MethodType=Property DesignTime=False }
1686 Function ComHotTrackStyle Returns OLEXTPTaskPanelHotTrackStyle
1687 OLEXTPTaskPanelHotTrackStyle retVal
1688 Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to retVal
1689 Function_Return retVal
1690 End_Function
1691
1692 { MethodType=Property DesignTime=False }
1693 Procedure Set ComHotTrackStyle OLEXTPTaskPanelHotTrackStyle value
1694 Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to value
1695 End_Procedure
1696
1697 { MethodType=Property DesignTime=False }
1698 Function ComDrawFocusRect Returns Boolean
1699 Boolean retVal
1700 Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_BOOL to retVal
1701 Function_Return retVal
1702 End_Function
1703
1704 { MethodType=Property DesignTime=False }
1705 Procedure Set ComDrawFocusRect Boolean value
1706 Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_BOOL to value
1707 End_Procedure
1708
1709 { MethodType=Property DesignTime=False }
1710 Function ComLockRedraw Returns Boolean
1711 Boolean retVal
1712 Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_BOOL to retVal
1713 Function_Return retVal
1714 End_Function
1715
1716 { MethodType=Property DesignTime=False }
1717 Procedure Set ComLockRedraw Boolean value
1718 Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_BOOL to value
1719 End_Procedure
1720
1721 { MethodType=Property DesignTime=False }
1722 Function ComSingleSelection Returns Boolean
1723 Boolean retVal
1724 Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_BOOL to retVal
1725 Function_Return retVal
1726 End_Function
1727
1728 { MethodType=Property DesignTime=False }
1729 Procedure Set ComSingleSelection Boolean value
1730 Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_BOOL to value
1731 End_Procedure
1732
1733 { MethodType=Property DesignTime=False }
1734 Function ComFocusedItem Returns Variant
1735 Variant retVal
1736 Get ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_DISPATCH to retVal
1737 Function_Return retVal
1738 End_Function
1739
1740 { MethodType=Property DesignTime=False }
1741 Procedure Set ComFocusedItem Variant value
1742 Set ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_DISPATCH to value
1743 End_Procedure
1744
1745 { MethodType=Property DesignTime=False }
1746 Function ComMultiColumn Returns Boolean
1747 Boolean retVal
1748 Get ComProperty of (phDispatchDriver(Self)) 35 OLE_VT_BOOL to retVal
1749 Function_Return retVal
1750 End_Function
1751
1752 { MethodType=Property DesignTime=False }
1753 Procedure Set ComMultiColumn Boolean value
1754 Set ComProperty of (phDispatchDriver(Self)) 35 OLE_VT_BOOL to value
1755 End_Procedure
1756
1757 { MethodType=Property DesignTime=False }
1758 Function ComColumnWidth Returns Integer
1759 Integer retVal
1760 Get ComProperty of (phDispatchDriver(Self)) 36 OLE_VT_I4 to retVal
1761 Function_Return retVal
1762 End_Function
1763
1764 { MethodType=Property DesignTime=False }
1765 Procedure Set ComColumnWidth Integer value
1766 Set ComProperty of (phDispatchDriver(Self)) 36 OLE_VT_I4 to value
1767 End_Procedure
1768
1769 { MethodType=Property DesignTime=False }
1770 Function ComRightToLeft Returns Boolean
1771 Boolean retVal
1772 Get ComProperty of (phDispatchDriver(Self)) 37 OLE_VT_BOOL to retVal
1773 Function_Return retVal
1774 End_Function
1775
1776 { MethodType=Property DesignTime=False }
1777 Procedure Set ComRightToLeft Boolean value
1778 Set ComProperty of (phDispatchDriver(Self)) 37 OLE_VT_BOOL to value
1779 End_Procedure
1780
1781 { MethodType=Property DesignTime=False }
1782 Function ComMinimumGroupClientHeight Returns Integer
1783 Integer retVal
1784 Get ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_I4 to retVal
1785 Function_Return retVal
1786 End_Function
1787
1788 { MethodType=Property DesignTime=False }
1789 Procedure Set ComMinimumGroupClientHeight Integer value
1790 Set ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_I4 to value
1791 End_Procedure
1792
1793 { MethodType=Property DesignTime=False }
1794 Function ComHotItem Returns Variant
1795 Variant retVal
1796 Get ComProperty of (phDispatchDriver(Self)) 41 OLE_VT_DISPATCH to retVal
1797 Function_Return retVal
1798 End_Function
1799
1800 { MethodType=Property DesignTime=False }
1801 Procedure Set ComHotItem Variant value
1802 Set ComProperty of (phDispatchDriver(Self)) 41 OLE_VT_DISPATCH to value
1803 End_Procedure
1804
1805 // Returns/Sets whether this control can act as an OLE drop target.
1806 { MethodType=Property DesignTime=False }
1807 Function ComOLEDropMode Returns OLEOLEDropConstants
1808 OLEOLEDropConstants retVal
1809 Get ComProperty of (phDispatchDriver(Self)) 42 OLE_VT_I4 to retVal
1810 Function_Return retVal
1811 End_Function
1812
1813 // Returns/Sets whether this control can act as an OLE drop target.
1814 { MethodType=Property DesignTime=False }
1815 Procedure Set ComOLEDropMode OLEOLEDropConstants value
1816 Set ComProperty of (phDispatchDriver(Self)) 42 OLE_VT_I4 to value
1817 End_Procedure
1818
1819 { MethodType=Property DesignTime=False }
1820 Function ComBorderStyle Returns OLEXTPTaskPanelBorderStyle
1821 OLEXTPTaskPanelBorderStyle retVal
1822 Get ComProperty of (phDispatchDriver(Self)) 44 OLE_VT_I4 to retVal
1823 Function_Return retVal
1824 End_Function
1825
1826 { MethodType=Property DesignTime=False }
1827 Procedure Set ComBorderStyle OLEXTPTaskPanelBorderStyle value
1828 Set ComProperty of (phDispatchDriver(Self)) 44 OLE_VT_I4 to value
1829 End_Procedure
1830
1831 { MethodType=Property DesignTime=False }
1832 Function ComHotItemMousePointer Returns Integer
1833 Integer retVal
1834 Get ComProperty of (phDispatchDriver(Self)) 45 OLE_VT_I4 to retVal
1835 Function_Return retVal
1836 End_Function
1837
1838 { MethodType=Property DesignTime=False }
1839 Procedure Set ComHotItemMousePointer Integer value
1840 Set ComProperty of (phDispatchDriver(Self)) 45 OLE_VT_I4 to value
1841 End_Procedure
1842
1843 { MethodType=Property DesignTime=False }
1844 Function ComEnableAnimation Returns Boolean
1845 Boolean retVal
1846 Get ComProperty of (phDispatchDriver(Self)) 47 OLE_VT_BOOL to retVal
1847 Function_Return retVal
1848 End_Function
1849
1850 { MethodType=Property DesignTime=False }
1851 Procedure Set ComEnableAnimation Boolean value
1852 Set ComProperty of (phDispatchDriver(Self)) 47 OLE_VT_BOOL to value
1853 End_Procedure
1854
1855 { MethodType=Property DesignTime=False }
1856 Function ComEnableMarkup Returns Boolean
1857 Boolean retVal
1858 Get ComProperty of (phDispatchDriver(Self)) 49 OLE_VT_BOOL to retVal
1859 Function_Return retVal
1860 End_Function
1861
1862 { MethodType=Property DesignTime=False }
1863 Procedure Set ComEnableMarkup Boolean value
1864 Set ComProperty of (phDispatchDriver(Self)) 49 OLE_VT_BOOL to value
1865 End_Procedure
1866
1867 { MethodType=Property DesignTime=False }
1868 Function ComGroups Returns Variant
1869 Handle hDispatchDriver
1870 Variant retVal
1871 Get phDispatchDriver to hDispatchDriver
1872 Get InvokeComMethod of hDispatchDriver 1 OLE_VT_DISPATCH to retVal
1873 Function_Return retVal
1874 End_Function
1875
1876 Procedure ComSetImageList Variant llImageList
1877 Handle hDispatchDriver
1878 Get phDispatchDriver to hDispatchDriver
1879 Send PrepareParams to hDispatchDriver 1
1880 Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llImageList
1881 Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
1882 End_Procedure
1883
1884 Procedure ComAddIconHandle Integer llHandle
1885 Handle hDispatchDriver
1886 Get phDispatchDriver to hDispatchDriver
1887 Send PrepareParams to hDispatchDriver 1
1888 Send DefineParam to hDispatchDriver OLE_VT_I4 llHandle
1889 Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
1890 End_Procedure
1891
1892 Procedure ComSetMargins Integer llleft Integer lltop Integer llright Integer llbottom Integer llMiddle
1893 Handle hDispatchDriver
1894 Get phDispatchDriver to hDispatchDriver
1895 Send PrepareParams to hDispatchDriver 5
1896 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
1897 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
1898 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
1899 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
1900 Send DefineParam to hDispatchDriver OLE_VT_I4 llMiddle
1901 Send InvokeComMethod to hDispatchDriver 7 OLE_VT_VOID
1902 End_Procedure
1903
1904 Procedure ComSetGroupImageList Variant llImageList
1905 Handle hDispatchDriver
1906 Get phDispatchDriver to hDispatchDriver
1907 Send PrepareParams to hDispatchDriver 1
1908 Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llImageList
1909 Send InvokeComMethod to hDispatchDriver 8 OLE_VT_VOID
1910 End_Procedure
1911
1912 Procedure ComReposition
1913 Handle hDispatchDriver
1914 Get phDispatchDriver to hDispatchDriver
1915 Send InvokeComMethod to hDispatchDriver 9 OLE_VT_VOID
1916 End_Procedure
1917
1918 Procedure ComSetIconSize Integer llcx Integer llcy
1919 Handle hDispatchDriver
1920 Get phDispatchDriver to hDispatchDriver
1921 Send PrepareParams to hDispatchDriver 2
1922 Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
1923 Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
1924 Send InvokeComMethod to hDispatchDriver 18 OLE_VT_VOID
1925 End_Procedure
1926
1927 Procedure ComSetGroupInnerMargins Integer llleft Integer lltop Integer llright Integer llbottom
1928 Handle hDispatchDriver
1929 Get phDispatchDriver to hDispatchDriver
1930 Send PrepareParams to hDispatchDriver 4
1931 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
1932 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
1933 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
1934 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
1935 Send InvokeComMethod to hDispatchDriver 20 OLE_VT_VOID
1936 End_Procedure
1937
1938 Procedure ComSetGroupOuterMargins Integer llleft Integer lltop Integer llright Integer llbottom
1939 Handle hDispatchDriver
1940 Get phDispatchDriver to hDispatchDriver
1941 Send PrepareParams to hDispatchDriver 4
1942 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
1943 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
1944 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
1945 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
1946 Send InvokeComMethod to hDispatchDriver 21 OLE_VT_VOID
1947 End_Procedure
1948
1949 Procedure ComSetItemInnerMargins Integer llleft Integer lltop Integer llright Integer llbottom
1950 Handle hDispatchDriver
1951 Get phDispatchDriver to hDispatchDriver
1952 Send PrepareParams to hDispatchDriver 4
1953 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
1954 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
1955 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
1956 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
1957 Send InvokeComMethod to hDispatchDriver 22 OLE_VT_VOID
1958 End_Procedure
1959
1960 Procedure ComSetItemOuterMargins Integer llleft Integer lltop Integer llright Integer llbottom
1961 Handle hDispatchDriver
1962 Get phDispatchDriver to hDispatchDriver
1963 Send PrepareParams to hDispatchDriver 4
1964 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
1965 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
1966 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
1967 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
1968 Send InvokeComMethod to hDispatchDriver 23 OLE_VT_VOID
1969 End_Procedure
1970
1971 Procedure ComRenameItem Variant llItem
1972 Handle hDispatchDriver
1973 Get phDispatchDriver to hDispatchDriver
1974 Send PrepareParams to hDispatchDriver 1
1975 Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llItem
1976 Send InvokeComMethod to hDispatchDriver 24 OLE_VT_VOID
1977 End_Procedure
1978
1979 { MethodType=Property DesignTime=False }
1980 Function ComColorSet Returns Variant
1981 Handle hDispatchDriver
1982 Variant retVal
1983 Get phDispatchDriver to hDispatchDriver
1984 Get InvokeComMethod of hDispatchDriver 25 OLE_VT_DISPATCH to retVal
1985 Function_Return retVal
1986 End_Function
1987
1988 { MethodType=Property DesignTime=False }
1989 Function ComToolTipContext Returns Variant
1990 Handle hDispatchDriver
1991 Variant retVal
1992 Get phDispatchDriver to hDispatchDriver
1993 Get InvokeComMethod of hDispatchDriver 29 OLE_VT_DISPATCH to retVal
1994 Function_Return retVal
1995 End_Function
1996
1997 Function ComCreateItemFromDropArray Variant llByteArray Returns Variant
1998 Handle hDispatchDriver
1999 Variant retVal
2000 Get phDispatchDriver to hDispatchDriver
2001 Send PrepareParams to hDispatchDriver 1
2002 Send DefineParam to hDispatchDriver OLE_VT_VARIANT llByteArray
2003 Get InvokeComMethod of hDispatchDriver 30 OLE_VT_DISPATCH to retVal
2004 Function_Return retVal
2005 End_Function
2006
2007 Procedure ComSetItemTextFormat OLEXTPItemAlignment llFormat
2008 Handle hDispatchDriver
2009 Get phDispatchDriver to hDispatchDriver
2010 Send PrepareParams to hDispatchDriver 1
2011 Send DefineParam to hDispatchDriver OLE_VT_I4 llFormat
2012 Send InvokeComMethod to hDispatchDriver 31 OLE_VT_VOID
2013 End_Procedure
2014
2015 Procedure ComSetImageLayoutIconPadding Integer llleft Integer lltop Integer llright Integer llbottom
2016 Handle hDispatchDriver
2017 Get phDispatchDriver to hDispatchDriver
2018 Send PrepareParams to hDispatchDriver 4
2019 Send DefineParam to hDispatchDriver OLE_VT_I4 llleft
2020 Send DefineParam to hDispatchDriver OLE_VT_I4 lltop
2021 Send DefineParam to hDispatchDriver OLE_VT_I4 llright
2022 Send DefineParam to hDispatchDriver OLE_VT_I4 llbottom
2023 Send InvokeComMethod to hDispatchDriver 32 OLE_VT_VOID
2024 End_Procedure
2025
2026 Procedure ComSetGroupIconSize Integer llcx Integer llcy
2027 Handle hDispatchDriver
2028 Get phDispatchDriver to hDispatchDriver
2029 Send PrepareParams to hDispatchDriver 2
2030 Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
2031 Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
2032 Send InvokeComMethod to hDispatchDriver 33 OLE_VT_VOID
2033 End_Procedure
2034
2035 Procedure ComAboutBox
2036 Handle hDispatchDriver
2037 Get phDispatchDriver to hDispatchDriver
2038 Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
2039 End_Procedure
2040
2041 Procedure ComDoPropExchange Variant llpPX
2042 Handle hDispatchDriver
2043 Get phDispatchDriver to hDispatchDriver
2044 Send PrepareParams to hDispatchDriver 1
2045 Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llpPX
2046 Send InvokeComMethod to hDispatchDriver 34 OLE_VT_VOID
2047 End_Procedure
2048
2049 { MethodType=Property DesignTime=False }
2050 Function ComClientHeight Returns Integer
2051 Handle hDispatchDriver
2052 Integer retVal
2053 Get phDispatchDriver to hDispatchDriver
2054 Get InvokeComMethod of hDispatchDriver 38 OLE_VT_I4 to retVal
2055 Function_Return retVal
2056 End_Function
2057
2058 Function ComFind Integer llId Returns Variant
2059 Handle hDispatchDriver
2060 Variant retVal
2061 Get phDispatchDriver to hDispatchDriver
2062 Send PrepareParams to hDispatchDriver 1
2063 Send DefineParam to hDispatchDriver OLE_VT_I4 llId
2064 Get InvokeComMethod of hDispatchDriver 39 OLE_VT_DISPATCH to retVal
2065 Function_Return retVal
2066 End_Function
2067
2068 { MethodType=Property DesignTime=False }
2069 Function ComDragOverItem Returns Variant
2070 Handle hDispatchDriver
2071 Variant retVal
2072 Get phDispatchDriver to hDispatchDriver
2073 Get InvokeComMethod of hDispatchDriver 43 OLE_VT_DISPATCH to retVal
2074 Function_Return retVal
2075 End_Function
2076
2077 Procedure ComSetGroupTextFormat OLEXTPItemAlignment llFormat
2078 Handle hDispatchDriver
2079 Get phDispatchDriver to hDispatchDriver
2080 Send PrepareParams to hDispatchDriver 1
2081 Send DefineParam to hDispatchDriver OLE_VT_I4 llFormat
2082 Send InvokeComMethod to hDispatchDriver 48 OLE_VT_VOID
2083 End_Procedure
2084End_Class
2085
2086// Event interface for Xtreme TaskPanel Control
2087Class cSigCjCom_DTaskPanelEvents is a Mixin
2088
2089 { MethodType=Event }
2090 Procedure OnComItemClick Variant llItem
2091 End_Procedure
2092
2093 { MethodType=Event }
2094 Procedure OnComItemRButtonDown Variant llItem
2095 End_Procedure
2096
2097 { MethodType=Event }
2098 Procedure OnComBeginDrag Variant llItem
2099 End_Procedure
2100
2101 { MethodType=Event }
2102 Procedure OnComItemDrop Variant llItem
2103 End_Procedure
2104
2105 { MethodType=Event }
2106 Procedure OnComGroupExpanding Variant llGroup Boolean llExpanding Boolean ByRef llCancel
2107 End_Procedure
2108
2109 { MethodType=Event }
2110 Procedure OnComGroupExpanded Variant llGroup
2111 End_Procedure
2112
2113 { MethodType=Event }
2114 Procedure OnComItemDblClick Variant llItem
2115 End_Procedure
2116
2117 { MethodType=Event }
2118 Procedure OnComFocusedItemChanged
2119 End_Procedure
2120
2121 { MethodType=Event }
2122 Procedure OnComClientHeightChanged
2123 End_Procedure
2124
2125 { MethodType=Event }
2126 Procedure OnComEndRenameItem Variant llItem String ByRef llNewString Boolean ByRef llCancel
2127 End_Procedure
2128
2129 { MethodType=Event }
2130 Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
2131 End_Procedure
2132
2133 { MethodType=Event }
2134 Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
2135 End_Procedure
2136
2137 { MethodType=Event }
2138 Procedure OnComHotItemChanged
2139 End_Procedure
2140
2141 { MethodType=Event }
2142 Procedure OnComOLEDragOver Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly Short llstate
2143 End_Procedure
2144
2145 { MethodType=Event }
2146 Procedure OnComOLEDragDrop Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
2147 End_Procedure
2148
2149 { MethodType=Event }
2150 Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
2151 End_Procedure
2152
2153 { MethodType=Event }
2154 Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
2155 End_Procedure
2156
2157 { MethodType=Event }
2158 Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
2159 End_Procedure
2160
2161 { MethodType=Event }
2162 Procedure OnComGroupMove Variant llGroup
2163 End_Procedure
2164
2165 { Visibility=Private }
2166 Procedure RegisterComEvents
2167 Send RegisterComEvent 1 msg_OnComItemClick
2168 Send RegisterComEvent 2 msg_OnComItemRButtonDown
2169 Send RegisterComEvent 3 msg_OnComBeginDrag
2170 Send RegisterComEvent 4 msg_OnComItemDrop
2171 Send RegisterComEvent 5 msg_OnComGroupExpanding
2172 Send RegisterComEvent 6 msg_OnComGroupExpanded
2173 Send RegisterComEvent 7 msg_OnComItemDblClick
2174 Send RegisterComEvent 8 msg_OnComFocusedItemChanged
2175 Send RegisterComEvent 9 msg_OnComClientHeightChanged
2176 Send RegisterComEvent 10 msg_OnComEndRenameItem
2177 Send RegisterComEvent -604 msg_OnComKeyUp
2178 Send RegisterComEvent -602 msg_OnComKeyDown
2179 Send RegisterComEvent 11 msg_OnComHotItemChanged
2180 Send RegisterComEvent 300 msg_OnComOLEDragOver
2181 Send RegisterComEvent 301 msg_OnComOLEDragDrop
2182 Send RegisterComEvent -605 msg_OnComMouseDown
2183 Send RegisterComEvent -606 msg_OnComMouseMove
2184 Send RegisterComEvent -607 msg_OnComMouseUp
2185 Send RegisterComEvent 12 msg_OnComGroupMove
2186 End_Procedure
2187End_Class
2188
2189// CoClass
2190// Xtreme TaskPanel Control
2191{ CLSID=L_cSigCjComTaskPanel }
2192Class cSigCjComTaskPanel is a cComActiveXControl
2193 Import_Class_Protocol cSigCjCom_DTaskPanel
2194 Import_Class_Protocol cSigCjCom_DTaskPanelEvents
2195
2196 Procedure Construct_Object
2197 Forward Send Construct_Object
2198 Set psProgID to L_cSigCjComTaskPanel
2199 Set psEventId to "{FAD3AC9F-DC51-46E1-8484-90143C199441}"
2200 Set psLicenseKey to L_cSigCjKeyTaskPanel
2201 Set peAutoCreate to acDeferredAutoCreate
2202 End_Procedure
2203End_Class
2204
2205// TaskPanel Global Settings
2206Class cSigCjComITaskPanelGlobalSettings is a Mixin
2207
2208 { MethodType=Property DesignTime=False }
2209 Function ComResourceFile Returns String
2210 String retVal
2211 Get ComProperty of (phDispatchDriver(Self)) 100 OLE_VT_BSTR to retVal
2212 Function_Return retVal
2213 End_Function
2214
2215 { MethodType=Property DesignTime=False }
2216 Procedure Set ComResourceFile String value
2217 Set ComProperty of (phDispatchDriver(Self)) 100 OLE_VT_BSTR to value
2218 End_Procedure
2219
2220 { MethodType=Property DesignTime=False }
2221 Function ComLicense Returns String
2222 String retVal
2223 Get ComProperty of (phDispatchDriver(Self)) 101 OLE_VT_BSTR to retVal
2224 Function_Return retVal
2225 End_Function
2226
2227 { MethodType=Property DesignTime=False }
2228 Procedure Set ComLicense String value
2229 Set ComProperty of (phDispatchDriver(Self)) 101 OLE_VT_BSTR to value
2230 End_Procedure
2231
2232 { MethodType=Property DesignTime=False }
2233 Function ComTitle Returns String
2234 String retVal
2235 Get ComProperty of (phDispatchDriver(Self)) 102 OLE_VT_BSTR to retVal
2236 Function_Return retVal
2237 End_Function
2238
2239 { MethodType=Property DesignTime=False }
2240 Procedure Set ComTitle String value
2241 Set ComProperty of (phDispatchDriver(Self)) 102 OLE_VT_BSTR to value
2242 End_Procedure
2243
2244 { MethodType=Property DesignTime=False }
2245 Function ComOffice2007Images Returns String
2246 String retVal
2247 Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BSTR to retVal
2248 Function_Return retVal
2249 End_Function
2250
2251 { MethodType=Property DesignTime=False }
2252 Procedure Set ComOffice2007Images String value
2253 Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BSTR to value
2254 End_Procedure
2255
2256 { MethodType=Property DesignTime=False }
2257 Function ComColorManager Returns Variant
2258 Handle hDispatchDriver
2259 Variant retVal
2260 Get phDispatchDriver to hDispatchDriver
2261 Get InvokeComMethod of hDispatchDriver 103 OLE_VT_DISPATCH to retVal
2262 Function_Return retVal
2263 End_Function
2264
2265 { MethodType=Property DesignTime=False }
2266 Function ComVersion Returns String
2267 Handle hDispatchDriver
2268 String retVal
2269 Get phDispatchDriver to hDispatchDriver
2270 Get InvokeComMethod of hDispatchDriver 104 OLE_VT_BSTR to retVal
2271 Function_Return retVal
2272 End_Function
2273
2274 { MethodType=Property DesignTime=False }
2275 Function ComUnicode Returns Boolean
2276 Handle hDispatchDriver
2277 Boolean retVal
2278 Get phDispatchDriver to hDispatchDriver
2279 Get InvokeComMethod of hDispatchDriver 105 OLE_VT_BOOL to retVal
2280 Function_Return retVal
2281 End_Function
2282
2283 { MethodType=Property DesignTime=False }
2284 Function ComOcxPath Returns String
2285 Handle hDispatchDriver
2286 String retVal
2287 Get phDispatchDriver to hDispatchDriver
2288 Get InvokeComMethod of hDispatchDriver 106 OLE_VT_BSTR to retVal
2289 Function_Return retVal
2290 End_Function
2291
2292 Function ComCreatePropExchange Returns Variant
2293 Handle hDispatchDriver
2294 Variant retVal
2295 Get phDispatchDriver to hDispatchDriver
2296 Get InvokeComMethod of hDispatchDriver 107 OLE_VT_DISPATCH to retVal
2297 Function_Return retVal
2298 End_Function
2299
2300 { MethodType=Property DesignTime=False }
2301 Function ComIcons Returns Variant
2302 Handle hDispatchDriver
2303 Variant retVal
2304 Get phDispatchDriver to hDispatchDriver
2305 Get InvokeComMethod of hDispatchDriver 108 OLE_VT_DISPATCH to retVal
2306 Function_Return retVal
2307 End_Function
2308End_Class
2309
2310// CoClass
2311// TaskPanel Global Settings
2312Class cSigCjComTaskPanelGlobalSettings is a cComAutomationObject
2313 Import_Class_Protocol cSigCjComITaskPanelGlobalSettings
2314
2315 Procedure Construct_Object
2316 Forward Send Construct_Object
2317 Set psProgID to L_cSigCjComTaskPanelGlobalSettings
2318 Set peAutoCreate to acNoAutoCreate
2319 End_Procedure
2320End_Class
2321
2322//==============================================================================
2323//End of package - SigCjW_TaskPanel.pkg
2324//==============================================================================
2325