Sooo... *schieb*
Ich hab nun herausgefunden das ich da mit dem FormatDescriptor vom Bitmap was anfangen kann.
Und zwar:
Delphi-Quellcode:
var
pfd: PixelFormatDescriptor
begin
DescribePixelFormat(result.Canvas.Handle, GetPixelFormat(result.Canvas.Handle), sizeof(PixelFormatDescriptor), pfd);
if pfd.iPixelType = PFD_TYPE_RGBA then
ShowMessage('Es ist 32BIT!');
end;
Es funkt tatsächlich, nur es gibt ein riesen Manko bei dem Teil:
Um ca. 6 Bitmaps damit abzuchecken, braucht mein Rechner (P4 2,6Ghz, 1G
Ram, WinXP) ma so locker 2-3 Sekunden. Und das ist mir zuviel, besonders da ich die Funktion benutzen will wo auch mal 20 Bitmaps abgecheckt werden müssen. Dann sitzt der Benutzer 7-10 Sekunden doof rum, was ich absolut nicht befürworten kann.
Habt ihr ne Ahnung wie ich diese langsame Funktion (DescribePixelFormat, GetPixelFormat) durch andere ersetzen kann ??
- Thebe