1]放FDConnection1和FDQuery1到界面上
2]在OnFormCreate事件里写
FDQuery1.Connection := FDConnection1;
FDConnection1.LoginPrompt:=false; //取消登录提示框
FDConnection1.Open('DriverID=SQLite;Database=test1.Sqlite3');//test1.Sqlite数据库要与E:\UniGui_Learn\04OnLineIditom\Win32\Debug\Project1.exe位置一致
3]单条数据
FDQuery1.Open('select id,info from atb where id = 11111 ' );
unimemo1.Text:= FDQuery1.fieldbyname('info').asstring;
4]多条数据
FDQuery1.Open(‘select id,name,info from atb where 1=1’);//只读取第一个
unilistbox1.Items.Add( FDQuery1.fieldbyname('name').asstring);
unimemo1.Text:= FDQuery1.fieldbyname('info').asstring;
FDQuery1.next; //第二个到最后一个
while not FDQuery1.eof do begin
unilistbox1.Items.Add( FDQuery1.fieldbyname('name').asstring);
FDQuery1.next;
end;