| |
|
|
Torsten Rümker | Hello first, after I today time again something on my Lieblingsprojekt gebastelt have I thought me, that I The Funktionalität the u.g. Includes super in my Program use could. unfortunately functions the whole only Interpretermodus, once I the whole compiled have is end.
now my question lying the on the Include? I find therein none Error?
Achja, eh ichs forget the Include isn't of me, unfortunately have I no idea More of whom or of where I the have.
MfG Torsten Rümker CompileMarkSeparationDEF CoInitialize(1) ! "OLE32","CoInitialize"
DEF CoUnInitialize(0) ! "OLE32","CoUninitialize"
DEF CoCreateInstance(5) ! "OLE32","CoCreateInstance"
DEF &HrInit 12
DEF &AddTab 16
DEF &DeleteTab 20
DEF &Release 8
DECLARE COMMAND&
DECLARE TaskObject&
DECLARE CLSID_TaskbarList#
DECLARE IID_ITaskbarList#
Proc HideMyWindow
Parameters Flag&
DIM CLSID_TaskbarList#,16
DIM IID_ITaskbarList#,16
GUID CLSID_TaskBarlist
LONG CLSID_TaskbarList#,0 = $56FDF344
WORD CLSID_TaskbarList#,4 = $FD6D
WORD CLSID_TaskbarList#,6 = $11D0
BYTE CLSID_TaskbarList#,8 = $95
BYTE CLSID_TaskbarList#,9 = $8A
BYTE CLSID_TaskbarList#,10 = $00
BYTE CLSID_TaskbarList#,11 = $60
BYTE CLSID_TaskbarList#,12 = $97
BYTE CLSID_TaskbarList#,13 = $C9
BYTE CLSID_TaskbarList#,14 = $A0
BYTE CLSID_TaskbarList#,15 = $90
GUID IDD_TaskBarlist
LONG IID_ITaskbarList#,0 = $56FDF342
WORD IID_ITaskbarList#,4 = $FD6D
WORD IID_ITaskbarList#,6 = $11D0
BYTE IID_ITaskbarList#,8 = $95
BYTE IID_ITaskbarList#,9 = $8A
BYTE IID_ITaskbarList#,10 = $00
BYTE IID_ITaskbarList#,11 = $60
BYTE IID_ITaskbarList#,12 = $97
BYTE IID_ITaskbarList#,13 = $C9
BYTE IID_ITaskbarList#,14 = $A0
BYTE IID_ITaskbarList#,15 = $90
CoInitialize(0)
If CoCreateInstance(CLSID_TaskbarList#,0,1,IID_ITaskbarList#,ADDR(TaskObject&)) = 0
COMMAND& = @LONG(TaskObject&,0)
CALL(LONG(COMMAND&,&HrInit),Taskobject&) initialisieren
If Flag& = 0
CALL(LONG(COMMAND&,&DeleteTab),Taskobject&,%HWND) TaskbarButton ausblenden
ElseIf Flag& = 1
CALL(LONG(COMMAND&,&AddTab),Taskobject&,%HWND) TaskbarButton einblenden
Endif
CALL(LONG(COMMAND&,&Release),Taskobject&) Objekt freigeben
Endif
DISPOSE CLSID_TaskbarList#
DISPOSE IID_ITaskbarList#
CoUnInitialize()
f='./../../function-references/XProfan/endproc/'>ENDPROC
|
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 08/10/05 ▲ |
|
|
|
|
Jörg Sellmeyer | there come really only Sebastian king, Andreas Miethe or Uwe Pascal Niemeyer (where is the really?) in question. i know But unfortunately neither More.
here's The Version, The I have - functions How greased!
Greeting Jörg |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 08/10/05 ▲ |
|
|
|
|
Torsten Rümker | Hi,
[quote:1d73cd78e8=Jörg Sellmeyer]here's The Version, The I have - functions How greased![/quote:1d73cd78e8] unfortunately not me. the Compilat crashes simply ex, only under indicated the Zeilennummer.
(i'm now Frustriert) ;) Well werd already yet find out Why the lying. can then Yes only yet on my Program lying or?
MfG Torsten Rümker |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 08/12/05 ▲ |
|
|
|
|
| ...or on the OS.
Perhaps is your Comschnittstelle too occupied.
Try simply time independent of Your Source one Miniprogramm moreover To moving itself from the Startleiste auszublenden.
or nimm ploy 17: CompileMarkSeparation salvo. |
|
|
| |
|
|
|
Jörg Sellmeyer | which Profanversion and which BS have Thou? already time CompileMarkSeparation as Minimalversion ausprobiert? Evtl. too time InitHFT to the Cls try??? Runs my Version because in the Interopreter?
Greeting Jörg |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 08/12/05 ▲ |
|
|
|
|
Torsten Rümker | so I have now a Info!
means: Mainwindow appear, TaskleistenSymbol becomes ausgeblendet to 2maligem go through the Whilenot-Loop diving the TaskleistenSymbol again on. try I the hide the TaskleistenSymbols into WhileNot - Wend schleife To building, beschwert itself Profan, that a Memory-Variable not dimensioniert is.
I use WinXP per and Win 2000 Profan Version 8.0a
should I Perhaps times the Loop Post?
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 08/12/05 ▲ |
|
|
|
|
Jörg Sellmeyer | [quote:fa367cc3b4]should I Perhaps times the Loop Post?[/quote:fa367cc3b4] very - best one Piece lauffähigen, possible reduced Codes. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 08/12/05 ▲ |
|
|
|
|
Torsten Rümker | my trouble has Done.
it shining only so To his, that it Problems gives, if The Proceduren IinitHFT and EndHFT More as one time in a Program called go, unfortunately have I not yet understood Why.
On each drop functions the vanish by me now too!
thanks all The here written having!
MfG Torsten Rümker |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 08/16/05 ▲ |
|
|
|