1、截取字符串
procedure TForm1.Button1Click(Sender: TObject);
var
tempString: String;
begin
tempString := 'String\a';
showMessage(copy(trim(tempString),1,pos('\',tempString)-1));//String
showMessage(copy(trim(tempString),pos('\',tempString)+1)); //a
end;
2、删除列
AdvStringGrid4.ClearRows(AdvStringGrid4.row-1,1);
AdvStringGrid4.removerows(AdvStringGrid4.row-1,1);
3、
将options->goRowSelect设置为true,只能以行为单位选择。
4、 self.AdvStringGrid4.Font.Size:=25; 字体大小
5、AdvStringGrid4.GridLineColor 边线颜色
6、AdvStringGrid4.GridLineWidth 边线的宽度
7、修改图标
Project->Options->Application->LoadIcon.. load
8、一个窗口,如何运行就最大化?
WindowState中设置
9、Delphi 中的颜色常量及效果图
http://www.cnblogs.com/cccc813/archive/2009/03/22/1418909.html
10、AdvstringGrid1.AutoNumberCol(1); //在第1列设置为序号列 不对Fixed行中的列编号
11、按列排序
AadvStringGrid.SortSettings.Show:= True;
procedure TForm1.Button1Click(Sender: TObject);
var
tempString: String;
begin
tempString := 'String\a';
showMessage(copy(trim(tempString),1,pos('\',tempString)-1));//String
showMessage(copy(trim(tempString),pos('\',tempString)+1)); //a
end;
2、删除列
AdvStringGrid4.ClearRows(AdvStringGrid4.row-1,1);
AdvStringGrid4.removerows(AdvStringGrid4.row-1,1);
3、
将options->goRowSelect设置为true,只能以行为单位选择。
4、 self.AdvStringGrid4.Font.Size:=25; 字体大小
5、AdvStringGrid4.GridLineColor 边线颜色
6、AdvStringGrid4.GridLineWidth 边线的宽度
7、修改图标
Project->Options->Application->LoadIcon.. load
8、一个窗口,如何运行就最大化?
WindowState中设置
9、Delphi 中的颜色常量及效果图
http://www.cnblogs.com/cccc813/archive/2009/03/22/1418909.html
10、AdvstringGrid1.AutoNumberCol(1); //在第1列设置为序号列 不对Fixed行中的列编号
11、按列排序
AadvStringGrid.SortSettings.Show:= True;