掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
プログラムからテーブル定義情報を取得するには？ (ID:42009)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
BDE でも dbGo でも IBX でも DBX4 でも似たような感じでフィールド定義は取得できます。 以下は Paradox 形式ファイルのフィールド定義取得コードです。 uses ... , DB, DBTables; procedure TForm1.Button1Click(Sender: TObject); var Table: TTable; i: Integer; dFieldName: string; dFieldType: TFieldType; dFieldSize: Integer; begin Memo1.Lines.Clear; Table := TTable.Create(nil); try Table.TableName := 'animals.dbf'; Table.Open; for i:=0 to Table.FieldCount-1 do begin // フィールド名 dFieldName := Table.Fields[i].FieldName; // フィールドの型 dFieldType := Table.Fields[i].DataType; // フィールドのサイズ dFieldSize := Table.Fields[i].Size; // TMemo に表示 Memo1.Lines.Add(Format('%s, %d, %d', [dFieldName, dFieldType, dFieldSize])); end; Table.Close; finally Table.Free; end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.