|
||
解説: データベースアプリケーションでは、まずテーブルを作らなければなりません。通常 Database Desktop で設定しまうのが簡単なのですが、ここではコードだけで作成する場合を考えてみます。 アプリケーションの作成途中で、コーディングでテーブルを作りたい、一時的に必要になった、などの場面は結構あります。作り方を覚えておくと後々役に立ちます。 使用例: 今回は、"c:\\Sample" に test という Paradox テーブルを作ってみます。 コンポーネントは Table と Button を適当に配置するだけです。 Button1 の OnClick で必要な項目の設定をして、テーブルを作成しています。 //------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { // テーブルを作るフォルダをフルパスで指定 Table1->DatabaseName = "c:\\Sample"; // テーブル名 Table1->TableName = "test"; // Paradox テーブルを指定 Table1->TableType = ttParadox; // テーブル用の項目を指定 Table1->FieldDefs->Add("ソフトNo", ftInteger, 0, false); Table1->FieldDefs->Add("ソフト名", ftString, 20, false); Table1->FieldDefs->Add("価格", ftInteger, 0, false); // 以上の定義を使ってテーブルを作成 Table1->CreateTable(); } //------------------------------------------------------------------- |