Hallo diese Procedure ist aus nem DoKo- buch oder?
sie ist nicht sauber (Bereichsprüfung muß deaktiviert sein) aber ise geht. wie sieht denn dein Aufruf aus? bei DokO ist auch ein Beipsiel mit dabei
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
image1.Picture.bitmap.PixelFormat := pf24bit;
Drehen90Grad(image1.picture.bitmap);
end;
Mfg Frank