| |
| |
|
Rolf
Koch | Tuve con TS una kurzen Code getestet y uns fiel en, dass folgender Code en Ihm el Progressbar garnicht anzeigt. En me eh y je anzeigebereit.
En wem klappts? En wem no?
En me wurde una richtiges Handle adecuado en Thomas sólo una 1
KompilierenMarcaSeparación
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 | En me klappts...wäre no einfacher encima Control()?
Jac 
Apéndice: Ähm, Variables sólo de Pagar y Typ-Identifier??? Tal vez solltet ihr veces a la Buchstaben voransetzen...??? Und es no einfacher con Addr en lugar de el Umweg encima 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 | Sí klar Jac encima Control gehts sí einfacher.
Yo habe dies de mi Roc y erstellt dies así, así auch Uralt Profanversionen klarkommen.,
Aber Gracias fürs testen. Pensé ya Yo wäre verrückt.
 |
|
| |
| |
| |
|
|
Rolf
Koch | Thomas hatte con su Vermutung bastante, dass lo a Profano 10 liegt.
Hab el código con Profano 10 interpretiert y nun sehe Yo auch sólo como Handle una 0 y no Progressbar mehr.
Mach Yo con Profano 9.1 es dies todavía disponible.
Roland, haste qué geändert? |
|
| |
| |
| |
|
|
Matthias
Arlt | Stell veces el DEF CreateWindowEx... a el Anfang, also todavía antes el aufrufende Procedimiento. Yo habs grade a veces Prf 7.5 getestet:
- zuerst Fehlermedung, como CreatewindowEx No se ha encontrado...
- después de Interruptor entonces fehlerfrei ! |
|
| |
| WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia | 01.04.2006 ▲ |
|
| |
|
|
RGH | ¡Hola,
el hängt así zusammen, daß en el aktuellen Subscriptionsversion de XProfan 10 en API-Características Fließkommazahlen automáticamente como 32-Bit-Floats transferencia voluntad. Como el Ergenis el Val-Función natürlich una Fließkommawert es, se él nun como 32-Bit-Fließkommawert transferencia, qué hier natürlich falso es, como sí Longints esperado voluntad. Abhilfe: Einfach una Int antes el val: Int(Val(...)).
BTW: ¿Por qué voluntad eigentlich el Hextwerte como String transferencia y no como Pagar?
Außerdem: Variablennamen debería grundsätzlich con un Buchstaben (oder Unterstrich) beginnen.
Saludo
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:0d025545a4]¿Por qué voluntad eigentlich el Hextwerte como String transferencia y no como Pagar?
[/quote:0d025545a4]
*lol* - Tuve damals de irgendeinem Grund (JA lo gab una ) gemacht.
Belassen wir lo veces así, es künstlerisches Denken *HIHIHIHI*
Rolf |
|
| |
| |
| |
|
(453)
Deutsch
English
Français
Español
Italia