Size: a a a
VA
N
N
N
N
N
PromptPointResult pPtRes;
PromptPointOptions pPtOpts = new PromptPointOptions("");
// Prompt for the start point
pPtOpts.Message = "\nEnter the start point of the line: ";
pPtRes = acDoc.Editor.GetPoint(pPtOpts);
Point3d ptStart = pPtRes.Value;
// Exit if the user presses ESC or cancels the command
if (pPtRes.Status == PromptStatus.Cancel) return;z
N
N
N
// Prompt for the end point
pPtOpts.Message = "\nEnter the end point of the line: ";
pPtOpts.UseBasePoint = true;
pPtOpts.BasePoint = ptStart;
pPtRes = acDoc.Editor.GetPoint(pPtOpts);
Point3d ptEnd = pPtRes.Value;
if (pPtRes.Status == PromptStatus.Cancel) return;
// Start a transactionN
z
N
N
N
if commandmanager.get2dpoint('Specify first point:',p1) then
if commandmanager.get2dpoint('Specify second point:',p2) then begin
CreateLine(p1,p2)
exit(cmd_ok);
end;
result:=cmd_cancel;z
N
VA
N
N