Von Thomas Grobbauer am 29 Dezember, 1997 um 13:13:10:
Antwort auf: Wie öffne ich den Arbeitsplatz aus Profan heraus ? von Wolfgang Siegmund am 21 Dezember, 1997 um 23:12:36:
: Hallo Leute,
: kann mir jemand sagen wie ich von Profan aus
: den Arbeitsplatz in Win95 öffne ?
: Ich vermute
: @winexec("RUNDLL32 SHELL32.DLL,????????")
: vielen Dank in voraus für Eure Tips.
: Wolfgang
Hallo Wolfgang
Das geht folgendermaßen:
Proc Arbeit
declare A%,ende%
Window 0,0-200,200
let A%=@createbutton(%Hwnd,"Arbeitsplatz",20,20,120,24)
let ende%=0
whilenot ende%
waitinput
if @equ(%key,2)
let ende%=1
elseif @getfocus(A%)
winexecwait("explorer /n,::{20D04FE0-3AEA-1069-A2D8-08002B30309D}",1)
endif
wend
endproc
Arbeit
end
Stammt zwar nicht von mir, sondern von Jan Steinhardt. Er hat noch weitere solche Sachen auf seiner Homepage.
MfG
Thomas