曲線の描写

解決

Nian-Ci 2012-05-25 16:25:32 No: 42333 IP: 192.*.*.*

Image.Canvasに、曲線を書き込むにはどうすればいいですか??

編集削除

igy 2012-05-25 19:01:56 No: 42334 IP: 192.*.*.*

Canvas の PolyBezier メソッドはいかがですか？

編集削除

Nian-Ci 2012-05-26 11:27:07 No: 42335 IP: 192.*.*.*

>Canvas の PolyBezier メソッドはいかがですか？

とりあえず見つけました!!
…どうやって使いますか??(T0T)

編集削除

TS 2012-05-26 13:41:11 No: 42336 IP: 192.*.*.*

>とりあえず見つけました!!
何を見つけたんですか。

> …どうやって使いますか??(T0T)
どうして検索を自分でしてみないのですか。

http://www.geocities.jp/asumaroyuumaro/program/winapi/figuredraw.html

編集削除

Nian-Ci 2012-05-26 17:05:49 No: 42337 IP: 192.*.*.*

>何を見つけたんですか。
CanvasのPolyBezierメソッドです。

>どうして検索を自分でしてみないのですか。
説明が難しすぎるからです。
分かりやすく教えてくれますか?

TSさん、せっかく教えてくれたページ、開けませんでした。

編集削除

igy 2012-05-26 22:04:11 No: 42338 IP: 192.*.*.*

>TSさん、せっかく教えてくれたページ、開けませんでした。

私のところでは、IE, Firefox 両方とも、開けましたが・・・

編集削除

Nian-Ci 2012-05-26 22:26:36 No: 42339 IP: 192.*.*.*

すみません。
私が今居る所、日本じゃないので、制限されちゃうみたいです。

編集削除

TS 2012-05-27 00:15:26 No: 42340 IP: 192.*.*.*

ベジエ曲線を描くみたいです。
下記の説明が正しいかどうか知りません。私の解釈です。

procedure TForm1.Button1Click(Sender: TObject);
var
  Pt :array [0..6] of TPoint;
begin
  Pt[0] :=Point(10,90);    //始点
  Pt[1] :=Point(10,10);    //制御点１
  Pt[2] :=Point(200,10);   //制御点２
  Pt[3] :=Point(200,90);   //終点or 始点
  Pt[4] :=Point(200,170);  //制御点３
  Pt[5] :=Point(10,200{170});   //制御点４
  Pt[6] :=Point(10,90);    //終点

  Canvas.Pen.Style :=psSolid;
  PolyBezier(Form1.Canvas.Handle, // デバイスコンテキストへのハンドル
             Pt,// 端点と制御点
             7);// 上記の個数
end;

編集削除

Nian-Ci 2012-05-28 11:20:18 No: 42341 IP: 192.*.*.*

TSさんのを参考に、ここからは自分でやってみます!!

みなさん、ありがとうございました。

編集削除