Einzelnen Beitrag anzeigen

Benutzerbild von bytecook
bytecook

Registriert seit: 6. Aug 2010
Ort: Dornbirn
151 Beiträge
 
Delphi 11 Alexandria
 
#28

AW: Bilder [mit/ohne Transparenz] in universelles Format bringen

  Alt 17. Aug 2016, 10:16
> Das Ganze wird soweit korrekt dargestellt, die Frage ist halt, ob Alles rechnerisch bzw. Inhaltlich richtig ist. Leider muss man diese Prozedur direkt in die glBitmap-Unit einbinden, da einige interne Prozeduren verwendet werden, die von außerhalb der Unit nicht erreichbar sind (naja, die kann man ja kopieren oder über Deklarationen nach Außen verfügbar machen.

Hmmm - wenn die Routinen als Protected deklariert sind, kannst du ja mittels Trick drauf zugreifen...

Deklariere einfach in deiner Unit unter der Implementation folgenden Typ:

TGlBitmapAccess = Class(TGlBitmap);

danach kannst du mittels TGlBitmapAccess(Variable).methode Cast drauf zugreifen, oder, noch schöner, leite dir eine neue Klasse Klasse dafür ab und override / overloade die AssignFromBitmap Routine.
Peter

Geändert von bytecook (17. Aug 2016 um 10:20 Uhr)
  Mit Zitat antworten Zitat