// StringGrid 位於工具列 Additional 項目/TStringGrid 中，

// 拉出 StringGrid1 佈滿 (Align) 在某容器 (可能是某個 PageControl/Tab 中)中

// 以下範例以 無向圖 (undirected graph) 的相鄰成本矩陣說明

for (i=0; i<n; i++)

{   for (j=i+1; j<n; j++)

    {   W[i][j] = rand()%range + 1;

        if (W[i][j] > max_range) W[i][j] = LargeInt;

        W[j][i] = W[i][j];

    }

    W[i][i] = LargeInt;

}    // 亂數產生二維對稱的相鄰成本矩陣

StringGrid1->RowCount = n;

StringGrid1->ColCount = n;

for (i=0; i<n; i++)

{   for (j=0; j<n; j++)

    {   StringGrid1->Cells[j][i] = IntToStr(W[i][j]);

        // VS C++ 語法則用： StringGrid1->Rows[i]->Cells[j]->Value = W[i][j];

    }

}   // 以 StringGrid 顯示相鄰成本矩陣

下面是一份有關 StringGrid 用法的文件：

http://www.functionx.com/bcb/controls/TStringGrid.pdf