Neue Seite
ODT Export PDF Export

BGRABitmap

nützliche Zeienfunktionen antialiasing, rotation (Drehungen)

Quelle

Vorgehen

  • bgrabitmap herunterladen, entpacken in einen Ordner

https://codeload.github.com/bgrabitmap/bgrabitmap/zip/master

  • Öffnen innerhalb des eigenen Projektes die Datei 'bgrabitmap.pas'.
  • Menüpunkt Projekt > Datei im Editor ins Projekt aufnehmen. Lazarus fragt dann, ob man die Datei und das Verzeichnis zu Ihrem Projekt hinzufügen will.
  • Fügen Sie in der Uses-Klausel gleich hinter 'Dialogs' eine Referenz auf BGRABitmap und BGRABitmapTypes ein.
uses
  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
  BGRABitmap, BGRABitmapTypes;
  • procedure TForm1.FormPaint(Sender: TObject);
    var bmp: TBGRABitmap;
    begin
      bmp := TBGRABitmap.Create(ClientWidth, ClientHeight, BGRAWhite);
      bmp.FillRect(20, 20, 100, 40, BGRA(255,192,0), dmSet);  //fill an orange rectangle
      bmp.CanvasBGRA.lineto(150,190);                         //Linie mit antialiasing
      bmp.Draw(Canvas, 0, 0, True);                           //render BGRABitmap on the form
      bmp.Free;                                               //free memory
    end;

Alternative

  • entpacken
  • Lazarus öffnen und unter „Package“ =⇒ „Package-Datei (.lpk) öffnen“ auswählen
  • die eben entpackte bgrabitmappack.lpk suchen und auswählen
  • es erscheint ein Fenster, in dem ein Symbolknopf mit einem Blitz genutzt werden kann um „Zum Projekt hinzufügen“ auszuwählen
  • Dann im Quelltext
uses
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs,
  BGRABitmap, BGRABitmapTypes;
  • und
procedure TForm1.FormPaint(Sender: TObject);
var bmp: TBGRABitmap;
begin
  bmp := TBGRABitmap.Create(ClientWidth, ClientHeight, BGRAWhite);
  bmp.FillRect(20, 20, 100, 40, BGRA(255,192,0), dmSet);  //fill an orange rectangle
  bmp.CanvasBGRA.lineto(150,190);                         //Linie mit antialiasing
  bmp.Draw(Canvas, 0, 0, True);                           //render BGRABitmap on the form
  bmp.Free;                                               //free memory
end;
 
 
technik/computer/programme/lazarus_bgrabitmap.txt · Zuletzt geändert: 2017/08/19 12:00 von sun
Creative Commons License Valid XHTML 1.0 Valid CSS Driven by DokuWiki Impressum
Drupal Garland Theme for Dokuwiki