| |
| |
|
Thomas
Freier | |
| |
| |
| |
|
|
Dietmar
Horn | Zum Beispiel mit der DLGMENU.PCU von David.
Im Helfer für mein XProfan-Lehrbuch werkelt diese PCU zum Beispiel schon lange erfolgreich vor sich hin und funktioniert bis jetzt auch mit Vista und Windows 7. |
|
| |
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...]  Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] | 08.05.2010 ▲ |
|
| |
|
|
Thomas
Freier | | JaNee, ging nicht mit CreateMenu oder hat sich da etwas mir nicht erschlossen? |
|
| |
| |
| |
|
|
ByteAttack | Da gab es mal eine Include aus der PRFellow...
KompilierenMarkierenSeparieren $I WFGRAD.INC
Declare appexit%
SetTrueColor 1
WindowStyle $003F
WindowTitle "Verlauf"
Window 0,114 - 506,419
SetWindowPos %hwnd = 207,114 - 506,419;0
Parameter: Anfangsfarbe,Endfarbe, Farbanzahl,Vertikal(=1)
GradientFill RGB(0,0,255),255,256,0
WhileNot appexit%
WaitInput
If %key=2
appexit%=1
ElseIf %key=4 Fenstergröße
GradientFill RGB(0,0,255),255,256,0
EndIf
EndWhile
|
|
| |
| |
| |
|
|
Dietmar
Horn | Hallo Thomas,
was funktioniert mit dieser Unit nicht? Auch in meinem Trabi-Programm verwende ich diese von Anfang an.
Im XProfan-Manager ist die Unit unter dem Button "PCU" (gleich im Hauptfenster in den 3 Button-Reihen) mit lauffähigen Demos und den zugehörigen Quellcodes ebenfalls enthalten. Siehe 3. vertikale Button-Reihe von rechts und dort der 9. Bitmap-Button von oben im Hauptfenster.
Bei mir und den Anwendern meiner Programme funktioniert das jedenfalls schon seit einer kleinen Ewigkeit tadellos.
Gruß
Dietmar |
|
| |
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...] Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] | 08.05.2010 ▲ |
|
| |
|
|
 | Egal wie, hPic als BG für &hMenu:
KompilierenMarkierenSeparierencls
popup "Test"
appendMenu 100,"Test"
appendMenu 100,"Test"
popup "Test"
appendMenu 100,"Test"
appendMenu 100,"Test"
popup "Test"
appendMenu 100,"Test"
appendMenu 100,"Test"
var hPic&=create("hNewPic",100,%cyMenu,$FF0000)
startPaint hPic&
whileLoop 1000
setPixel rnd(100),rnd(%cyMenu),rnd($FFFFFF)
wend
endpaint
Declare nfos#
dim nfos#,28
clear nfos#
long nfos#,0=28,$80000002
long nfos#,16=external("gdi32.dll","CreatePatternBrush",hPic&)
external("user32.dll","SetMenuInfo",&hmenu,nfos#)
dispose nfos#
external("user32.dll","DrawMenuBar",%hWnd)
waitinput
end
|
|
| |
| |
| |
|
|
Thomas
Freier | Treffen der Nachtschwärmer.
Ich wollte gerne ein TrackMenu() mit dem Hintergrund aus der Unit haben. |
|
| |
| |
| |
|
|
| | Ist das Trackmenu-Handle irgendwie bekannt? |
|
| |
| |
| |
|
|
Thomas
Freier | Ich habe die DLGMENU.PCU ja auch im Einsatz und wollte beim TrackMenu() gerne auch den Farbverlauf haben.
Muß mal testen, ob &hMenu das Handle ist. |
|
| |
| |
| |
|
|
Thomas
Freier | |
| |
| |
| |
|
|
ByteAttack | Ups! Bin voll am Ziel vorbeigeschossen - Wäre mal gut vorher zu lesen, als zu posten 
Ich gehe schon in meine Ecke und schäme mich... |
|
| |
| |
| |
|
|
Dieter
Zornow | | Sieht bei mir grausam aus, total verpixelt und die Schrift nicht lesbar. |
|
| |
| Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 08.05.2010 ▲ |
|
| |
|
(928)
Deutsch
English
Français
Español
Italia