掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
手動でStringGridにデータベースを取り込むには (ID:34481)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
セルの数は、変数の初期化で解決しました。 変数の初期化し忘れが原因でした^^; またコードをSQLに書き換えてみました。 procedure TForm1.Button1Click(Sender: TObject); var i:integer; begin i := 1; StringGrid1.ColCount := Query1.FieldCount +1; StringGrid1.RowCount := i +1; Query1.SQL.Text := 'SELECT * FROM animals;'; Query1.Open; for i := 0 to Query1.RecordCount - 1 do begin StringGrid1.Cells[1,i+1] := Query1.FieldByName('NAME').AsString; StringGrid1.Cells[2,i+1] := Query1.FieldByName('SIZE').AsString; StringGrid1.Cells[3,i+1] := Query1.FieldByName('WEIGHT').AsString; StringGrid1.Cells[4,i+1] := Query1.FieldByName('AREA').AsString; StringGrid1.Cells[5,i+1] := Query1.FieldByName('BMP').AsString; StringGrid1.RowCount := StringGrid1.RowCount + 1; Query1.Next; end; StringGrid1.RowCount := StringGrid1.RowCount - 1; end; 特定の列のセルの長さ(例えばAREAフィールドの列の長さ)を変更する方法はありますでしょうか? もしありましたら、 どなたかご指南いただけると助かりますm(__)m。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.