本文整理自网络,侵删。
新建一个Delphi工程,在窗体上添加一个TStringGrid控件,在窗体上点击鼠标右键,在弹出的右键菜单中选择“View as Text”,找到StringGrid1的定义部分,添加各列的列宽值即可,注意:添加的列宽值个数要与StringGrid1的列数相同,否则会出错,窗体完整代码如下,其中红色字体部分是我们添加的内容:
object Form1: TForm1
Left = 247
Top = 151
Width = 979
Height = 563
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object StringGrid1: TStringGrid
Left = 16
Top = 16
Width = 617
Height = 345
TabOrder = 0
ColWidths = (
40
100
40
60
80)
end
end
在窗体上点击鼠标右键,在右键菜单中选择“View as Form”即可切换到窗体设计界面。
相关阅读 >>
Delphi 用浏览器来显示带图片的邮件内容,图片无需保存为本地文件
Delphi datasnap 上传/下载大文件(本demo以图传片文件为例)
更多相关阅读请进入《Delphi》频道 >>