| |
|
|
Thomas Freier | in the momentum find I only CompileMarkSeparation How realisiere I a Farbverlauf or one z.B: *.bmp as background. |
|
|
| Gruß Thomas Windows XP SP2, XProfan X2 | 05/08/10 ▲ |
|
|
|
|
Dietmar Horn | to that example with the DLGMENU.PCU of David.
in the aide for my XProfan-Textbook werkelt these PCU to that example already long successful to itself there and functions yet too with Vista and 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: [...] | 05/08/10 ▲ |
|
|
|
|
Thomas Freier | JaNee, went not CreateMenu or has there something I do not erschlossen? |
|
|
| Gruß Thomas Windows XP SP2, XProfan X2 | 05/08/10 ▲ |
|
|
|
|
ByteAttack | there there were time a Include from the PRFellow... CompileMarkSeparation $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 | Hello Thomas,
what functions with this Unit not? too in my Trabi-Program use I these of beginning on.
in the XProfan-manager is the Unit under the Button "PCU" (same in the Mainwindow into 3 Button-Reihen) with lauffähigen Demos and the pertinent Source code ditto include. See 3. vertikale Button-row of right and there the 9. Bitmap-Button of supra in the Mainwindow.
by me and the Users of my programs functions the anyway already since a small eternity perfectly.
Greeting 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: [...] | 05/08/10 ▲ |
|
|
|
|
| alike How, hPic as BG for &hMenu: CompileMarkSeparationcls
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
Similar make I the too in the Unit. |
|
|
| |
|
|
|
Thomas Freier | meet the Nachtschwärmer. I wanted to gladly one TrackMenu() with the background from the Unit having. |
|
|
| Gruß Thomas Windows XP SP2, XProfan X2 | 05/08/10 ▲ |
|
|
|
|
| is the Trackmenu-lever somehow famous? |
|
|
| |
|
|
|
Thomas Freier | I have The DLGMENU.PCU indeed in use and wished at TrackMenu() gladly too whom Farbverlauf having. mandatory test times, whether &hMenu the lever is. |
|
|
| Gruß Thomas Windows XP SP2, XProfan X2 | 05/08/10 ▲ |
|
|
|
|
Thomas Freier | |
|
| Gruß Thomas Windows XP SP2, XProfan X2 | 05/08/10 ▲ |
|
|
|
|
ByteAttack | Ups! be fully on the target vorbeigeschossen - would be time well before To reading, as To post
I go already in my corner and schäme me... |
|
|
| |
|
|
|
Dieter Zornow | sees by me savage from, utterly verpixelt and the Font unreadable. |
|
|
| Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 05/08/10 ▲ |
|
|
|