任意の点を通り,直線1に垂直な直線2の算出
Namespace: fvalgcliAssembly: fvalgcli (in fvalgcli.dll) Version: 3.1.0.0 (3.1.0.11)
Syntax
C# |
---|
public static int fnFIE_cg_calc_vertical_line_point_and_line(
DPNT_T pnt,
DLINE_T line,
ref DLINE_T line_ans
) |
Visual Basic |
---|
Public Shared Function fnFIE_cg_calc_vertical_line_point_and_line (
pnt As DPNT_T,
line As DLINE_T,
ByRef line_ans As DLINE_T
) As Integer |
Return Value
Type:
Int32
以下のエラーコードを返します。
エラーコード:f_err | 内容 |
---|
F_ERR_NONE | 正常終了 |
F_ERR_INVALID_PARAM | 不正なパラメータが渡された |
F_ERR_NO_LICENCE | ライセンスエラー、または未初期化エラー |
Remarks
Examples
C# | Copy |
---|
using System;
using System.Collections.Generic;
using System.Text;
using fvalgcli;
namespace TC
{
public partial class FIE
{
[FvPluginExecute]
public void fnFIE_cg_calc_vertical_line_point_and_line()
{
int status = (int)f_err.F_ERR_NONE;
DPNT_T pt = new DPNT_T();
DLINE_T line = new DLINE_T();
DLINE_T line_ans = new DLINE_T();
DLINE_T ans_line_ans = DLINE_T.init(1, 1, -310);
pt.x = 10;
pt.y = 300;
line.a = 1;
line.b = -1;
line.c = -50;
status = api.fnFIE_cg_calc_vertical_line_point_and_line(pt, line, ref line_ans);
Assert.IsTrue(status == (int)f_err.F_ERR_NONE, "エラーが発生しました。({0})", (f_err)status);
ConsoleOut.WriteFunctionName(":\n");
Console.WriteLine("line_ans.a = {0}", line_ans.a);
Console.WriteLine("line_ans.b = {0}", line_ans.b);
Console.WriteLine("line_ans.c = {0}", line_ans.c);
Console.Write(" ...");
ConsoleOut.IsTrue(line_ans.a == ans_line_ans.a);
}
}
} |
Visual Basic | Copy |
---|
Imports System.Collections.Generic
Imports System.Text
Imports fvalgcli
Public Partial Class FIE
<FvPluginExecute> _
Public Sub fnFIE_cg_calc_vertical_line_point_and_line()
Dim status As Integer = CInt(f_err.F_ERR_NONE)
Dim pt As New DPNT_T()
Dim line As New DLINE_T()
Dim line_ans As New DLINE_T()
Dim ans_line_ans As DLINE_T = DLINE_T.init(1, 1, -310)
pt.x = 10
pt.y = 300
line.a = 1
line.b = -1
line.c = -50
status = api.fnFIE_cg_calc_vertical_line_point_and_line(pt, line, line_ans)
Assert.IsTrue(status = CInt(f_err.F_ERR_NONE), "エラーが発生しました。({0})", CType(status, f_err))
ConsoleOut.WriteFunctionName(":" & vbLf)
Console.WriteLine("line_ans.a = {0}", line_ans.a)
Console.WriteLine("line_ans.b = {0}", line_ans.b)
Console.WriteLine("line_ans.c = {0}", line_ans.c)
Console.Write(" ...")
ConsoleOut.IsTrue(line_ans.a = ans_line_ans.a)
End Sub
End Class |
See Also