最近DELPHI好像不太景氣哦,把自己的代碼拿出來曬曬。高手別噴哦。
直接上代碼
implementation
uses AdoConEd;
var saveconnstr:string;
procedure TFsetup.BTAUTOClick(Sender: TObject);
var
tmpF:TConnEditForm; //配置向導
begin
try
tmpf:=TConnEditForm.Create(application);
tmpf.ConnectionString.Text:=saveconnstr;//原參數傳入
tmpf.ShowModal;
if length(tmpf.ConnectionString.Text))>0 then
saveconnstr:=trim(ConnectionString.Text); //新參數傳回
finally
tmpf.Free;
end;
end;
使用ODBC函數需安裝MYSQL ODBC,去mysql.com下載一個。
安裝好了,以後:
建立ODBC連接
進入:控制面板-->ODBC數據源
這時候,我們已經可以看到在用戶DSN中已經存在一項:myodbc3-test
添加一個“系統DSN”
選擇對話框中“系統DSN”欄,按下右邊的“添加”按鈕。這時候會讓你選擇一個數據源。選擇 -->MySQL ODBC 3.51 Driver。按“結束”。
這時候,會彈出一個配置對話框:
Data Source Name 數據源名字:在程序中使用的DSN的標識符,可以隨便命名。
Host/Server Name (or IP)主機/服務器 名字 (或者IP 地址),如果是本機就填入localhost
Database Name 數據庫名:你要在程序中使用的庫名。
User 用戶:登錄htm" target="_blank">MySQL 使用的用戶名,特別注意,root用戶由於安全問題只能在本機登錄,當然啦,用戶可以通過修改user表來去掉這個功能。
Password 密鑰:登錄的密碼
Port 端口:使用默認值,最好不要改,除非你有把握。
全部設置好了以後,按下“測試數據源”會看到屏幕顯示連接成功。
配置就全部搞定了!
先做二個FORM fomr1是登陸窗口 form2是含MDI,開始顯示為FORM1,FORM2則為隱藏,如果登陸再show form2,並close form1 ,就好了!