Diverse Komponenten: SVGImage, Adv. Memo, PaletteForm

Thema durchsuchen

Ansicht

Themen-Optionen

Diverse Komponenten: SVGImage, Adv. Memo, PaletteForm

Ein Thema von xaromz · begonnen am 20. Sep 2005 · letzter Beitrag vom 29. Aug 2008

Vorheriger Beitrag

Nächster Beitrag

0KommaNix

Registriert seit: 20. Jul 2006
Ort: Halle/Saale
23 Beiträge

Delphi 11 Alexandria

#19

Re: Diverse Komponenten: SVGImage, Adv. Memo, PaletteForm

21. Jul 2006, 19:33

Hallo,

Zitat von xaromz:

Wie ich schon in einer vorigen Nachricht geschrieben habe, wäre da ein TCanvas besser, auf dem Du ein TSVG malst. Das sieht dann so bsp. so aus:

markieren

Delphi-Quellcode:

			procedure PaintSVGTo(SVG: TSVG; Canvas: TCanvas; Left, Top: Integer; Scale: Double);

var

  W, H: Integer;

begin

  W := Round(SVG.Width * Scale);

  H := Round(SVG.Height * Scale);

  SVG.PaintTo(Canvas.Handle,

    MakeRect(Left, Top, W, H));

end;

Vielen Dank, so werde ich es machen.

Gruß Bernd

Bernd