XProfan

Français

Web
Scanner

allô Amis

super, j'ai eh bien den Sinn einer Toolbar erkannt

c'est pourquoi bastle je qui eh bien aussi dans mon CNC Programme rein.
malheureusement vois je aucun Seperatoren.
qui sieht s'il te plaît meinen faute?
Kompilieren Marque Séparation

Declare hToolBar&, hBild&, ende%
WindowTitle "WEBBI 3 Achsen CNC Software Steuerung 2008 Version: 0.038"
Window 0,0,1024,768
hToolbar& = @Create("TOOLBAR", %hWnd,8,0,1,2000,0)
@Toolbar("AddTextButton",hToolbar&,0,2000,"Gruppieren","20")
@Toolbar("Separator", hToolbar&)
@Toolbar("AddTextButton",hToolbar&,0,2000,"Gruppe auflösen","20")
waitkey
a>

Grüße

Web

Xprofan X3.1

Win7 auf AMDX6

08.08.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

RGH

allô, qui Seperator ist qui Zwischenraum entre den beiden Toolbarbuttons. là cet seulement Text enthalten et qui Stil 0 gewählt wurde, ist il pas so sans weiteres sichtbar. qui la distance qui Buttons ist seulement quelque chose größer.

Salut
Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

08.08.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Web
Scanner

Hi Roland,

okay. merci.

si je qui Toolbar unten platziere überschreibt es mir komplett qui untere vorhandene Statuszeile.

@Créer("Toolbar",N1,H,N2,N3,N4,N5)

N5: Stil qui Toolbar
2 = unten - 3D

comment peux je cela tourner autour de?

Grüße

Web

Xprofan X3.1

Win7 auf AMDX6

09.08.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jac
de
Lad

je crois cela allez, si du qui Statusbar récente platzierst ("SetWindowPos stbar&=0,0-0,0").

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

09.08.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Web
Scanner

Hi Jac,

merci pour den Tipp. mais malheureusement allez cela so pas.
Jedenfalls hab je verschiedenes probiert. aucun chance.

je mets eh bien individuel Tasten à den unteren rebord.
c'est pour mich sogar besser et flexibler.

Grüße

Web

Xprofan X3.1

Win7 auf AMDX6

10.08.2008 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jörg
Sellmeyer

comment wäre es so:
Kompilieren Marque Séparation

Declare hToolBar&, hBild&, ende%,dummy&
WindowTitle "WEBBI 3 Achsen CNC Software Steuerung 2008 Version: 0.038"
Window 0,0,1024,768
Var h&=Create("StatusWindow",%HWND,"Test")
dummy& = Control("DIALOG","",$54000000,0,(Height(%hwnd) - Height(h&) -30),Width(%hwnd),30,%hwnd,0,%hinstance)
hToolbar& = @Create("TOOLBAR", dummy&,8,0,1,2000,3)
@Toolbar("AddTextButton",hToolbar&,0,2000,"Gruppieren","20")
@Toolbar("Separator", hToolbar&)
@Toolbar("AddTextButton",hToolbar&,0,2001,"Gruppe auflösen","20")

While 1

    waitinput
    SetWindowPos H& = 0,0-0,0;0
    SetWindowPos dummy& = 0,(Height(%hwnd) - Height(h&) -30) - Width(%hwnd),30;0
    SetWindowPos hToolbar& = 0,0,-0,0;0

    If MenuItem(2000)

        Print "Klick!"

    EndIf

Wend