Delphi で StringGrid にデータを追加する方法
StringGrid にデータを追加するには、Delphi で次の手順を実行します。
- Delphiのインターフェイス上でStringGridコントロールをフォームにドラッグアンドドロップします。
- String Grid コントロールをダブルクリックしてイベントエディターを開く
- StringGridのイベントエディタから「StringGrid1->OnDrawCell」イベントを選択する。
- イベントハンドラで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;
- プログラムを実行すると、StringGridにデータが入っていることがわかります。
上記のコードはStringGridにデータを追加する方法のデモンストレーションに過ぎず、実際の状況では、必要に応じてコードを変更する必要があります。たとえば、ループと条件ステートメントを使用して、データソースに基づいて動的にStringGridにデータを追加できます。