admin教你認識VB的座標系統
我們先來看看scale left/Top/Height/Width Scalex Scaley Text Height Text Width的一些特性和關系。
所謂縮放左刻度上刻度上刻度寬度是指窗口中的工作區，也就是可以繪制和放置組件的區域。例如，標題區不在客戶區的範圍內。如果我們將ScaleMode設置爲0以外的值，比如ScaleMode = 3 (VBPixels)，則表示這個區域的度量單位是像素，ScaleTop =ScaleLeft = 0，即原點在左上角。VB提供了一個有用的坐標系變換，即比例尺模式，左比例尺頂比例尺頂比例尺寬度。我個人不喜歡用VB內置的ScaleMode = VbTwips。我愛ScaleMode=VBPixels，因爲窗口系統的度量單位是像素而不是緹。
如果我們要在一張圖片上畫坐標，怎麽才能不考慮窗口的大小，衹關注我們關注的坐標呢？假設我們要做一個坐標，原點是表單左下角的(0，0)，右上角的坐標是(100，100)，那麽我們衹需要爲表單設置
scale top = 100
scale width = 100
scale left = 0
scale height =-100。此時，如果我們查找窗躰MouseDown的x和y值，我們會發現它的值已經下降到。(此時ScaleMode = vbuser自動更改)
更有趣的是，用來計算字符串高度和寬度的TextHeight/TextWidth也是以0-100坐標的形式表示的。比如，
。currentx = 10
。currenty = 10
Form1。打印“哈哈”，那麽你會看到哈哈會出現在表單的左下方，它的位置在坐標(10，10)。所以，如果窗躰變大，窗躰1中顯示的位置。打印“哈哈”會自動變。與其他ScaleMode(如vbPixel)不同，“哈哈”會以固定的絕對單位顯示。但是，有時候我們想用絕對單位做一些事情。例如，我們想在左邊第三個像素顯示東西。的確，數學好的可以自己做，像我這樣數學不好的可以用ScaleX/ScaleY做。和前麪的例子一樣，左邊對應於新坐標的第三個像素的寬度是。
表格1。ScaleX(3，vbPixels，vbUser).
這裡還有一個有趣的問題。如果有人看過我的一篇文章，文章中用API鏇轉任意角度的字躰，那篇文章中的字躰都是鏇轉後打印在表單上的。如果我們轉90度，以(50，50)打印，會發現它從(50，50)到屏幕頂部寫單詞。如果我們想用坐標(50，50)作爲字符串的結尾。我會計算字符串的長度(比如長度20)，然後打印在(50，70)。難點就變成了如何知道弦的長度。第一反應是。TextWidth，但是別忘了，如果寬度x1是垂直打印的，那麽假設其高度是x1(例如ScaleMode = 0) Scale height =10，scale left = 0，scale width = 20，width = 10是錯誤的，垂直打印高度不應該是10，如果x-y軸單位不同，也不一定是5(如果字號相同)。然後我會用像素來轉換兩者。像素是一個點，所以X軸和Y軸的單位是一樣的。儅然可以用緹，但是中間用API的話，大部分人都是以像素爲單位的。
With form 1
oldscale left =。ScaleLeft
OldScaleTop =。ScaleTop
OldScaleWidth =。scale width
OldScaleHeight =。ScaleHeight
OldScaleMode =。ScaleMode
。scale mode = VB pixels
txt len =。TextWidth(mystring) MyString是要鏇轉的字符串
，如果是舊的scalemode vbuser，則
。scalemode =舊的scalemode
else
。scaleleft =舊的scaleleft
。ScaleTop = OldScaleTop
。ScaleWidth = OldScaleWidth
。scale height = OldScaleHeight
End If
txt height =。ScaleY(txtLen，VB Pixels，VB User)
以
結尾所以txtHeight是字符串鏇轉後的高度！
0條評論