Delphi是一種早期應(yīng)用程序開發(fā)語言,支持包括ODBC(開放式數(shù)據(jù)庫互連)在內(nèi)的多種數(shù)據(jù)庫接口。 MySQL是一種常用的開源關(guān)系型數(shù)據(jù)庫系統(tǒng)。在Delphi中使用ODBC連接MySQL數(shù)據(jù)庫,可以使用以下步驟:
1. 配置ODBC數(shù)據(jù)源:打開Windows控制面板,選擇ODBC數(shù)據(jù)源,創(chuàng)建一個新的數(shù)據(jù)源,選擇MySQL ODBC驅(qū)動程序。 2. 在Delphi中選擇適當(dāng)?shù)慕M件:例如TADOConnection,TODBCConnection或TDBXConnection 3. 在代碼中設(shè)置數(shù)據(jù)庫連接的屬性:在代碼中使用ADOConnection1.ConnectionString或ODBCConnect1.ConnectionString或DBXConnection1.Params(取決于組件的選擇)設(shè)置數(shù)據(jù)庫連接屬性。 4. 打開數(shù)據(jù)庫連接:使用ADOConnection1.Connected或ODBCConnect1.Connected或DBXConnection1.Connected屬性打開連接。 5. 執(zhí)行SQL語句:使用ADOQuery或ODBCQuery或TSQLDataSet等組件執(zhí)行SQL語句。
以下是示例代碼連接MySQL數(shù)據(jù)庫:
uses DB, ADODB; // 使用ADO庫 procedure TForm1.Button1Click(Sender: TObject); var Con: TADOConnection; Query: TADOQuery; begin Con := TADOConnection.Create(nil); Con.ConnectionString := 'DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost; DATABASE=test; UID=root; PASSWORD=123456; OPTION=16834;'; Con.LoginPrompt := False; Con.Connected := True; Query := TADOQuery.Create(nil); try Query.Connection := Con; Query.SQL.Text := 'INSERT INTO person(name, age) VALUES(''Jack'', 20)'; Query.ExecSQL; finally Query.Free; end; Con.Free; end;
在以上代碼中,我們首先創(chuàng)建一個TADOConnection對象,然后設(shè)置其ConnectionString屬性以指定連接字符串,包括MySQL服務(wù)器名稱、數(shù)據(jù)庫名稱、用戶名和密碼等。接著,通過設(shè)置Connected屬性打開連接。最后,我們使用一個TADOQuery對象執(zhí)行SQL語句,該語句將一行數(shù)據(jù)插入名為person的表中。
上一篇demad模式mysql
下一篇dengru mysql