delphi怎样连接Sqlite 增删改查
delphi连接Sqlite 增删改查例子
数据库已经连通了, 插入会报错,no query specified
with dm.ASQLite3Query1 do
begin
dm.ASQLite3Query1.Close;
dm.ASQLite3Query1.SQL.Clear;
sqlstr:='insert into student_test(id,username,telephone,address,state) values(:id,:username,:telephone,:address,:state)'; dm.ASQLite3Query1id.Value:=Trim(id_edit.Text);
dm.ASQLite3Query1username.Value:=Trim(username_edit.Text);
dm.ASQLite3Query1telephone.Value:=Trim(phone_edit.Text);
dm.ASQLite3Query1address.Value:=Trim(address_edit.Text);
dm.ASQLite3Query1state.Value:=Trim(state_edit.Text);
dm.ASQLite3Query1.ExecSQL;
dm.ASQLite3Query1.Close;
dm.ASQLite3Query1.SQL.Clear;
dm.ASQLite3Query1.SQL.Text:='select * from student_test';
dm.ASQLite3Query1.Open;
end;
Delphi(Pascal) code:
with dm.ASQLite3Query1 do
begin
dm.ASQLite3Query1.Close;
dm.ASQLite3Query1.SQL.Clear;
sqlstr:='insert into student_test(id,username,telephone,address,state) values(:id,
相关问答:
我在模块里自定义了一个函数:stradd()
可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...
这个问题有什么办法可以解决的吗? 非常感激!
(在A ......
procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 个字节的长整形指针
begin
P:=PLongint(A);// 取的 A 的 ......
VC++ 中, &变量名。 是什么意思。 Delphi中 和他一样的符号 是哪个、?
大家都认为,C语言之所以强大,以及其自由性,很大部分体现在其灵活的指针运用上。因此,说指针是C语言的灵魂,一点都不为过。同时, ......