| |
| |
|
Rolf
Koch | I had with TS a short code tested and us fell on, that following code with it The wallpaper.pcu of not at all indicating. by me eh and apiece anzeigebereit.
With whom works? With whom not?
by me watts one richtiges lever displayed with Thomas only a 1
CompileMarkSeparation
PROC CREATEOBJECT
PARAMETERS HANDEL&,O$,TEXT$,1%,2%,3%,4%,Stil$,ext$
DECLARE NAME#,TEXT#,RETHANDEL&
Dim NAME#,len(O$)+1
Dim TEXT#,len(Text$)+1
String NAME#,0 =O$
String TEXT#,0 = Text$
RETHANDEL& = @CREATEWINDOWEX(val(ext$),NAME#,TEXT#,val(STIL$),1%,2%,3%,4%,HANDEL&,2000,%Hinstance,0)
DISPOSE NAME#
DISPOSE TEXT#
RETURN RETHANDEL&
ENDPROC
DEF @CreateWindowEx(12) ! "USER32","CreateWindowExA"
declare progressbar1&
cls
CREATEOBJECT %HWND,"msctls_progress32","PROGRESSBAR",0006,0234,0182,0018,"$54000000","$020000"
LET PROGRESSBAR1&=@&(0)
print progressbar1&
waitinput
|
|
| |
| |
| |
|
|
Jac
de
Lad | by me works...would not plainer over Control()?
Jac 
Nachtrag: Ähm, variables only from numbers and type-Identifier??? Perhaps solltet your time a letters voransetzen...??? and is not plainer with Addr instead of the detour over reaches??? |
|
| |
| 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 | 04/01/06 ▲ |
|
| |
|
|
Rolf
Koch | Yes clear Jac over Control GEHTS Yes plainer.
I have this from my Roc and the prepares this so, so too Uralt Profanversionen get by.,
but thanks for testing. I thought already I would insane.
 |
|
| |
| |
| |
|
|
Rolf
Koch | Thomas having with his supposition right, that it to profane 10 lying.
Have whom code with Profan 10 interprets well then see so did i only as lever a 0 and no wallpaper.pcu of More.
Mach I it with Profan 9.1 is this yet present.
Roland, haste what changed? |
|
| |
| |
| |
|
|
Matthias
Arlt | Stell time the DEF CreateWindowEx... on whom beginning, means yet to The aufrufende procedure. I habs grade times under Prf 7.5 tested:
- first Fehlermedung, there CreatewindowEx not found...
- to Umstellung then fehlerfrei ! |
|
| |
| WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia | 04/01/06 ▲ |
|
| |
|
|
RGH | Hi,
the depends so together, that in the actually Subscriptionsversion of XProfan 10 in API-functions Fließkommazahlen automatically as 32-bit-Floats transfer go. there the Ergenis the Val-function naturally one Fließkommawert is, becomes it now as 32-bit-Fließkommawert transfer, what here naturally wrong is, there Yes Longints expects go. remedy: simply one Int to the val: Int(Val(...)).
BTW: Why go really The Hextwerte as String transfer and not as numbers?
Also: Variablennamen should fundamentally with a letters (or Unterstrich) begin.
Greeting
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 | 04/01/06 ▲ |
|
| |
|
|
Rolf
Koch | [quote:0d025545a4]Why go really The Hextwerte as String transfer and not as numbers?
[/quote:0d025545a4]
*lol* - I had then from irgendeinem reason (JA it given a ) made.
leave we it time so, is künstlerisches think *HIHIHIHI*
Rolf |
|
| |
| |
| |
|
(454)
Deutsch
English
Français
Español
Italia