Zitat von
Olli:
BITTE NEU HERUNTERLADEN!!!
Habe ich gemacht.
Zitat von
Olli:
So, hier meine Variante. Ich habe mal schamlos Flocke's Code weiterverwertet.
Habe ihn noch schnell auf Thread umgestellt (hatte zuvor mit Timer getestet).
Ich auch, hat mir aber nicht so gefallen andauernt den Timer zu ändern.
Zitat von
Olli:
In Sachen Thread hat sich ein wenig geändert und außerdem werden alle (Einzel-)Bitmaps der Animationen nun im Speicher gehalten.
Nunja, was hat dir denn daran nicht gefallen das Bitmap im ganzen im Speicher zu halten dass du es aufteilen musstest ?
Zitat von
Olli:
Man könnte das so optimieren, daß nur jeweils eine "Zeile" im Speicher bliebe.
Jupp, wollte ich auch erst, habe es dann aber wieder verworfen.
Zitat von
Olli:
Die Arrays beginnen nun sinnvollerweise bei 0 ...
...jaja, das wollte ich auch noch machen...
Zitat von
Olli:
Hinweis: Die Transparenz habe ich komplett entfernt, da bei mir die Funktion nicht deklariert war und es so schneller ging.
Nanu, warum nicht ?
Delphi-Quellcode:
// def. in Windows.pas
function SetLayeredWindowAttributes(Wnd: hwnd; crKey: ColorRef; Alpha: Byte; dwFlags: DWORD): Boolean; stdcall; external 'user32.dll';
Zitat von
Olli:
Da es nun funktioniert, sollte das das geringste Problem sein
Nunja,
da das Bitmap mit
CreateCompatibleBitmap(MemDC, BMPWIDTH, BMPHEIGHT);
erstellt wird ist der Hintergrund schwarz, also müsste ich diese Sache durch
Delphi-Quellcode:
HBITMAP CreateBitmap(
int nWidth, // bitmap width, in pixels
int nHeight, // bitmap height, in pixels
UINT cPlanes, // number of color planes used by device
UINT cBitsPerPel, // number of bits required to identify a color
CONST VOID *lpvBits // pointer to array containing color data
);
ersetzen. Wobei ich nicht so recht wei mit
pointer to array containing color data etwas anzufangen.
Zitat von
Olli:
PS: Sorry, aber ich mußte einen Sourceformatter verwenden. Irgendwie kam ich mit weiten Teilen deiner Formatierung überhaupt nicht klar.
heheh... ich bin ja auch noch nicht fertig gewesen mit dem schreiben. Dass sollte dann ja auch mal besser aussehen.
Vielen Dank an euch beide!