在HDevelop中
ma.jpg
dev_update_off() read_image(Image,'D:/bb/tu/ma.jpg') get_image_size (Image, Width, Height) area_center (Image, Area, Row, Column) gen_circle (Circle, Row, Column, 50) paint_region (Circle, Image, ImageResult,[255,255,255], 'fill') *函數作用:繪制region到image內 *參數1:繪入圖像內的區域 *參數2:包含繪入區域的圖像 *參數3:結果圖像 *參數4:期望的區域灰度值--填充區域的顏色值 *參數5:所繪區域類型,如填充或邊界 'fill', 'margin' dev_open_window(0,100,Width, Height,'black',WindowHandle) dev_display(ImageResult)
在QtCreator中
HObject ho_Image, ho_Circle, ho_ImageResult;
HTuple hv_Width, hv_Height, hv_Area, hv_Row;
HTuple hv_Column, hv_WindowHandle;
ReadImage(&ho_Image, "D:/bb/tu/ma.jpg"); GetImageSize(ho_Image, &hv_Width, &hv_Height); AreaCenter(ho_Image, &hv_Area, &hv_Row, &hv_Column); GenCircle(&ho_Circle, hv_Row, hv_Column, 50); PaintRegion(ho_Circle, ho_Image, &ho_ImageResult, ((HTuple(255).Append(255)).Append(255)), "fill"); //函數作用:繪制region到image內 //參數1:繪入圖像內的區域 //參數2:包含繪入區域的圖像 //參數3:結果圖像 //參數4:期望的區域灰度值--填充區域的顏色值 //參數5:所繪區域類型,如填充或邊界 'fill', 'margin' SetWindowAttr("background_color","black"); OpenWindow(0,100,hv_Width,hv_Height,0,"visible","",&hv_WindowHandle); HDevWindowStack::Push(hv_WindowHandle); if (HDevWindowStack::IsOpen()) DispObj(ho_ImageResult, HDevWindowStack::GetActive());