2,209
社区成员
发帖
与我相关
我的任务
分享
strSQL := Format('select * From %s', [strTableName]);
sqlite3_check(sqlite3_prepare_v2(ASQLiteDatabase.Handle, PAnsiChar(strSQL), Length(strSQL), @stmt, nil));
try
while sqlite3_check(sqlite3_step(stmt)) = SQLITE_ROW do
;
finally
sqlite3_finalize(stmt);
end;