矢印を表示したいのですが...


マイクロ  2007-12-18 04:07:18  No: 28975  IP: 192.*.*.*

MoveTo,LineToがわかっているのでそれを使って→や←のように矢印を書くプロパティとかメソッドとかないでしょうか?

よろしくお願いします.

編集 削除
KHE00221  URL  2007-12-18 08:22:18  No: 28976  IP: 192.*.*.*

線を描くためのメソッドが MoveTo や LineTo であり

MoveTo や LineTo を使って矢印を書くプロパティやメソッドって?

意味不明

編集 削除
ofZ  2007-12-18 08:40:35  No: 28977  IP: 192.*.*.*

例えば、Canvasのメソッドなんかに、Arrowがあって、
その記述が以下のようなもので、矢印を書くのがねぇっすか?
procedure TCanvas.Arrow(X1, Y1, X2, Y2, Size: Integer);
var
  XA, YA: Integer;
begin
  MoveTo(X1, Y1);
  LineTo(X2, Y2);
  //てきとうな計算
  //羽根1
  LineTo(XA, YA);
  //てきとうな計算
  //羽根2
  MoveTo(X2, Y2);
  LineTo(XA, YA);
end;

ということでしょ?

少なくとも、TCanvasには、そんなのねぇ。
・・・から、関数の一個ぐらい作れ。

もしくは、手抜きして TextOut, TextRect で「→」書けばえぇ。

編集 削除
AY  2007-12-18 13:04:14  No: 28978  IP: 192.*.*.*

http://software.nikkeibp.co.jp/software/download/down99c.html#199905

1999/5 Delphiかんたんソフト工房  第5回   ビットマップに矢印や文字を描こう
がとても参考になります。

編集 削除