XProfan

English

Hello.

I Have a problem with LoadExtResource. The Graphics go simply not displayed. with
Resources know I well enough from in order to know, that I tappt im dunkeln correctly installed have
and Profan command How DrawExtBmp %hinstance,UFO,0,0;0 show tappt im dunkeln too on...

I fasse short together:

is:
Text$=UFO.BMP
ufo_bmp&=LoadExtImage(addr(Text$))
ufo&=InitSprite(ufo_bmp&,%HDC,copy1&,copy2&,0,0,182,70,1,1,1,add(%maxx,200),123,3,3)

is not, Graphics go as black Rechtecke displayed.
Text$=UFO
ufo_bmp&=LoadExtResource (%HInstance,addr(Text$))
ufo&=InitSprite(ufo_bmp&,%HDC,copy1&,copy2&,0,0,182,70,1,1,1,add(%maxx,200),123,3,3)

is:
DrawExtBmp %hinstance,UFO,0,0;0

can you you the explain? I use Windows XP, Profan 7.5 and Prospeed 2.4 with the newest
Include File.

Sincerely,
Sven

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hi,

ok, you put your Images any as Resourcetyp BITMAP into Dll. place your Images (Bmp, Jpg, Gif, etc.) as Resourcetyp IMAGE into Dll.
I Have fixes, the the ResourcenHacker with BMP-Images automatically
BITMAP einstellt, and the can itself unfortunately not Change.
save your Images of type BMP simply among other things names ex, z.B.
Image1.bmp -> Image1.bbb
now can you too BMP-Images as type IMAGE install.

I habs yourself tested, with IMAGE funktionierts, with BITMAP not...
i'll time try, the into next Meet too yet differently hinzubekommen.

Greeting, Frank

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hi,

Folgender amendment comes ex ProSpeed version 2.5 to guide the function LoadExtResource():

important: Bmp-Files Resources can as Resourcetyp BITMAP or IMAGE stored his.
All other graphic-Files must as Resourcetyp IMAGE stored his ! so becomes z.B. one Jpg-Image not found, the as type
BITMAP stored watts...

momentarily (2.4) can Graphics from Resources but only loaded go, as they with Resource-type IMAGE stored get.

who absolutely this new amendment To LoadExtResource() needed, the mail I gladly The ProSpeed-Betaversion 2.5.

Greeting, Frank

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Jööööööö a new Version.
when ists because so far and which Neuerungen come moreover?
Mfg Thomas

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hi,

lasts well another little...

Neuerungen are yet:

- speedy function, circa Bildschirmgrafiken from Tiles together To settle + example
- gigantic Bitmaps (To 32768 x 32768) Save.
- Taskbar on and turn off
- Manuelle byte-Arrays create

Greeting, Frank

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hello Frank

have The Bilddatei umbennant and the Bildmap
as IMAGE with the Ressource Hacker into DLL stored
but somehow funktiniert it not yet, make certainly yet what wrong?
Compile Mark Separation

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

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

thanks for each hint

Luís

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hi,

hmm, moreover can I now not plenty say.
If you me your Dll and your (Test)Program mail, look I me the gladly at times.

for the future are further ask of you here in the Forum rather aufgehoben, as in general Profan-Forum.

Greeting, Frank

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hello Frank

have now whom attachment whom You me gesendet have rekonstruieren can

really wished I The Instructionen of Profan by the of Prospeed supplant, and it ought to too the same effect
is with your example not the fals, it functions the loading the bitmaps from the DLL but it'll then not correctly on the screen displayed.
Compile Mark Separation

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"

is it with Prospeed possible?

thanks

Luís

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hello Luis,

clear, was indeed only an example.

best reads You you in the ProSpeed-guide time through, How one CopyExtBmp() correctly. anwendet.

If I Time have, bastle I you time an example.
How ichs understood have, want You from the Bitmap each Digits again in zweistellige numbers umsetzen.
your lane a String is thereby but right umständlich, Why verwendest You not directly numbers ?

Greeting, Frank

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hello Luis,

so, this code (for Profan 7 ?) power the same How your Counter-procedure. operates but directly with numbers, instead of umständlich with Strings To hantieren.
The variables must You properly declarieren or adjust.
Compile Mark Separation

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

Greeting, Frank

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hello Frank

thanks, it functions
have both Lines moreover written, because if the
Program minimizes and it maximiert watts disappeared
the counter, I hope the it correctly. is.

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

forget have I the image darzustellen not, i was
the view the if the bildmap with Prospeed into memory loaded watts, the it with the Profanbefehl Mcopybmp on the
screen Show could, what probably you don't say so is.

but correctly. understand, have I this code not yet
I Please you if a little bit Time having should and
fals possible, it Please comprehensive To explain, its certainly not only me so helped?

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

thanks

Luís

04/20/04 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Hello Luis,

have both Lines moreover written, because if the
Program minimizes and it maximiert watts disappeared
the counter, I hope the it correctly. is.

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

Yes, is correctly.. Profan power the intern too so.
The Restaurierungs-HDC %hdc2 is a lovely invention of Profan and takes the users each crowd work ex...

forget have I the image darzustellen not, i was
the view the if the bildmap with Prospeed into memory loaded watts, the it with the Profanbefehl Mcopybmp on the
screen Show could, what probably you don't say so is.

No. The HDC standing to the loading in memory and can then anytime there copies go, where You want.
These engineering is In any drop flexibler.
though using Prospeed never The profane Memory bitmap, separate bid yourself 32 Own Bitmaps/Hdcs on.

but correctly. understand, have I this code not yet
I Please you if a little bit Time having should and
fals possible, it Please comprehensive To explain, its certainly not only me so helped?

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& is the counter your Counters.

a& is the counter shared through 10, means The Zehnerziffer

b& is the counter less (Zehnerziffer time 10), z.B.:
83-(8*10)=
83-80=
3
b& is means The Einerziffer

Nochmal to that example 83. differently written sähe it so from:

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

there each Digits in the graphic bitmap& 11 Pixel wide are and any next to each other lying, berechnest You whom horizontalen Offset inside the graphic with digit*11...

so, I hope you have the something understood...