Zitat von
MaBuSE:
Delphi-Quellcode:
{Smooth rotate a png object}
procedure SmoothRotate(var aPng: TPNGObject; Angle: Extended);
Damit kannst Du das PNG in dem TImage inkl. der Transparenz bzw Alpha Infos drehen.
@MaBuSE DANKE!!!
Sorry, wenn ich mich vielleicht etwas blöd anstelle, aber wie übergebe ich denn der Routine SmoothRotate das pnpObjekt aus dem TImage? Ansonsten bin ich mir sehr sicher, dass das genau das Richtige ist...
Und um es vielleicht noch kurz erklären, warum ich PNG in einem TImage verwende. Ich erstelle Pläne auf einem Form. Auf diesen Plänen sind diverse TImages, die der User frei hinzufügen und bewegen kann (TImages mit geladenen PNG´s). Nun will/muss ich aber für bestimmte Bilder einfach anbieten, dass man die Bilder vor dem Hinzufügen über einen Dialog noch drehen kann.
Wenn das funktioniert, will ich dann auch noch nachträglich, die einem Plan hinzugefügten Bilder drehen lassen...