AdvStringGrid使用方法(2)
程序员文章站
2022-05-15 16:17:56
...
procedureTForm1.FormCreate(Sender:TObject); begin AdvStringGrid1.FixedRows:=2; AdvStringGrid1.SaveFixedCells:= false ; AdvStringGrid1.MergeCells(1,0,2,1); AdvStringGrid1.MergeCells(3,0,2,1); AdvStringGrid1.Cells[1,0]:= 'palign="center"bIde
- procedure TForm1.FormCreate(Sender: TObject);
- begin
- AdvStringGrid1.FixedRows:=2;
- AdvStringGrid1.SaveFixedCells := false;
- AdvStringGrid1.MergeCells(1,0,2,1);
- AdvStringGrid1.MergeCells(3,0,2,1);
-
AdvStringGrid1.Cells[1,0] := '
Identification
'; - AdvStringGrid1.Cells[1,1] := 'Brand';
- AdvStringGrid1.Cells[2,1] := 'Type';
- AdvStringGrid1.Cells[3,1] := 'CC';
- AdvStringGrid1.Cells[4,1] := 'Pk';
-
AdvStringGrid1.Cells[3,0] := '
Power
'; - AdvStringGrid1.BtnEdit.ButtonWidth := 24;
- end;