| |
|
|
Web Scanner | Hallo Freunde
super, ich habe nun den Sinn einer Toolbar erkannt Deshalb bastle ich die nun auch in mein CNC Programm rein. Leider sehe ich keine Seperatoren. Wer sieht bitte meinen Fehler? KompilierenMarkierenSeparierenDeclare 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
end
Grüße
Web |
|
|
| |
|
|
|
RGH | Hallo, der Seperator ist der Zwischenraum zwischen den beiden Toolbarbuttons. Da diese nur Text enthalten und der Stil 0 gewählt wurde, ist er nicht so ohne weiteres sichtbar. Der Abstand der Buttons ist nur etwas größer.
Gruß 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 ▲ |
|
|
|
|
Web Scanner | Hi Roland,
okay. Danke.
Wenn ich die Toolbar unten platziere überschreibt es mir komplett die untere vorhandene Statuszeile.
@Create("Toolbar",N1,H,N2,N3,N4,N5)
N5: Stil der Toolbar 2 = unten - 3D
Wie kann ich das umgehen?
Grüße
Web |
|
|
| |
|
|
|
Jac de Lad | Ich glaube das geht, wenn du die Statusbar neu 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 ▲ |
|
|
|
|
Web Scanner | Hi Jac,
Danke für den Tipp. Aber leider geht das so nicht. Jedenfalls hab ich verschiedenes probiert. Keine Chance.
Ich setze nun einzelnen Tasten an den unteren Rand. Das ist für mich sogar besser und flexibler.
Grüße
Web |
|
|
| |
|
|
|
Jörg Sellmeyer | Wie wäre es so: KompilierenMarkierenSeparierenDeclare 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
|
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 10.08.2008 ▲ |
|
|
|