XProfan

Français

allô.

je hab un Problem avec LoadExtResource. qui Grafiken volonté simple pas angezeigt. avec
Resourcen kenne je mich bien genug aus afin de savons, le moi vous korrekt incorporé habe
et Profan Befehle comment DrawExtBmp %HINSTANCE,UFO,0,0;0 montrer vous aussi à...

je fasse kurz zusammen:

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

allez pas, Grafiken volonté comme schwarze Rechtecke dargestellt.
text$=UFO
ufo_bmp&=LoadExtResource (%HInstance,addr(text$))
ufo&=InitSprite(ufo_bmp&,%HDC,kopie1&,kopie2&,0,0,182,70,1,1,1,add(%maxx,200),123,3,3)

allez:
DrawExtBmp %HINSTANCE,UFO,0,0;0

peux du dir cela expliquer? je benutze Windows XP, Profan 7.5 et Prospeed 2.4 avec qui neusten
Include Dossier.

Salut,
Sven

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Salut,

ok, du stellst deine Bilder alle comme Resourcetyp BITMAP dans qui Dll. Stelle deine Bilder (Bmp, Jpg, Gif, usw.) comme Resourcetyp IMAGE dans qui Dll.
je hab festgestellt, cela qui ResourcenHacker chez BMP-Bildern automatisch
BITMAP einstellt, et cela läßt sich malheureusement pas changement.
Speichere deine Bilder vom Typ BMP simple sous anderem Namen ab, z.B.
Bild1.bmp -> Bild1.bbb
maintenant peux du aussi BMP-Bilder comme Typ IMAGE einbauen.

je habs selber getestet, avec IMAGE funktionierts, avec BITMAP pas...
je werde la fois versuchen, cela dans den prochain Tagen aussi encore anders hinzubekommen.

Salut, Frank

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Salut,

Folgender Zusatz venez ab ProSpeed Version 2.5 zur Anleitung qui Funktion LoadExtResource():

important: Bmp-Fichiers dans Resourcen peut comme Resourcetyp BITMAP ou bien IMAGE gespeichert son.
Alle anderen Grafik-Fichiers doit comme Resourcetyp IMAGE gespeichert son ! So wird z.B. un Jpg-Bild pas trouvé, cela comme Typ
BITMAP gespeichert wurde...

Momentan (2.4) peut Grafiken aus Resourcen mais seulement geladen volonté, si vous avec Resource-Typ IMAGE abgelegt wurden.

qui absolument cette neuen Zusatz trop LoadExtResource() nécessaire, dem schicke je volontiers qui ProSpeed-Betaversion 2.5.

Salut, Frank

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Jööööööö une neue Version.
quand ists car soweit et quelle Neuerungen venons en supplément?
Mfg Thomas

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Hi,

dauert wohl encore un un peu...

Neuerungen sommes bisher:

- schnelle Funktion, um Bildschirmgrafiken aus Tiles zusammen trop mettons + Beispiel
- riesige Bitmaps (jusqu'à 32768 x 32768) Sauver.
- Taskbar à et débrancher
- Manuelle Byte-Arrays erstellen

Salut, Frank

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

allô Frank

Habe qui Bilddatei umbennant et cela Bildmap
comme IMAGE avec den Ressource Hacker dans qui DLL abgelegt
mais irgendwie funktiniert es encore pas, fais bestimmt encore quoi faux?
Kompilieren Marque Séparation

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

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

merci pour jeden Tip

Luís

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Salut,

hmm, en supplément peux je maintenant pas viel dire.
si du mir deine Dll et dein (Test)programm envoies, schaue je mir cela volontiers la fois à.

Pour qui Zukunft sommes weitere Fragen de dir ici im Forum besser aufgehoben, comme im allgemeinen Profan-Forum.

Salut, Frank

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

allô Frank

Habe maintenant den Anhang den Du mir gesendet la hâte rekonstruieren peut

Eigentlich voulais je qui Instructionen de Profan par qui de Prospeed ersetzen, et es sollte aussi cela gleiche bewirken
ist mais avec Deinen Beispiel pas qui fals, es funktioniert cela magasin des bitmaps aus qui DLL mais es wird ensuite pas korrekt sur den Bildschirm dargestellt.
Kompilieren Marque Séparation

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"

Ist es avec Prospeed possible?

merci

Luís

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

allô Luis,

bien sûr, était oui aussi seulement un Beispiel.

Am besten liest du dir dans qui ProSpeed-Anleitung la fois par, comment on CopyExtBmp() richtig anwendet.

si je Zeit habe, bastle je dir la fois un Beispiel.
comment ego verstanden habe, vouloir du aus qui Bitmap chaque Les chiffres wieder dans zweistellige payons umsetzen.
Dein Weg sur une String ist dabei mais droite compliqué, pourquoi verwendest du pas direct payons ?

Salut, Frank

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

allô Luis,

so, cette Code (pour Profan 7 ?) pouvoir cela gleiche comment deine Counter-Procédure. Arbeitet mais direct avec payons, anstatt compliqué avec Cordes trop hantieren.
qui Variablen dois du entsprechend declarieren ou bien anpassen.
Kompilieren Marque Séparation

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

Salut, Frank

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

allô Frank

merci, es funktioniert
Habe beide Zeilen en supplément geschrieben, weil si cela
Programme minimiert et es maximiert wurde verschwand
qui Zähler, je hoffe cela es richtig ist.

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

oublier qc habe je cela Bild darzustellen pas, j'étais
qui Ansicht cela si cela bildmap avec Prospeed dans den grenier geladen wurde, cela es avec den Profanbefehl Mcopybmp sur den
Bildschirm Montrer pourrait, quoi wahrscheinlich pas possible ist.

mais richtig comprendre, habe je cette code encore pas
je s'il te plaît toi si un peu Zeit avons devrait et
fals possible, es s'il te plaît Ausführlich trop expliquer, c'est bestimmt pas seulement mir avec cela 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

merci

Luís

20.04.2004 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

allô Luis,

Habe beide Zeilen en supplément geschrieben, weil si cela
Programme minimiert et es maximiert wurde verschwand
qui Zähler, je hoffe cela es richtig ist.

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

oui, ist richtig. Profan pouvoir cela interne aussi so.
qui Restaurierungs-HDC %hdc2 ist une prima Erfindung de Profan et nimmt dem Anwender chacun la quantité travail ab...

oublier qc habe je cela Bild darzustellen pas, j'étais
qui Ansicht cela si cela bildmap avec Prospeed dans den grenier geladen wurde, cela es avec den Profanbefehl Mcopybmp sur den
Bildschirm Montrer pourrait, quoi wahrscheinlich pas possible ist.

non. qui HDC steht pour dem magasin im grenier et peux ensuite jederzeit dorthin kopiert volonté, òu du vouloir.
cet technologie ist sur jeden le cas flexibler.
Allerdings benutzt Prospeed niemals qui profane Speicherbitmap, mais bietet selber 32 eigene Bitmaps/Hdcs à.

mais richtig comprendre, habe je cette code encore pas
je s'il te plaît toi si un peu Zeit avons devrait et
fals possible, es s'il te plaît Ausführlich trop expliquer, c'est bestimmt pas seulement mir avec cela 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& ist qui Zähler votre Counters.

a& ist qui Zähler geteilt par 10, alors qui Zehnerziffer

b& ist qui Zähler minus (Zehnerziffer la fois 10), z.B.:
83-(8*10)=
83-80=
3
b& ist alors qui Einerziffer

Nochmal zum Beispiel 83. Anders geschrieben sähe es so aus:

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

là chaque Les chiffres dans qui Grafik bitmap& 11 Pixel breit sommes et alle nebeneinander liegen, berechnest du den horizontalen Offset dedans qui Grafik avec Ziffer*11...

So, je hoffe tu as cela quelque chose verstanden...