canvas.draw?
- fliegermichl
- Lazarusforum e. V.
- Beiträge: 1435
- Registriert: Do 9. Jun 2011, 09:42
- OS, Lazarus, FPC: Lazarus Fixes FPC Stable
- CPU-Target: 32/64Bit
- Wohnort: Echzell
canvas.draw?
in Lazarus kann ich mittels TCanvas.Draw eine Grafik zeichnen lassen. Wie geht das mit der msegui?
-
- Beiträge: 2013
- Registriert: Do 16. Okt 2008, 10:22
- OS, Lazarus, FPC: Linux,Windows,FreeBSD,(MSEide+MSEgui 4.6,git master FPC 3.0.4,fixes_3_0)
- CPU-Target: x86,x64,ARM
Re: canvas.draw?
Grafik = Bitmap?
Code: Alles auswählen
tbitmap = class(tsimplebitmap)
[...]
procedure paint(const acanvas: tcanvas; const dest: rectty;
const asource: rectty; aalignment: alignmentsty = [];
const acolorforeground: colorty = cl_default;
const acolorbackground: colorty = cl_default;
//used for monochrome bitmaps,
//cl_default-> acanvas.color, acanvas.colorbackground
const aopacity: colorty = cl_default
//cl_default-> self.opacity
);
overload;
procedure paint(const acanvas: tcanvas; const dest: pointty;
const acolorforeground: colorty = cl_default;
const acolorbackground: colorty = cl_default;
const aopacity: colorty = cl_default
); overload;
//useses self.size and self.alignment
procedure paint(const acanvas: tcanvas; const dest: pointty;
const aalignment: alignmentsty;
const acolorforeground: colorty = cl_default;
const acolorbackground: colorty = cl_default;
const aopacity: colorty = cl_default); overload;
//useses self.size
procedure paint(const acanvas: tcanvas; const dest: rectty;
const acolorforeground: colorty = cl_default;
const acolorbackground: colorty = cl_default;
const aopacity: colorty = cl_default); overload;
//useses self.size and self.alignment
procedure paint(const acanvas: tcanvas; const dest: rectty;
const aalignment: alignmentsty;
const acolorforeground: colorty = cl_default;
const acolorbackground: colorty = cl_default;
const aopacity: colorty = cl_default); overload;
//useses self.size
oder
tcanvas = class(tpersistent)
[...]
procedure copyarea(const asource: tcanvas; const asourcerect: rectty;
const adestpoint: pointty; const acopymode: rasteropty = rop_copy;
const atransparentcolor: colorty = cl_default;
//atransparentcolor used for convert color to monochrome
//cl_default -> colorbackground
const aopacity: colorty = cl_none); overload;
procedure copyarea(const asource: tcanvas; const asourcerect: rectty;
const adestrect: rectty; const alignment: alignmentsty = [];
const acopymode: rasteropty = rop_copy;
const atransparentcolor: colorty = cl_default;
//atransparentcolor used for convert color to monochrome
//cl_default -> colorbackground
const aopacity: colorty = cl_none); overload;