王 王心惟 Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-04 #1 在Word中，可使用改变字体宽度百分比来改变字体(TTF)宽度，但我在Dephi无论用TLogFont结构却无法完成此目的，请问，我该如何不改变字体高度（字体磅值），而改变字体宽度？
P Pipi. Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-04 #3 下面的程序使edit1的字体长的很（高度100，宽度5） var h:HFont; begin h:=CreateFont(100,5,0,0,0,0,0,0,0,0,0,0,0,'宋体'); if(h=0)then RaiseLastWin32Error(); Edit1.Font.Handle:=h; end;
下面的程序使edit1的字体长的很（高度100，宽度5） var h:HFont; begin h:=CreateFont(100,5,0,0,0,0,0,0,0,0,0,0,0,'宋体'); if(h=0)then RaiseLastWin32Error(); Edit1.Font.Handle:=h; end;
