Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Fehler beim Drehen eines Bildes

    Delphi
    by scp, 9. Nov 2003
  Naja, ein Anfänger bin ich nicht. In der Regel verwende ich auch Free. Nur in dem Fall habe ich mich vertan, habe grad mal in Graphics.pas geguckt, stimmt, wird nur ein Assign() durchgeführt.
• Forum: Multimedia

  Re: Fehler beim Drehen eines Bildes

    Delphi
    by scp, 9. Nov 2003
  @Keildorn
  In dem Fall wird doch das Bitmap an das TImage übergeben, somit übernimmt das die Verwaltung und auch die Freisetzung.
• Forum: Multimedia

  Re: Fehler beim Drehen eines Bildes

    Delphi
    by scp, 9. Nov 2003
  Da das Drehen auf Bitmapebene passiert, müssen die Daten erstmal umgewandelt werden:
  
  
  function Graphic2Bmp(AGraphic : TGraphic) : TBitmap;
  begin
  result := TBitmap.Create;
  
  result.PixelFormat := pf24bit;
  result.Height := AGraphic.Height;
  result.Width := AGraphic.Width;
• Forum: Multimedia

  Re: Fehler beim Drehen eines Bildes

    Delphi
    by scp, 9. Nov 2003
  Na, dann erzähl mal ein paar Sachen. Ist das ein Bitmap (BMP), das du in TImage hast? Lädst du das Bild nachträglich per LoadFromFile oder was rein oder über die IDE?
• Forum: Multimedia

  Re: Fehler beim Drehen eines Bildes

    Delphi
    by scp, 9. Nov 2003
  So gehts (bei mir):
  
  
  procedure Drehen90Grad(Bitmap:TBitmap);
  var P : PRGBQuad;
  x,y,b,h : Integer;
  RowOut : PRGBQuad; // <-- Hier Typ geändert
  help : TBitmap;
  begin
  Bitmap.pixelformat := pf32bit;
• Forum: Multimedia

  Re: Fehler beim Drehen eines Bildes

    Delphi
    by scp, 8. Nov 2003
  Hast du auch ein Code-Beispiel? Wenn es zu lang ist, kannst dus ja als Datei anhängen.