有沒有人知道設定和使用Delphi 2010與
MySQL的簡單tuturial? 最佳答案 使用TAdoConnection和TAdoQuery:
implementation
uses adodb;
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
var
mAdoConnection: TAdoConnection;
mAdoQuery: TAdoQuery;
begin
mAdoConnection := TAdoConnection.Create(application);
mAdoConnection.ConnectionString := 'Mode=ReadWrite;Extended Properties="DRIVER=MySQL ODBC 3.51 Driver;DATABASE=mydatabase;SERVER=myserver;UID=myusername;PASSWORD=mypassword;PORT=;OPTION=3;STMT=;"';
mAdoConnection.LoginPrompt := False;
mAdoConnection.Open;
mAdoQuery:=TADOQuery.Create(application);
with mAdoQuery do begin
Connection:=mADOConnection;
CursorType := ctStatic;
ParamCheck := False;
SQL.Add('SELECT * FROM SYSSET');
end;
mAdoQuery.Open;
showmessage(mAdoQuery.fields[0].AsString);
mAdoQuery.free;
mAdoConnection.Free;
end;
注意:将“我的…..”更改為您的伺服器,資料庫,使用者名和密碼.這還假設您在計算機上安裝了MySql ODBC驅動程式.