在VB5中將英文字母及阿拉伯數字旋轉任意角度

2019-11-18 17:50:43

字體：大中小

來源：轉載

供稿：網友

在VisualBasic5.0中要使文本轉動任意角度，需涉及一系列的Windows
編程的API結構和函數。首先需要了解邏輯字體的結構，如下所示：
　　typedefstructtagLOGFONT{
　　LONGlfHeight;
　　LONGlfWidth;
　　LONGlfEscapement;
　　LONGlfOrientation;
　　LONGlfWeight;
　　BYTElfItalic;
　　BYTElfUnderline;
　　BYTElfStrikeOut;
　　BYTElfCharSet;
　　BYTElfOutPRecision;
　　BYTElfClipPrecision;
　　BYTElfPitchAndFamily;
　　TCHARlfFaceName[LF－FACESIZE];
　　}LOGFONT;
　　在這一結構中，lfEscapement的值就是字體旋轉的角度。注意，其單位是十分之一度，因此取值范圍為0至3600。在使用中先定義好邏輯字體，再用CreateFontIndirect函數建立邏輯字體，如果建立成功將返回這一邏輯字體的句柄，否則返回定值。在邏輯字體創建成功后，可以用TextOut函數針對某一設備（一般可以是一個圖片框）輸出文字信息。TextOut函數定義如下：
BOOLTextOut(HDChdc,intnXStart,intnYStart,LPCTSTRlpString,intcbString)，其中hdc為設備句柄，nXStart、nYStart為文本輸出的開始點坐標，lpString為待輸出文本的地址，cbString為文本串長度。由于要使用到設備句柄，因此，建議將文本輸出到圖片框中，因為在VB中可以直接取到圖片框的設備句柄屬性供調用，而Label框則沒有這一屬性，需要用另外的WindowsAPI函數來取得，實現起來較為麻煩。->

上一篇：人民幣小寫轉大寫

下一篇：統計字數