| |
| |
|
Sato
Pinto | Hello
Xpse bleats doppeldefinition of LoadPic, if I The Def LoadPic ausklammere then becomes gemeldet the LoadPic a Unbekkante function is!
without Xpse functions the code!
CompileMarkSeparationSource wurde am 15.06.2006 in die Babyklappe auf XProfan.Com abgelegt:
DEF LoadPic(6) !"user32","LoadImageA"
DEF SetMenuItemBitmaps(5) !"USER32","SetMenuItemBitmaps"
DEF GetMenu(1) !"USER32","GetMenu"
DEF GetSystemMetrics(1) !"USER32","GetSystemMetrics"
proc setmenupicture
parameters h&,pic$
SetMenuItemBitmaps(GetMenu(%HWND),h&,0,LoadPic(0,addr(pic$),0,GetSystemMetrics(71),GetSystemMetrics(72),$10),0)
endproc
cls
popup "&Programm"
appendmenu 1000,"&Beenden Alt+F4"
popup "&Optionen"
appendmenu 1001,"&Einstellungen Strg+E"
popup "&?"
appendmenu 1002,"&About"
setmenupicture 1000,"Bitmap1.bmp"
setmenupicture 1001,"Bitmap2.bmp"
setmenupicture 1002,"Bitmap3.bmp"
usermessages 16
whilenot %umessage==16
getmessage
wend
end
greeting
Satos |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | which Profanversion have Thou? since XProfan10 can You rather Create("HPIC",...) use.
Also is LoadPic neither simply so in a function To use. rather is it a Variable with the Bildhandle anzulegen and then again DeleteObject Handle& the lever To destroy.
it given time (kurzzeitig) a function "LoadPic" in Profan. Perhaps comes XPSE there in that swim. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 08/23/08 ▲ |
|
| |
|
|
Sato
Pinto | Hello Jörg
have XProfan11
without XPSE functions it
what about me faith this code besipiel is of iF posted been?
greeting
Sato |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | | then verpaß you still time in your Profileinstellungen a Signatur with Profanversion and Betriebsystem. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 08/25/08 ▲ |
|
| |
|
|
Sato
Pinto | Hello Jörg
have I already made, but it appear not whom postings. ??
greeting
Sato |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | Hello Sato,
attempt time, not everything among themselves To write. its only a defined Höhe allows. Perhaps have You The overstepped.
Greeting
Jörg |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 08/26/08 ▲ |
|
| |
|
|
 | | @Jörg: You can its Signatur in the ACP discover if you the Member "öffnest". |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | | its Signatur have I me already angeschaut, therefore too the hint. as long as not absolutely necessary is, I will not on whom "privaten" sharing one Mitglieds fiddle. Perhaps kriegt ers Yes yourself there. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 08/27/08 ▲ |
|
| |
|
|
| Sooo, habs me now look at can - xpse reacted still completely correctly:
LoadPic is already one Schlüsselwort the XProfan, xpse bleats:
Error: DOPPELDEFINITION: LOADPIC Procnaehe: SETMENUPICTURE 
cling I your row
CompileMarkSeparationfrom, then has too xpse no Problems More so. |
|
| |
| |
| |
|
|
Sato
Pinto | Hello iF
If I DEF LoadPic ausklammere then appear by me a Messagebox with the Message "Function uncharted:: LoadPic" because of the row
SetMenuItemBitmaps(GetMenu(%HWND),h&,0,LoadPic(0,addr(pic$),0,GetSystemMetrics(71),GetSystemMetrics(72),$10),0)
means can I unfortunately XPSE not using, what helps in this drop?
greeting
Sato
XProfan11
Win XP Home |
|
| |
| |
| |
|
|
| is still correctly, The emphasis lying on "Funktion" - and the Message comes neither of XPSE separate of XProfan! your XProfan knows The function LoadPic not, its indeed a procedure!
You can hold not simply a existierenden procedure/Funktionsnamen überschreiben, the has nothing with XPSE To do, except the it you even already before warns.
name your function still simply myLoadPic ...
You can incidentally too always with {$noerr} each warning the XPSE turn off, but since goes yet plenty More: [...]  on the Page standing plenty - has one it however red can rather works! |
|
| |
| |
| |
|
|
Dieter
Zornow | | LoadPic was still never in Profan integrate, this is still a Procedure in the NVIEWLIB.INC and if it The not uses, might too no Meckern come.. |
|
| |
| Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 08/27/08 ▲ |
|
| |
|
(631)
Deutsch
English
Français
Español
Italia