| |
| |
|
Rolf
Koch | je hatte avec TS une kurzen Code getestet et uns fiel sur, dass suivant Code chez Ihm qui Progressbar garnicht anzeigt. chez mir eh et je anzeigebereit.
chez wem klappts? chez wem pas?
chez mir wurde un richtiges Handle angezeigt chez Thomas seulement une 1
KompilierenMarqueSéparation
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 | chez mir klappts...wäre es pas einfacher sur Contrôle()?
Jac 
Nachtrag: Ähm, Variablen seulement aus payons et Typ-Identifier??? peut-être solltet son la fois une Buchstaben voransetzen...??? et ist es pas einfacher avec Addr statt dem le détour sur Bereiche??? |
|
| |
| 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 | 01.04.2006 ▲ |
|
| |
|
|
Rolf
Koch | oui bien sûr Jac sur Contrôle gehts oui einfacher.
j'ai ca aus meinem Roc et qui erstellt ca so, avec cela aussi Uralt Profanversionen klarkommen.,
mais merci pour testen. J'ai pensé déjà je wäre fou.
 |
|
| |
| |
| |
|
|
Rolf
Koch | Thomas hatte avec seiner Vermutung droite, dass es à Profan 10 liegt.
Hab den Code avec Profan 10 interpretiert et eh bien vois je aussi seulement comme Handle une 0 et aucun Progressbar plus.
Mach je es avec Profan 9.1 ist ca encore vorhanden.
Roland, hâte quoi geändert? |
|
| |
| |
| |
|
|
Matthias
Arlt | Stell la fois cela DEF CreateWindowEx... à den Anfang, alors encore avant qui aufrufende Procédure. je habs grade la fois sous Prf 7.5 getestet:
- d'abord Fehlermedung, là CreatewindowEx pas trouvé...
- pour Commutateur ensuite correct ! |
|
| |
| WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia | 01.04.2006 ▲ |
|
| |
|
|
RGH | Salut,
cela hängt avec cela zusammen, qui dans qui aktuellen Subscriptionsversion de XProfan 10 chez API-Funktionen Fließkommazahlen automatisch comme 32-Bit-Floats transfert volonté. là cela Ergenis qui Val-Funktion naturellement un Fließkommawert ist, wird il eh bien comme 32-Bit-Fließkommawert transfert, quoi ici naturellement faux ist, là oui Longints erwartet volonté. Abhilfe: simple un Int avant cela val: Int(Val(...)).
BTW: pourquoi volonté eigentlich qui Hextwerte comme String transfert et pas comme payons?
Aussi: Variablennamen devrait grundsätzlich avec einem Buchstaben (ou bien Unterstrich) commencer.
Salut
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 | 01.04.2006 ▲ |
|
| |
|
|
Rolf
Koch | [quote-part:0d025545a4]pourquoi volonté eigentlich qui Hextwerte comme String transfert et pas comme payons?
[/quote-part:0d025545a4]
*lol* - J'ai eu autrefois aus irgendeinem Grund (JA es donnais une ) gemacht.
Belassen wir es la fois so, ist künstlerisches penser *HIHIHIHI*
Rolf |
|
| |
| |
| |
|
(453)
Deutsch
English
Français
Español
Italia