stringgrid 如何在指定行指定列向cell中填充数据

解决方案 »

  1.   

    StringGrid.Cells[ACol, ARow] := str ;
    这样行吗?
      

  2.   

    对了,还要加上一句
    StringGrid.Update ;
      

  3.   

    StringGrid.Cells[0,0]:= 你想填入得内容;可以使用两重循环填入
      

  4.   

    循环:
    设置两个整型变量i,j;
    StringGrid.Cells[i,j]:= 你想填入得内容;
      

  5.   

    StringGrid1->Cells[1,1] :='You';
      

  6.   

    StringGrid.Cells[StringGrid.col,StringGrid.row]:=XXXXX
      

  7.   

    如何对single的数据保留两位小数呀
      

  8.   

    這是我初次試用StringGrid的用的一個過程。如有問題可與我留言,共同探討Procedure TForm1.SetStringData;
    var i:integer;
        Stm : TMemoryStream;
    begin
       if not Query1.Active then Query1.Open;
      StringGrid1.RowCount:=Query1.RecordCount;
      StringGrid1.ColCount:=8;
      Query1.First;
       For i:=1 to Query1.RecordCount do
       begin
         StringGrid1.Cells[1,i]:=Query1.Fields[0].AsString;
         StringGrid1.Cells[2,i]:=Query1.Fields[1].AsString;
         StringGrid1.Cells[3,i]:='...';
         StringGrid1.Cells[4,i]:='.. ';
         StringGrid1.Cells[5,i]:=' ..';
         StringGrid1.Cells[6,i]:='  .';
         StringGrid1.Cells[7,i]:='...';
         Query1.Next;
       end;