XProfan

Compile Mark Separation

ShowWindow(dlg&,on%)
usermessages wm_keydown

whilenot IsKey(27)/pre>

Nico
Madysa

thanks, iF! I have me almost virtual, that something like with User Messages goes, but I Have The number the Message in the Profan.hlp not found -_- (instead of I the Header use, but on something like come I naturally not...)

though diving thereby one new Error on.
If one Button whom Focus has, reacted the program at pressure on n not.
instead gives PC a beautiful Klopfton through internem loudspeaker of itself.
so alone is the no real trouble, but dummerweise exists these my complete Mainwindow one (Toolbar-Appearance hold).
would be not one Button deaktiviert been(through EnableWindow) would I well not behind come. because if I on this click, has none More whom Focus, there it it Yes not having must.

P.s.: find I Real nice of you, that You you withal your wicked Erältung around the Problems another kümmerst!

Nico Madysa

Yes me GEHTS hundeehlend well the me no see can - but thanks!

Nico
Madysa

Mahahaha, wieso Have really always I The whole Problems with Waitinput?

Compile Mark Separation

declare dlg& , buta& , butb& , on% , w%
on% = 0
cls
buta& = Create(Button,%hWnd,Button 1,0,0,320,240)
butb& = Create(Button,%hWnd,Button 2,320,0,320,240)
EnableWindow butb& , 0
dlg& = Create(Window,%hWnd ,Dialog,300,300,300,100)
ShowWindow(dlg&,on%)

whilenot IsKey(27)

    waitinput
    inc w%
    Locate 0 , 0
    print w%

    if IsKey(78)

        if on%

            ShowWindow(dlg&,0)
            on% = 0

        else

            ShowWindow(dlg&,1)
            on% = 1

        endif

        SetFocus(%hWnd)<---SetFocus-Zeile

    endif

wend

end

roughly derselbe code, How the first, only the now two Buttons the Mainwindow belegen; one normal and a deaktivierter.
once the program launched has, make we the following: we pressing twice on n and, How expects, appear the dialog and disappears again. now clicking we on the first Button, so it whom Focus get and pressing again n and -
nothing happens. has one Button means whom Focus, shining Waitinput wiedermal not To react. clicking we against it on the deaktivierten Button, so verscheindet the Focus, there one deaktiviertes Control Yes none Focus having must, and - tada! - The dialog appear with a pressure on n again.
I have the trouble in my Program first with the row
Compile Mark Separation

case upper$(ClassOf(%GetFocus)) = BUTTON : SetFocus(dummy&)

but really pleased be I lest.

has someone The Solution the Problems? is it my guilt or The of XProfan?
I have dummerweise only course the last week so experimentiert and can therefore too only say, that it probably not on the Dialogfensterstil of my Mainwindow lying.

Nico Madysa

Have strain one little Time. so?
Compile Mark Separation

declare dlg& , buta& , butb& , on% , w%
on% = 0
cls
buta& = Create(Button,%hWnd,Button 1,0,0,320,240)
butb& = Create(Button,%hWnd,Button 2,320,0,320,240)
EnableWindow butb& , 0
dlg& = Create(Window,%hWnd ,Dialog,300,300,300,100)
ShowWindow(dlg&,on%)

whilenot IsKey(27)

    WaitInputEx
    inc w%
    Locate 0 , 0
    print w%

    if IsKey(78)

        if on%

            ShowWindow(dlg&,0)
            on% = 0

        else

            ShowWindow(dlg&,1)
            on% = 1

        endif

        SetFocus(%hWnd)<---SetFocus-Zeile

    endif

wend

end

Proc WaitInputEx Erweitertes Waitinput für Dialoge von AH

    Declare AHWait_Counter%
    Clear AHWait_Counter%

    While AHWait_Counter%<25

        inc AHWait_Counter%

    wend

    @External(USER32,MsgWaitForMultipleObjects,0,0,0,-1,$1 | $4 | $10)
    Clear AHWait_Counter%

    While AHWait_Counter%<25

        inc AHWait_Counter%

    wend

../function-references/XProfan/endproc/'>endproc

the profanste would it well
Compile Mark Separation

addhotkey 4001,78,0

supra anzufügen and instead of
Compile Mark Separation

if IsKey(78)re>

simply
Compile Mark Separation

if (%menuitem=4001)re>

To write.

GDL

Do I too same try.Ärgere me with nem RTF zurzeit green and blue.

Hello
Georg

Windows7 Xprofan 8,9,10 [...]

[...]

Nico
Madysa

thanks for speedy Aids, once I again on the own computer sit will be ichs try.

Nico Madysa

02/04/07 ▲

Nico
Madysa

Tschuldigung, Have unfortunately forget, To say, that The Hotkey-Variante worked has.

momentarily have I again Ärger with the Waitinput and the XProfan-internen Messageverwaltung.
from designed Found be I now forced, several Controls a Static or for may part of/ one GroupBox directly unterzuordnen. How already desöfteren erwähnt, reacted Profan on Inputs in sochen Enkelfenstern (Kindfenster the Kindfenster) not any more so, How one it gladly had. gives it there a API or a others ploy, circa z.B. The Messages into Mainwindow umzuleiten or something in the manner? The Win32.hlp has me yet no Help give want.

P.s.: It's all right here Specifically for a ReBar-Control (too under the names Docksplitter famous) i want here one ReBar-volume several Controls allocate.

Nico Madysa

06/12/07 ▲

UserMessages

06/12/07 ▲

Uwe
''Pascal''
Niemeier

Hello Nico!

Verwende instead of Groupbox or Static a rahmenlosen dialog, about in this manner:

Dlg&=control(Dialog,Dlg1,$50000000,0,0,Breit%,Hoch%,%hwnd,1,0)

has itself by me bewährt, where wide and Höhe with usage in Rebars not time staid go must.

HTH
Pascal

06/12/07 ▲