XProfan

Español

¡Hola.

Yo una Problema con LoadExtResource. El Gráficos voluntad simplemente no adecuado. Mit
Resourcen saber Yo mich bien genug de en a wissen, el Yo ellos korrekt instalado habe
y Profano Befehle como DrawExtBmp %hInstance,UFO,0,0;0 zeigen ellos auch a...

Yo fasse kurz zusammen:

va:
texto$=UFO.BMP
ufo_bmp&=LoadExtImage(addr(texto$))
ufo&=InitSprite(ufo_bmp&,%HDC,kopie1&,kopie2&,0,0,182,70,1,1,1,add(%maxx,200),123,3,3)

va no, Gráficos voluntad como schwarze Rechtecke dargestellt.
texto$=UFO
ufo_bmp&=LoadExtResource (%HInstance,addr(texto$))
ufo&=InitSprite(ufo_bmp&,%HDC,kopie1&,kopie2&,0,0,182,70,1,1,1,add(%maxx,200),123,3,3)

va:
DrawExtBmp %hInstance,UFO,0,0;0

¿Puede du dir el erklären? Yo benutze Windows XP, Profano 7.5 y Prospeed 2.4 con el neusten
Incluir Expediente.

Saludo,
Sven

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¡Hola,

ok, du stellst deine Bilder todos como Resourcetyp BITMAP en el Dll. Punto deine Bilder (Bmp, Jpg, Gif, usw.) como Resourcetyp IMAGE en el Dll.
Yo festgestellt, el el ResourcenHacker en BMP-Bildern automáticamente
BITMAP einstellt, y el läßt se por desgracia, no ändern.
Speichere deine Bilder vom Typ BMP simplemente bajo anderem Namen de, z.B.
Bild1.bmp -> Bild1.bbb
Jetzt kannst du auch BMP-Bilder como Typ IMAGE einbauen.

Yo habs selber getestet, con IMAGE funktionierts, con BITMAP no...
Yo voluntad veces versuchen, el en el nächsten Tagen auch todavía anders hinzubekommen.

Saludo, Franco

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¡Hola,

Folgender Zusatz kommt de ProSpeed Versión 2.5 a Anleitung el Función LoadExtResource():

Wichtig: Bmp-Archivos en Resourcen puede como Resourcetyp BITMAP oder IMAGE gespeichert ser.
Todos los demás Grafik-Archivos necesario como Resourcetyp IMAGE gespeichert ser ! So se z.B. una Jpg-Bild No se ha encontrado, como el Typ
BITMAP gespeichert wurde...

Momentan (2.4) puede Gráficos de Resourcen aber sólo geladen voluntad, si ellos con Resource-Typ IMAGE abgelegt fueron.

Wer necesariamente esta neuen Zusatz a LoadExtResource() benötigt, el schicke Me gusta el ProSpeed-Betaversion 2.5.

Saludo, Franco

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jööööööö una neue Versión.
Wann ists porque soweit y welche Neuerungen kommen dazu?
Mfg Thomas

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Hi,

dauert wohl todavía una bischen...

Neuerungen son bisher:

- schnelle Función, en Bildschirmgrafiken de Tiles zusammen a conjunto + Ejemplo
- riesige Bitmaps (a 32768 x 32768) speichern.
- Taskbar a y abschalten
- Manuelle Byte-Arrays redactar

Saludo, Franco

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¡Hola Franco

Posesiones el Bilddatei umbennant y el Bildmap
como IMAGE con el Ressource Hacker en el DLL abgelegt
aber irgendwie funktiniert lo todavía no, mache determinado todavía qué falso?
Kompilieren Marca Separación

Declare dll&
let dll&=@UseDLL("Meinedll.DLL")
text$="COUNTER"
LoadExtResource (DLL&,addr(text$))pre>

Grrr....??????????

Gracias para cada Tip

Luís

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¡Hola,

hmm, dazu kann Yo ahora no viel sagen.
Wenn du me deine Dll y dein (Test)programm schickst, schaue Yo el gerne veces a.

Für el Zukunft son weitere Fragen de dir hier en el Foro mejor aufgehoben, como en el allgemeinen Profano-Foro.

Saludo, Franco

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¡Hola Franco

Posesiones ahora el Anhang el Usted me gesendet hast rekonstruieren puede

Eigentlich Yo quería el Instructionen de Profano por el de Prospeed sustituir, y lo debería auch el gleiche bewirken
es aber con Su Ejemplo no fals, lo funktioniert el invitar des bitmaps de el DLL pero se entonces no korrekt en el Bildschirm dargestellt.
Kompilieren Marca Separación

CopyExtBmp(%hdc,Rnd(600),Rnd(400),11,17,bitmap&,(Rnd(10)*11),0,0)
sollte das gleiche bewirken wie:
MCopyBmp Mul(Val(Mid$(zeigenr$,4,1)),11),0-11,17 > add(x%,48),y% ;0
MCopyBmp Mul(Val(Right$(zeigenr$,1)),11),0-11,17 > add(x%,60),y% ;0
text$="COUNTER"
bitmap&=LoadExtResource(DLL&,addr(text$))
solte das gleiche bewirken wie:
MLoadBmp "COUNTER.BMP"

¿Es con Prospeed posible?

Gracias

Luís

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¡Hola Luis,

klar, war en efecto sólo una Ejemplo.

Am besten liest du dir en el ProSpeed-Anleitung veces por, cómo CopyExtBmp() correcto anwendet.

Wenn Yo Tiempo habe, bastle Yo dir veces una Ejemplo.
Como ego verstanden habe, möchtest du de el Mapa de bits cada Ziffern otra vez en zweistellige Pagar umsetzen.
Su Weg encima una String es esta aber bastante umständlich, por qué verwendest du no direkt Pagar ?

Saludo, Franco

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¡Hola Luis,

así, dieser Code (para Profano 7 ?) macht el gleiche como deine Counter-Procedimiento. Arbeitet aber direkt con Pagar, anstatt umständlich con Cuerdas a hantieren.
El Variables mußt du entsprechend declarieren oder adaptar.
Kompilieren Marca Separación

text$="COUNTER"
bitmap&=LoadExtResource(DLL&,addr(text$))

Whileloop 99

    a&=x&/10
    b&=x&-(a&*10)
    CopyExtBmp(%hdc,148,100,11,17,bitmap&,a&*11,0,0)
    CopyExtBmp(%hdc,160,100,11,17,bitmap&,b&*11,0,0)
    Sleep 200
    x&=x&+1

Saludo, Franco

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¡Hola Franco

Gracias, lo funktioniert
Posesiones beide Zeilen dazu geschrieben, porque si el
Programa minimiert y lo maximiert wurde verschwand
el Zähler, Yo hoffe el lo correcto es.

CopyExtBmp(%hdc2,148,100,11,17,bitmap&,a&*11,0,0)
CopyExtBmp(%hdc2,160,100,11,17,bitmap&,b&*11,0,0)

Vergessen Yo el Bild darzustellen no, Yo war
el Ansicht el si el bildmap con Prospeed en el Speicher geladen wurde, el lo con el Profanbefehl Mcopybmp en el
Bildschirm Mostrar podría, qué wahrscheinlich no posible es.

Aber correcto Verstehen, Yo esta code todavía no
Yo Por favor, Usted si una wenig Tiempo haben solltest y
fals posible, lo Por favor, Ausführlich a erklären, es determinado no sólo me así geholfen?

a&=x&/10
b&=x&-(a&*10)
CopyExtBmp(%hdc,148,100,11,17,bitmap&,a&*11,0,0)
CopyExtBmp(%hdc,160,100,11,17,bitmap&,b&*11,0,0)
x&=x&+1

Gracias

Luís

20.04.2004 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

¡Hola Luis,

Posesiones beide Zeilen dazu geschrieben, porque si el
Programa minimiert y lo maximiert wurde verschwand
el Zähler, Yo hoffe el lo correcto es.

CopyExtBmp(%hdc2,148,100,11,17,bitmap&,a&*11,0,0)
CopyExtBmp(%hdc2,160,100,11,17,bitmap&,b&*11,0,0)

Sí, es correcta. Profano macht el intern auch así.
El Restaurierungs-HDC %hdc2 es una prima Erfindung de Profano y nimmt el Anwender jede Menge Arbeit de...

Vergessen Yo el Bild darzustellen no, Yo war
el Ansicht el si el bildmap con Prospeed en el Speicher geladen wurde, el lo con el Profanbefehl Mcopybmp en el
Bildschirm Mostrar podría, qué wahrscheinlich no posible es.

Nein. Der HDC es después de el Laden en el Speicher y kann entonces en cualquier momento dorthin kopiert voluntad, wohin du möchtest.
Diese Technik es en cada Fall flexibler.
Aunque benutzt Prospeed niemals el profane Speicherbitmap, pero bietet selber 32 propio Bitmaps/Hdcs a.

Aber correcto Verstehen, Yo esta code todavía no
Yo Por favor, Usted si una wenig Tiempo haben solltest y
fals posible, lo Por favor, Ausführlich a erklären, es determinado no sólo me así geholfen?

a&=x&/10
b&=x&-(a&*10)
CopyExtBmp(%hdc,148,100,11,17,bitmap&,a&*11,0,0)
CopyExtBmp(%hdc,160,100,11,17,bitmap&,b&*11,0,0)
x&=x&+1

x& es el Zähler su Counters.

a& es el Zähler geteilt por 10, Así que el Zehnerziffer

b& es el Zähler minus (Zehnerziffer veces 10), z.B.:
83-(8*10)=
83-80=
3
b& es Así que el Einerziffer

Nochmal para Ejemplo 83. Anders geschrieben sähe lo así de:

CopyExtBmp(%hdc,148,100,11,17,bitmap&,88,0,0) 8
CopyExtBmp(%hdc,160,100,11,17,bitmap&,33,0,0) 3

Como cada Ziffern en el Grafik bitmap& 11 Pixel breit son y todos nebeneinander mentira, berechnest du el horizontalen Offset innerhalb el Grafik con Ziffer*11...

So, Yo hoffe du hast el algo verstanden...