CSVデータをPARADOXデータに変換するには？ (ID:22913)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 サンプルソースです。 Queryには、適当なデータベース名を設定して下さい。 (プロパティ：DatabaseNameに作成済みSTANDARDのエリアスを設定して下さい） unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, Db, DBTables, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Query: TQuery; procedure Button1Click(Sender: TObject); private { Private 宣言 } public { Public 宣言 } end; var Form1: TForm1; implementation {$R *.DFM} procedure TForm1.Button1Click(Sender: TObject); begin Query.SQL.Add('CREATE TABLE "サンプルテーブル.db"('); Query.SQL.Add('ITEM1 VARCHAR(100),'); Query.SQL.Add('ITEM2 INTEGER, PRIMARY KEY(ITEM1))'); Query.ExecSQL; end; end.