在delphi中有一批資料庫專用的控制元件,比如ADO類的,可以直接用於資料庫開發,你可以先用一個Access資料庫自己進行一下測試。
首先在窗體上放一個ADOConnection1控制,用於與Access資料庫進行連線,連線字串為:
ADOConnection1.ADOC_Data.ConnectionString:="provider=Microsoft.Jet.OLEDB.4.0;"
+"user ID=Admin;"
//+"Data Source="+ExtractFilePath(Application.ExeName)+"MyRecord.mdb;"
+"Data Source="+MyDataBaseName+";"
+"Mode=Share Deny None;Extended Properties="";"
+"Jet OLEDB:System database="";"
+"Jet OLEDB:Registry Path="";"
+"Jet OLEDB:Database Password="123456;" //資料庫密碼
+"Jet OLEDB:Engine Type=5;"
+"Jet OLEDB:Database Locking Mode=1;"
+"Jet OLEDB:Global Partial Bulk Ops=2;"
+"Jet OLEDB:Global Bulk Transactions=1;"
+"Jet OLEDB:New Database Password="";"
+"Jet OLEDB:Create System Database=False;"
+"Jet OLEDB:Encrypt Database=False;"
+"Jet OLEDB:Don"+""""+"t Copy Locale on Compact=False;"
+"Jet OLEDB:Compact Without Replica Repair=False;"
+"Jet OLEDB:SFP=False";
DM.ADOC_Data.LoginPrompt:=False;
再放一個ADOQuery1控制,用於操作資料表,將它的Connection屬性設定為ADOConnection1。或用語句實現:ADOQuery1.Connection:=ADOConnection1;
然後再分別放置一個DataSource1和一個DBGrid1控制元件,
將DataSource1的DataSet屬性設定為ADOQuery1。
將DBGrid1的DataSource屬性設定為DataSource1。
這時就可以透過ADOQuery1來執行SQL語句來查詢資料表,並透過DBGrid1顯示出來了。
在delphi中有一批資料庫專用的控制元件,比如ADO類的,可以直接用於資料庫開發,你可以先用一個Access資料庫自己進行一下測試。
首先在窗體上放一個ADOConnection1控制,用於與Access資料庫進行連線,連線字串為:
ADOConnection1.ADOC_Data.ConnectionString:="provider=Microsoft.Jet.OLEDB.4.0;"
+"user ID=Admin;"
//+"Data Source="+ExtractFilePath(Application.ExeName)+"MyRecord.mdb;"
+"Data Source="+MyDataBaseName+";"
+"Mode=Share Deny None;Extended Properties="";"
+"Jet OLEDB:System database="";"
+"Jet OLEDB:Registry Path="";"
+"Jet OLEDB:Database Password="123456;" //資料庫密碼
+"Jet OLEDB:Engine Type=5;"
+"Jet OLEDB:Database Locking Mode=1;"
+"Jet OLEDB:Global Partial Bulk Ops=2;"
+"Jet OLEDB:Global Bulk Transactions=1;"
+"Jet OLEDB:New Database Password="";"
+"Jet OLEDB:Create System Database=False;"
+"Jet OLEDB:Encrypt Database=False;"
+"Jet OLEDB:Don"+""""+"t Copy Locale on Compact=False;"
+"Jet OLEDB:Compact Without Replica Repair=False;"
+"Jet OLEDB:SFP=False";
DM.ADOC_Data.LoginPrompt:=False;
再放一個ADOQuery1控制,用於操作資料表,將它的Connection屬性設定為ADOConnection1。或用語句實現:ADOQuery1.Connection:=ADOConnection1;
然後再分別放置一個DataSource1和一個DBGrid1控制元件,
將DataSource1的DataSet屬性設定為ADOQuery1。
將DBGrid1的DataSource屬性設定為DataSource1。
這時就可以透過ADOQuery1來執行SQL語句來查詢資料表,並透過DBGrid1顯示出來了。