lazarus 给应用程序创建 配置文件哈哈
procedure TForm1.Button2Click(Sender: TObject);
begin
ForceDirectoriesUTF8(GetAppConfigDirUTF8(False)); ForceDirectoriesUTF8 //C:\Documents and Settings\Administrator\Local Settings\project1
with Sqlite3Dataset1 do
begin
FileName := IncludeTrailingPathDelimiter(GetAppConfigDirUTF8(False )) + 'data.db';
tablename:='zmeee';
if not TableExists then
begin
FieldDefs.Clear;
FieldDefs.Add('Id', ftAutoInc);
FieldDefs.Add('Name', ftString);
FieldDefs.Add('Email', ftString);
CreateTable;
end;
Open;
end;
end;

最新文章

1. 用CSS制作带图标的按钮
2. 关于linx中man命令内容中第一行数字的含义
3. SQLserver技巧
4. js/jquery 回调函数的定义方法
5. redirect和forward
6. Python文件基础
7. memache session
8. windows 支持curl命令
9. ASP.NET MVC Html.BeginForm用法1
10. 企业级 Linux 安全管理实例（1）
11. 转:Redis作者谈Redis应用场景
12. SQL SERVER 分页方法
13. 【组队赛三】-C cf448B
14. ORACLE union order by
15. hibernate ——联合主键
16. Akka（32）： Http：High-Level-Api，Route exception handling
17. C#帮助类：将List转换成Datatable
18. [javascript]jsonp-function 代码段
19. 『Nltk』常用方法
20. ElasticSearch 在3节点集群的启动

热门文章

1. Java中的==和equals( )方法
2. 第五小节之JAVA IO流
3. 多线程使用@Async注解创建多线程，自定义线程池
4. 利用urllib.urlopen向有道翻译发送数据获得翻译结果
5. php 的windows集成开发环境
6. 【NOIP2016提高A组模拟9.15】Osu
7. vue和electron做的聊天应用表情包处理
8. Ubuntu下安装CUDA8.0及nvidia驱动
9. 配置中心Apollo多环境部署
10. 可持久化Trie模板