| |
|
|
Dieter Zornow | Hier veces una Minimalbeispiel. En me erscheint el Menü sólo una vez y luego nie mehr. Geht weder con XProfan X2 todavía con XProfan11. Am Clicked liegt lo auch no muss al Trackmenu() mentira. Das alte Trackmenu x,y va auch no. Sombrero alguien una Concepto ? KompilierenMarcaSeparaciónCLS
CreateMenu
AppendMenu 100,"&Laden"
AppendMenu 101,"&Speichern"
AppendMenu 102,"Speichern &als"
Var b& = Create("Button",%hwnd,"Menü",10,10,80,25)
WhileNot %key = 2
waitinput
If Clicked(b&)
TrackMenu(10,33)
Case menuItem(100):Messagebox("","",0)
endif
endwhile
end
|
|
|
| Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 02.05.2011 ▲ |
|
|
|
|
RGH | Ein con CreateMenu erzeugtes Menü es temporär y existiert sólo a para TrackMenu. (Das war en el Übrigen ya siempre así!)
Saludo 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 | 02.05.2011 ▲ |
|
|
|
|
Dieter Zornow | Oh, danke, Tuve liso vergessen, si uno lang nichts mehr gemacht ha Ein Referencia en el Ayuda wäre aber auch no schlecht, para Vergessliche |
|
|
| Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 02.05.2011 ▲ |
|
|
|