Delphi で StringGrid にデータを追加する方法

StringGrid にデータを追加するには、Delphi で次の手順を実行します。

  1. Delphiのインターフェイス上でStringGridコントロールをフォームにドラッグアンドドロップします。
  2. String Grid コントロールをダブルクリックしてイベントエディターを開く
  3. StringGridのイベントエディタから「StringGrid1->OnDrawCell」イベントを選択する。
  4. イベントハンドラでStringGridにデータを追加するには、以下のコードを使用します。
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  // 设置表格单元的边框样式
  StringGrid1.Canvas.Brush.Color := clWhite;
  StringGrid1.Canvas.FillRect(Rect);

  // 设置字体和文本颜色
  StringGrid1.Canvas.Font.Color := clBlack;

  // 添加数据到StringGrid中
  StringGrid1.Cells[ACol, ARow] := '数据';
end;
  1. プログラムを実行すると、StringGridにデータが入っていることがわかります。

上記のコードはStringGridにデータを追加する方法のデモンストレーションに過ぎず、実際の状況では、必要に応じてコードを変更する必要があります。たとえば、ループと条件ステートメントを使用して、データソースに基づいて動的にStringGridにデータを追加できます。

bannerAds