forum.vdsworld.com Forum Index forum.vdsworld.com
Visit VDSWORLD.com
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 


Hotkeys - Am I missing something?

 
Post new topic   Reply to topic    forum.vdsworld.com Forum Index -> General Help
View previous topic :: View next topic  
Author Message
VDSuser
Contributor
Contributor


Joined: 21 Mar 2002
Posts: 58
Location: Somewhere in time

PostPosted: Fri Mar 29, 2002 8:03 pm    Post subject: Hotkeys - Am I missing something? Reply with quote

I want to hotkey-enable a utility I'm writing in VDS 4.5 but I cannot seem to locate any information on how to do this. Am I missing something? HOTKEY.DSC has no instructions on how to create its HiddenKeys.ini file and no instructions come with the VDSHOT.DLL download. I'm looking to write a small, hotkey-enabled utility that will load on Windows startup and remain hidden at all times. Then, when the hotkey combo is pressed, the util will call another program to do its thing. Can anyone help with the hotkey instructions?
Back to top
View user's profile Send private message
LiquidCode
Moderator Team


Joined: 05 Dec 2000
Posts: 1753
Location: Space and Time

PostPosted: Sat Mar 30, 2002 1:31 am    Post subject: Reply with quote

Hello, I wrote the code for Hidden Keys. It's been a little while since I have
looked at the code. The VDSHot.dll is included in VDSPack that can be
found on VDSWorld.com. Let me take a look at the code again and I'll
get back to you. k?

_________________
Chris
Http://theblindhouse.com
Back to top
View user's profile Send private message Send e-mail Visit poster's website
LiquidCode
Moderator Team


Joined: 05 Dec 2000
Posts: 1753
Location: Space and Time

PostPosted: Sat Mar 30, 2002 2:01 am    Post subject: Reply with quote

Here is HiddenKeys revised so you don't need to create the ini
file first. Make sure you DL VDSPack and VDSProt first and read the help
files so you understand how to make a hot key. If your still not sure
how to do it, let me know.

Code:

:Hiddenkeys
   rem - Version 2.0
   rem - You nee to compile this first to get it to work right.
   rem - Press Ctrl+Alt+Shift+Insert to set hotkeys
   rem - Press Ctrl+Alt+Shift+END to quit hiddenkeys
   rem - Press Ctrl+Alt+Shift+Home to view assigned hotkeys
   
    rem - Hidden Keys by Chris Gingerich
    rem - This is to create hotkeys for starting your 10 most
    rem - used programs. The dialog box is hidden as well as
    rem - removed from the task list. This program uses
    rem - vdshot.dll and vdsprot.dll from the VDSdllp located
    rem - on VDSWorld.com
    title HiddenKeys

:top
    %p = @shortname(@path(%0))
    external vdshot.dll
    external vdsprot.dll
    prot visible,
    %%ini = %pHiddenKeys.ini
    if @not(@file(%%ini))
      goto skip
    end
    inifile open,%%ini
    %%ah = @iniread(HiddenKeys,0)
    %%bh = @iniread(HiddenKeys,1)
    %%ch = @iniread(HiddenKeys,2)
    %%dh = @iniread(HiddenKeys,3)
    %%eh = @iniread(HiddenKeys,4)
    %%fh = @iniread(HiddenKeys,5)
    %%gh = @iniread(HiddenKeys,6)
    %%hh = @iniread(HiddenKeys,7)
    %%ih = @iniread(HiddenKeys,8 )
    %%jh = @iniread(HiddenKeys,9)

    if %%ah
        parse "%a;%b;%c;%d;%e;%%ahprog;%%ahparam",%%ah
        hotkey add,0,%a,%b,%c,%d,%e
    end
    if %%bh
        parse "%a;%b;%c;%d;%e;%%bhprog;%%bhparam",%%bh
        hotkey add,1,%a,%b,%c,%d,%e
    end
    if %%ch
        parse "%a;%b;%c;%d;%e;%%chprog;%%chparam",%%ch
        hotkey add,2,%a,%b,%c,%d,%e
    end
    if %%dh
        parse "%a;%b;%c;%d;%e;%%dhprog;%%dhparam",%%dh
        hotkey add,3,%a,%b,%c,%d,%e
    end
    if %%eh
        parse "%a;%b;%c;%d;%e;%%ehprog;%%ehparam",%%eh
        hotkey add,4,%a,%b,%c,%d,%e
    end
    if %%fh
        parse "%a;%b;%c;%d;%e;%%fhprog;%%fhparam",%%fh
        hotkey add,5,%a,%b,%c,%d,%e
    end
    if %%gh
        parse "%a;%b;%c;%d;%e;%%ghprog;%%ghparam",%%gh
        hotkey add,6,%a,%b,%c,%d,%e
    end
    if %%hh
        parse "%a;%b;%c;%d;%e;%%hhprog;%%hhparam",%%hh
        hotkey add,7,%a,%b,%c,%d,%e
    end
    if %%ih
        parse "%a;%b;%c;%d;%e;%%ihprog;%%ihparam",%%ih
        hotkey add,8,%a,%b,%c,%d,%e
    end
    if %%jh
        parse "%a;%b;%c;%d;%e;%%jhprog;%%jhparam",%%jh
        hotkey add,9,%a,%b,%c,%d,%e
    end

:skip
    hotkey add,99,end,1,1,1,
    hotkey add,98,insert,1,1,1,
    hotkey add,96,home,1,1,1,

:evloop
    wait event
    %%ev = @event()
    %%chk = @substr(%%ev,1,2)
    if @equal(%%chk,PB)
        goto look
    end
    goto %%ev

:Hotkey0
    rem if @not(@file(%%ini))
    rem   Info HiddenKeys Ini file not found.
    rem   goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%ah = @iniread(HiddenKeys,0)
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%ah
    shell open,%%ahprog,%%ahparam,@path(%%ahprog)
    goto evloop

:Hotkey1
    rem if @not(@file(%%ini))
    rem    Info HiddenKeys Ini file not found.
    rem    goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%bh = @iniread(HiddenKeys,1)
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%bh
    shell open,%%bhprog,%%bhparam,@path(%%bhprog)
    goto evloop

:Hotkey2
    rem if @not(@file(%%ini))
    rem    Info HiddenKeys Ini file not found.
    rem    goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%ch = @iniread(HiddenKeys,2)
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%ch
    shell open,%%chprog,%%chparam,@path(%%chprog)
    goto evloop

:Hotkey3
    rem if @not(@file(%%ini))
    rem    Info HiddenKeys Ini file not found.
    rem    goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%dh = @iniread(HiddenKeys,3)
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%dh
    shell open,%%dhprog,%%dhparam,@path(%%dhprog)
    goto evloop

:Hotkey4
    rem if @not(@file(%%ini))
    rem    Info HiddenKeys Ini file not found.
    rem    goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%eh = @iniread(HiddenKeys,4)
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%eh
    shell open,%%ehprog,%%ehparam,@path(%%ehprog)
    goto evloop

:Hotkey5
    rem if @not(@file(%%ini))
    rem    Info HiddenKeys Ini file not found.
    rem    goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%fh = @iniread(HiddenKeys,5)
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%fh
    shell open,%%fhprog,%%fhparam,@path(%%fhprog)
    goto evloop

:Hotkey6
    rem if @not(@file(%%ini))
    rem    Info HiddenKeys Ini file not found.
    rem    goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%gh = @iniread(HiddenKeys,6)
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%gh
    shell open,%%ghprog,%%ghparam,@path(%%ghprog)
    goto evloop

:Hotkey7
    rem if @not(@file(%%ini))
    rem    Info HiddenKeys Ini file not found.
    rem    goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%hh = @iniread(HiddenKeys,7)
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%hh
    shell open,%%hhprog,%%hhparam,@path(%%hhprog)
    goto evloop

:Hotkey8
    rem if @not(@file(%%ini))
    rem    Info HiddenKeys Ini file not found.
    rem    goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%ih = @iniread(HiddenKeys,8 )
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%ih
    shell open,%%ihprog,%%ihparam,@path(%%ihprog)
    goto evloop

:Hotkey9
    rem if @not(@file(%%ini))
    rem    warn HiddenKeys Ini file not found.
    rem    goto hotkey99
    rem end
    rem inifile open,%%ini
    rem %%jh = @iniread(HiddenKeys,9)
    rem parse "%a;%b;%c;%d;%e;%f;%g",%%jh
    shell open,%%jhprog,%%jhparam,@path(%%jhprog)
    goto evloop

:close
:Hotkey99
    %%text = HiddenKeys is unloaded!
    gosub dialog
    dialog showmodal
    gosub remkeys
    stop

:HotKey98
    if %%open
        dialog show
    else
        %%open = 1
        dialog CREATE,HiddenKeys Setup,-1,0,452,300,ontop,Class HKSETUP,nosys
        dialog ADD,GROUP,GROUP1,2,2,222,270,Program
        dialog ADD,EDIT,p0,22,8,180,19
        dialog ADD,BUTTON,pb0,22,190,30,18,...
        dialog ADD,EDIT,p1,47,8,180,19
        dialog ADD,BUTTON,pb1,47,190,30,18,...
        dialog ADD,EDIT,p2,72,8,180,19
        dialog ADD,BUTTON,pb2,72,190,30,18,...
        dialog ADD,EDIT,p3,97,8,180,19
        dialog ADD,BUTTON,pb3,97,190,30,18,...
        dialog ADD,EDIT,p4,122,8,180,19
        dialog ADD,BUTTON,pb4,122,190,30,18,...
        dialog ADD,EDIT,p5,147,8,180,19
        dialog ADD,BUTTON,pb5,147,190,30,18,...
        dialog ADD,EDIT,p6,172,8,180,19
        dialog ADD,BUTTON,pb6,172,190,30,18,...
        dialog ADD,EDIT,p7,197,8,180,19
        dialog ADD,BUTTON,pb7,197,190,30,18,...
        dialog ADD,EDIT,p8,222,8,180,19
        dialog ADD,BUTTON,pb8,222,190,30,18,...
        dialog ADD,EDIT,p9,247,8,180,19
        dialog ADD,BUTTON,pb9,247,190,30,18,...
        dialog ADD,GROUP,GROUP2,2,294,34,270,Shift
        dialog ADD,CHECK,shift0,22,304,18,18
        dialog ADD,CHECK,shift1,47,304,18,18
        dialog ADD,CHECK,shift2,72,304,18,18
        dialog ADD,CHECK,shift3,97,304,18,18
        dialog ADD,CHECK,shift4,122,304,18,18
        dialog ADD,CHECK,shift5,147,304,18,18
        dialog ADD,CHECK,shift6,172,304,18,18
        dialog ADD,CHECK,shift7,197,304,18,18
        dialog ADD,CHECK,shift8,222,304,18,18
        dialog ADD,CHECK,shift9,247,304,18,18
        dialog ADD,GROUP,GROUP3,2,262,30,270,Ctrl
        dialog ADD,CHECK,Ctrl0,22,270,18,18
        dialog ADD,CHECK,Ctrl1,47,270,18,18
        dialog ADD,CHECK,Ctrl2,72,270,18,18
        dialog ADD,CHECK,Ctrl3,97,270,18,18
        dialog ADD,CHECK,Ctrl4,122,270,18,18
        dialog ADD,CHECK,Ctrl5,147,270,18,18
        dialog ADD,CHECK,Ctrl6,172,270,18,18
        dialog ADD,CHECK,Ctrl7,197,270,18,18
        dialog ADD,CHECK,Ctrl8,222,270,18,18
        dialog ADD,CHECK,Ctrl9,247,270,18,18
        dialog ADD,GROUP,GROUP4,2,226,32,270,Alt
        dialog ADD,CHECK,Alt0,22,236,18,18
        dialog ADD,CHECK,Alt1,47,236,18,18
        dialog ADD,CHECK,Alt2,72,236,18,18
        dialog ADD,CHECK,Alt3,97,236,18,18
        dialog ADD,CHECK,Alt4,122,236,18,18
        dialog ADD,CHECK,Alt5,147,236,18,18
        dialog ADD,CHECK,Alt6,172,236,18,18
        dialog ADD,CHECK,Alt7,197,236,18,18
        dialog ADD,CHECK,Alt8,222,236,18,18
        dialog ADD,CHECK,Alt9,247,236,18,18
        dialog ADD,GROUP,GROUP5,2,328,34,270,Win
        dialog ADD,CHECK,Win0,22,338,18,18
        dialog ADD,CHECK,Win1,47,338,18,18
        dialog ADD,CHECK,Win2,72,338,18,18
        dialog ADD,CHECK,Win3,97,338,18,18
        dialog ADD,CHECK,Win4,122,338,18,18
        dialog ADD,CHECK,Win5,147,338,18,18
        dialog ADD,CHECK,Win6,172,338,18,18
        dialog ADD,CHECK,Win7,197,338,18,18
        dialog ADD,CHECK,Win8,222,338,18,18
        dialog ADD,CHECK,Win9,247,338,18,18
        dialog ADD,GROUP,GROUP6,2,364,84,270,Key
        dialog ADD,COMBO,key0,20,370,72,21
        dialog ADD,COMBO,key1,45,370,72,21
        dialog ADD,COMBO,key2,70,370,72,21
        dialog ADD,COMBO,key3,95,370,72,21
        dialog ADD,COMBO,key4,120,370,72,21
        dialog ADD,COMBO,key5,145,370,72,21
        dialog ADD,COMBO,key6,170,370,72,21
        dialog ADD,COMBO,key7,195,370,72,21
        dialog ADD,COMBO,key8,220,370,72,21
        dialog ADD,COMBO,key9,245,370,72,21
        dialog ADD,BUTTON,ok,274,310,64,24,Ok
        dialog ADD,BUTTON,cancel,274,384,64,24,Cancel
        dialog SHOW
        list add,key0,Pause
        list add,key0,Cancel
        list add,key0,Back
        list add,key0,Tab
        list add,key0,Clear
        list add,key0,Return
        list add,key0,Pause
        list add,key0,Capital
        list add,key0,Escape
        list add,key0,Space
        list add,key0,Prior
        list add,key0,Next
        list add,key0,End
        list add,key0,Home
        list add,key0,Left
        list add,key0,Up
        list add,key0,Right
        list add,key0,Down
        list add,key0,Select
        list add,key0,Execute
        list add,key0,Snapshot
        list add,key0,Insert
        list add,key0,Delete
        list add,key0,Help
        list add,key0,0
        list add,key0,1
        list add,key0,2
        list add,key0,3
        list add,key0,4
        list add,key0,5
        list add,key0,6
        list add,key0,7
        list add,key0,8
        list add,key0,9
        list add,key0,A
        list add,key0,B
        list add,key0,C
        list add,key0,D
        list add,key0,E
        list add,key0,F
        list add,key0,G
        list add,key0,H
        list add,key0,I
        list add,key0,J
        list add,key0,K
        list add,key0,L
        list add,key0,M
        list add,key0,N
        list add,key0,O
        list add,key0,P
        list add,key0,Q
        list add,key0,R
        list add,key0,S
        list add,key0,T
        list add,key0,U
        list add,key0,V
        list add,key0,W
        list add,key0,X
        list add,key0,Y
        list add,key0,Z
        list add,key0,Numpad0
        list add,key0,Numpad1
        list add,key0,Numpad2
        list add,key0,Numpad3
        list add,key0,Numpad4
        list add,key0,Numpad5
        list add,key0,Numpad6
        list add,key0,Numpad7
        list add,key0,Numpad8
        list add,key0,Numpad9
        list add,key0,Multiply
        list add,key0,Add
        list add,key0,Separator
        list add,key0,Subtract
        list add,key0,Decimal
        list add,key0,Divide
        list add,key0,F1
        list add,key0,F2
        list add,key0,F3
        list add,key0,F4
        list add,key0,F5
        list add,key0,F6
        list add,key0,F7
        list add,key0,F8
        list add,key0,F9
        list add,key0,F10
        list add,key0,F11
        list add,key0,F12
        list add,key0,F13
        list add,key0,F14
        list add,key0,F15
        list add,key0,F16
        list add,key0,F17
        list add,key0,F18
        list add,key0,F19
        list add,key0,F20
        list add,key0,Numlock
        list add,key0,Scroll
        list assign,key1,key0
        list assign,key2,key0
        list assign,key3,key0
        list assign,key4,key0
        list assign,key5,key0
        list assign,key6,key0
        list assign,key7,key0
        list assign,key8,key0
        list assign,key9,key0

        if %%ah
            parse "%a;%b;%c;%d;%e;%%ahprog;%%ahparam",%%ah
            dialog set,p0,%%ahprog
            dialog set,alt0,%b
            dialog set,ctrl0,%c
            dialog set,shift0,%d
            dialog set,win0,%e
            dialog set,key0,%a
        end
        if %%bh
            parse "%a;%b;%c;%d;%e;%%bhprog;%%bhparam",%%bh
            dialog set,p1,%%bhprog
            dialog set,alt1,%b
            dialog set,ctrl1,%c
            dialog set,shift1,%d
            dialog set,win1,%e
            dialog set,key1,%a
        end
        if %%ch
            parse "%a;%b;%c;%d;%e;%%chprog;%%chparam",%%ch
            dialog set,p2,%%chprog
            dialog set,alt2,%b
            dialog set,ctrl2,%c
            dialog set,shift2,%d
            dialog set,win2,%e
            dialog set,key2,%a
        end
        if %%dh
            parse "%a;%b;%c;%d;%e;%%dhprog;%%dhparam",%%dh
            dialog set,p3,%%dhprog
            dialog set,alt3,%b
            dialog set,ctrl3,%c
            dialog set,shift3,%d
            dialog set,win3,%e
            dialog set,key3,%a
        end
        if %%eh
            parse "%a;%b;%c;%d;%e;%%ehprog;%%ehparam",%%eh
            dialog set,p4,%%ehprog
            dialog set,alt4,%b
            dialog set,ctrl4,%c
            dialog set,shift4,%d
            dialog set,win4,%e
            dialog set,key4,%a
        end
        if %%fh
            parse "%a;%b;%c;%d;%e;%%fhprog;%%fhparam",%%fh
            dialog set,p5,%%fhprog
            dialog set,alt5,%b
            dialog set,ctrl5,%c
            dialog set,shift5,%d
            dialog set,win5,%e
            dialog set,key5,%a
        end
        if %%gh
            parse "%a;%b;%c;%d;%e;%%ghprog;%%ghparam",%%gh
            dialog set,p6,%%ghprog
            dialog set,alt6,%b
            dialog set,ctrl6,%c
            dialog set,shift6,%d
            dialog set,win6,%e
            dialog set,key6,%a
        end
        if %%hh
            parse "%a;%b;%c;%d;%e;%%hhprog;%%hhparam",%%hh
            dialog set,p7,%%hhprog
            dialog set,alt7,%b
            dialog set,ctrl7,%c
            dialog set,shift7,%d
            dialog set,win7,%e
            dialog set,key7,%a
        end
        if %%ih
            parse "%a;%b;%c;%d;%e;%%ihprog;%%ihparam",%%ih
            dialog set,p8,%%ihprog
            dialog set,alt8,%b
            dialog set,ctrl8,%c
            dialog set,shift8,%d
            dialog set,win8,%e
            dialog set,key8,%a
        end
        if %%jh
            parse "%a;%b;%c;%d;%e;%%jhprog;%%jhparam",%%jh
            dialog set,p9,%%jhprog
            dialog set,alt9,%b
            dialog set,ctrl9,%c
            dialog set,shift9,%d
            dialog set,win9,%e
            dialog set,key9,%a
        end
    end
    goto evloop

:look
    %%field = @substr(%%ev,3,3)
    %%file = @filedlg(*.*)
    if @ok()
        if %%file
            dialog set,p%%field,%%file
        end
    end
    goto evloop

:OkButton
    dialog hide
    inifile open,%%ini
    if @dlgtext(p0)
        inifile write,HiddenKeys,0,@dlgtext(key0)|@dlgtext(alt0)|@dlgtext(ctrl0)|@dlgtext(shift0)|@dlgtext(win0)|@dlgtext(p0)
    else
        inifile write,HiddenKeys,0,
    end
    if @dlgtext(p1)
        inifile write,HiddenKeys,1,@dlgtext(key1)|@dlgtext(alt1)|@dlgtext(ctrl1)|@dlgtext(shift1)|@dlgtext(win1)|@dlgtext(p1)
    else
        inifile write,HiddenKeys,1,
    end
    if @dlgtext(p2)
        inifile write,HiddenKeys,2,@dlgtext(key2)|@dlgtext(alt2)|@dlgtext(ctrl2)|@dlgtext(shift2)|@dlgtext(win2)|@dlgtext(p2)
    else
        inifile write,HiddenKeys,2,
    end
    if @dlgtext(p3)
        inifile write,HiddenKeys,3,@dlgtext(key3)|@dlgtext(alt3)|@dlgtext(ctrl3)|@dlgtext(shift3)|@dlgtext(win3)|@dlgtext(p3)
    else
        inifile write,HiddenKeys,3,
    end
    if @dlgtext(p4)
        inifile write,HiddenKeys,4,@dlgtext(key4)|@dlgtext(alt4)|@dlgtext(ctrl4)|@dlgtext(shift4)|@dlgtext(win4)|@dlgtext(p4)
    else
        inifile write,HiddenKeys,4,
    end
    if @dlgtext(p5)
        inifile write,HiddenKeys,5,@dlgtext(key5)|@dlgtext(alt5)|@dlgtext(ctrl5)|@dlgtext(shift5)|@dlgtext(win5)|@dlgtext(p5)
    else
        inifile write,HiddenKeys,5,
    end
    if @dlgtext(p6)
        inifile write,HiddenKeys,6,@dlgtext(key6)|@dlgtext(alt6)|@dlgtext(ctrl6)|@dlgtext(shift6)|@dlgtext(win6)|@dlgtext(p6)
    else
        inifile write,HiddenKeys,6,
    end
    if @dlgtext(p7)
        inifile write,HiddenKeys,7,@dlgtext(key7)|@dlgtext(alt7)|@dlgtext(ctrl7)|@dlgtext(shift7)|@dlgtext(win7)|@dlgtext(p7)
    else
        inifile write,HiddenKeys,7,
    end
    if @dlgtext(p8 )
        inifile write,HiddenKeys,8,@dlgtext(key8)|@dlgtext(alt8)|@dlgtext(ctrl8)|@dlgtext(shift8 )|@dlgtext(win8 )|@dlgtext(p8 )
    else
        inifile write,HiddenKeys,8,
    end
    if @dlgtext(p9)
        inifile write,HiddenKeys,9,@dlgtext(key9)|@dlgtext(alt9)|@dlgtext(ctrl9)|@dlgtext(shift9)|@dlgtext(win9)|@dlgtext(p9)
    else
        inifile write,HiddenKeys,9,
    end
    gosub remkeys
    run %0
    stop

:CancelButton
    dialog hide
    goto evloop

:hotkey96
    title Defined HiddenKeys
    if %%ah
        parse "%a;%b;%c;%d;%e;%%ahprog;%%ahparam",%%ah
        %%info = Key = %a Prog = %%ahprog","%%ahparam
    end
    if %%bh
        parse "%a;%b;%c;%d;%e;%%bhprog;%%bhparam",%%bh
        %%info = %%info@cr()Key = %a Prog = %%bhprog","%%bhparam
    end
    if %%ch
        parse "%a;%b;%c;%d;%e;%%chprog;%%chparam",%%ch
        %%info = %%info@cr()Key = %a Prog = %%chprog","%%chparam
    end
    if %%dh
        parse "%a;%b;%c;%d;%e;%%dhprog;%%dhparam",%%dh
        %%info = %%info@cr()Key = %a Prog = %%dhprog","%%dhparam
    end
    if %%eh
        parse "%a;%b;%c;%d;%e;%%ehprog;%%ehparam",%%eh
        %%info = %%info@cr()Key = %a Prog = %%ehprog","%%ehparam
    end
    if %%fh
        parse "%a;%b;%c;%d;%e;%%fhprog;%%fhparam",%%fh
        %%info = %%info@cr()Key = %a Prog = %%fhprog","%%fhparam
    end
    if %%gh
        parse "%a;%b;%c;%d;%e;%%ghprog;%%ghparam",%%gh
        %%info = %%info@cr()Key = %a Prog = %%ghprog","%%ghparam
    end
    if %%hh
        parse "%a;%b;%c;%d;%e;%%hhprog;%%hhparam",%%hh
        %%info = %%info@cr()Key = %a Prog = %%hhprog","%%hhparam
    end
    if %%ih
        parse "%a;%b;%c;%d;%e;%%ihprog;%%ihparam",%%ih
        %%info = %%info@cr()Key = %a Prog = %%ihprog","%%ihparam
    end
    if %%jh
        parse "%a;%b;%c;%d;%e;%%jhprog;%%jhparam",%%jh
        %%info = %%info@cr()Key = %a Prog = %%jhprog","%%jhparam
    end
    info %%info
    title HiddenKeys
    goto evloop

:remkeys
    hotkey delete,99
    hotkey delete,98
    hotkey delete,97
    hotkey delete,96
    if %%ah
        hotkey delete,0
    end
    if %%bh
        hotkey delete,1
    end
    if %%ch
        hotkey delete,2
    end
    if %%dh
        hotkey delete,3
    end
    if %%eh
        hotkey delete,4
    end
    if %%fh
        hotkey delete,5
    end
    if %%gh
        hotkey delete,6
    end
    if %%hh
        hotkey delete,7
    end
    if %%ih
        hotkey delete,8
    end
    if %%jh
        hotkey delete,9
    end
    exit

:dialog
    dialog CREATE,HiddenKeys,-1,0,260,70,ontop,nosys
    dialog ADD,BUTTON,BUTTON1,42,100,64,24,Ok
    dialog ADD,TEXT,TEXT1,8,10,,,%%text
    exit


_________________
Chris
Http://theblindhouse.com
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Tommy
Admin Team


Joined: 16 Nov 2002
Posts: 746
Location: The Netherlands

PostPosted: Sat Mar 30, 2002 8:35 am    Post subject: Reply with quote

You can download the VDSPACK at the following location:

http://www.vdsworld.com/index.php?page=download&file=vdspack.dll

It includes a generic .chm (HTML) help file for all of the DLLs in there, including the VDSHOT DLL.

Tommy
Back to top
View user's profile Send private message Send e-mail Visit poster's website
VDSuser
Contributor
Contributor


Joined: 21 Mar 2002
Posts: 58
Location: Somewhere in time

PostPosted: Sat Mar 30, 2002 3:10 pm    Post subject: Reply with quote

Thank you both for your responses! Very Happy
Back to top
View user's profile Send private message
X-Tools
Valued Contributor
Valued Contributor


Joined: 20 Sep 2001
Posts: 296
Location: Germany

PostPosted: Mon May 27, 2002 1:19 pm    Post subject: Hotkey Reply with quote

Hi,

is there a way to make hotkey for
Ctrl+B for example ?

Thank you,

Fabian
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Tommy
Admin Team


Joined: 16 Nov 2002
Posts: 746
Location: The Netherlands

PostPosted: Mon May 27, 2002 4:50 pm    Post subject: Reply with quote

This is indeed possible:

Code:

hotkey add,1,B,,ctrl,,


Syntax is as follows:

Code:

  hotkey add, <hotkey number>, <key name>, {alt}, {ctrl}, {shift}, {win}



It's important to delete the hotkeys before your script closes using:

Code:

  hotkey delete, <hotkey number>



The following is a listing of key identifiers supported:

pause, cancel (control + break), back (backspace), tab, clear (numpad5 with Num Lock off), return (enter), pause, capital (Caps Lock), escape, space, prior (page up), next (page down), end, home, left, up, right, down, select, execute, snapshot (printscreen), insert, delete, help, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, A, B, C, D, E, F, G, H, I, J, K, L, M, N, O, P, Q, R, S, T, U, V, W, X, Y, Z, numpad0, numpad1, numpad2, numpad3, numpad4, numpad5, numpad6, numpad7, numpad8, numpad9, multiply (*), add (+), separator, subtract (-), decimal (.), divide (/), F1, F2, F3, F4, F5, F6, F7, F8, F9, F10, F11, F12, F13, F14, F15, F16, F17, F18, F19, F20, numlock, scroll (Scroll Lock).

(all of this information is contained in the dllpack.chm helpfile as well)

Tommy
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    forum.vdsworld.com Forum Index -> General Help All times are GMT
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You can attach files in this forum
You can download files in this forum

Twitter@vdsworld       RSS

Powered by phpBB © 2001, 2005 phpBB Group