Hi~ 可私信我了解后再进行下载~
*/********************************************************************************
* @文档名称: 基于点云的平面交线计算。
* @作者: hugo
* @版本: 1.1
* @日期: 2021-6-30
* @描述: 该方法支持点云的平面的交线计算。
********************************************************************************/*
dev_update_window ('on')
dev_get_window (WindowHandle)
read_image (imageReal, './replay_38893_2021-6-7.tif')
xResolution:=0.06
yResolution:=0.06
zResolution:=0.001
ScaleFactor:=[xResolution,yResolution,zResolution]
*采样区域1
create_drawing_object_rectangle2 (300, 120, rad(90), 30, 20, DrawID)
set_drawing_object_params (DrawID, 'color', 'forest green')
set_drawing_object_params (DrawID, 'line_width', 1)
attach_drawing_object_to_window (WindowHandle, DrawID)
*采样区域2
create_drawing_object_rectangle2 (300, 180, rad(90), 30, 20, DrawID1)
set_drawing_object_params (DrawID1, 'color', 'orange')
set_drawing_object_params (DrawID1, 'line_width', 1)
attach_drawing_object_to_window (WindowHandle, DrawID1)
set_display_font (WindowHandle, 16, 'mono', 'true', 'false')
Text := '1. 绿色框为平面A'
Text[1] :='2. 橙色框为平面B'
dev_disp_text (Text, 'window', 10, 10, ['forest green','orange'], 'box_color', 'sky blue')
set_display_font (WindowHandle, 12, 'mono', 'true', 'false')
stop ()