Member 12677926 Ответов: 0

VB в МФЦ чертеж использовать масштабирование

Всем Привет,

я ударил с помощью рисования из vb в mfc в модуле . код объясняется ниже:

в vb была графическая коробка и есть функции для масштабирования и рисования как дюймы как показано ниже:


picPreview.ScaleMode = vbInches
   picPreview.ScaleHeight = picPreview.ScaleHeight * ldScale
   picPreview.ScaleWidth = picPreview.ScaleWidth * ldScale

   ldScale = 1440 / ldScale


   'Clear the Slate
   picPreview.Cls
   picPreview.DrawStyle = vbSolid
   picPreview.ForeColor = cWood

   'Draw the inital piece of wood
   CX = picPreview.ScaleWidth / 2
   CY = picPreview.ScaleHeight / 2

   ldBotY = CY + mdThick
   ldOpLine = CY + mdOpDepth



picPreview.Line (0, CY)-(picPreview.ScaleWidth, ldBotY), , BF



высота и ширина шкалы - это очень маленькие значения, основанные на толщине, которая есть в коде drwaing a rectangle as shonw.

в mfc я смог нарисовать прямоугольник, но его толщина не меняется, потому что в mfc она равна 0,75 . но в vb его chaging ..пожалуйста, помогите мне

Что я уже пробовал:

Crect тогда прямоугольник;
прямоугольник.левый = РТ.слева;
прямоугольник.дно = РТ.дно;
прямоугольник.топ = (РТ.топ + РТ.дно) / 2;
прямоугольник.правильно = РТ.право;


dc. прямоугольник (rect);

dc. FillSolidRect(rect, RGB(0, 139, 139));

если я добавлю 0,5 в дно, это не повлияет ... пожалуйста, помогите мне, что такое координаты ?

0 Ответов