1]连接好数据库,并显示;(设计时的连接,和运行时的连接,是两个独立的连接,要区分开)
procedure TForm1.FormCreate(Sender: TObject); begin FDQuery1.Connection := FDConnection1; FDConnection1.LoginPrompt:=false; //取消登录提示框 FDConnection1.Open('DriverID=SQLite;Database=test1.Sqlite3.db'); end;
1]连接好数据库,并显示;(设计时的连接,和运行时的连接,是两个独立的连接,要区分开)
procedure TForm1.FormCreate(Sender: TObject); begin FDQuery1.Connection := FDConnection1; FDConnection1.LoginPrompt:=false; //取消登录提示框 FDConnection1.Open('DriverID=SQLite;Database=test1.Sqlite3.db'); end;