Seite 1 von 1

RegisterBitmap für PB 4.00, wer kann helfen

Verfasst: 16.06.2006 19:29
von Thatsanee

Code: Alles auswählen

Procedure RegisterBitmap       (ImageNumber, hBitmap) 
  Protected *lptr.Long, *wptr.Word, BitmapData.BITMAP  
  GetObject_(hBitmap, SizeOf(BITMAP), @BitmapData)  
  
  !EXTRN _PB_Image_ObjectsArea 
  !MOV Eax, [_PB_Image_ObjectsArea] 
  !MOV [Esp+8], Eax  
  *lptr + ImageNumber * 14 
  *lptr\l = hBitmap  
  *wptr = *lptr + 4 
  *wptr\w = BitmapData\bmWidth 
  *wptr + 2 
  *wptr\w = BitmapData\bmHeight 
  *wptr + 2 
  *wptr\w = BitmapData\bmBitsPixel 
  *lptr = *wptr + 2 
  *lptr\l = BitmapData\bmBits    
EndProcedure 
Hallo diese Procedure läuft nicht mehr unter 4.0
Der fehler dürfte in diesen Zeilen sein,
!EXTRN _PB_Image_ObjectsArea
!MOV Eax, [_PB_Image_ObjectsArea]
aber wie lauten diese für 4.0

Thatsanee

Verfasst: 16.06.2006 21:56
von Ja!
Ich weiß zwar keine Antwort auf Deine Frage, aber warum schreibst Du sowas ins Anfänger-Forum?

Vielleicht lesen es im Allgemeinen Forum die richtigen Leute und können eher helfen..


Gruß

Verfasst: 19.06.2006 01:51
von Thatsanee
Danke für die viele Tips,

hat sich erledigt.

Re: RegisterBitmap für PB 4.00, wer kann helfen

Verfasst: 24.09.2009 10:23
von Donald
Hi,

ist zwar schon was älter der Beitrag,
aber was hast Du denn nun geändert das
es unter 4.xx läuft ?


Gruß Donald


..