回覆列表
  • 1 # 使用者1430807591406

    在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顯示出來了。

  • 中秋節和大豐收的關聯?
  • 板塊構造意義?