[Lazarus] Do we really need a PaintSwastika procedure?

[Marc Santhoff]

On Mi, 2016-01-06 at 13:07 -0500, Dmitry Boyarintsev wrote:

> ExtGraphics doesn't really have any other religions/cultural symbols there.

Hooray! Let's sing!

"Ding-Dong! The Witch Is Dead"



How about that:

procedure TForm1.PaintBox1Paint(Sender: TObject);
var
  r: TRect;
begin
  r.Top := 0;
  r.Left := 0;
  r.Bottom := 200;
  r.Right := 200;
  PaintFivePointLineStar(PaintBox1.Canvas, r);
end;

Got some silver knifes and black candles at hand?


-- 
Is sex dirty?  Only if it's done right.
                -- Woody Allen, "All You Ever Wanted To Know About Sex"
-------------- next part --------------
A non-text attachment was scrubbed...
Name: FivePointLineStar.png
Type: image/png
Size: 5206 bytes
Desc: not available
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20160106/4ada9653/attachment-0003.png>