- uses inifiles;
- procedure TForm1.FormCreate(Sender: TObject);
- var
- ini: TIniFile;
- path,a,b,c,d: string;
- begin
- path := ExtractFilePath(Application.Exename)+'server.INI'; 获取当前路径ini
- ini := TIniFile.Create(path);
- a:= ini.ReadString('SYSTEM','ServerIP','');
- b:= ini.ReadString('SYSTEM','DataBase','');
- c:= ini.ReadString('SYSTEM','PWD','');
- d:= ini.ReadString('SYSTEM','UserNamse','');
- end;
不使用API读取ini
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章
任务映像已损坏或篡改(异常来自HRESULT:0x80041321)
原創
2024-05-08 21:56:24
Linux mpstat 命令
原創
2024-04-07 13:07:06
无法本地校验颁发者的权限
原創
2024-03-21 22:44:05
CentOS服务器简单安全策略配置
原創
2024-03-20 21:35:24
uos安装docker
原創
2024-03-09 23:48:38
为什么我们青睐 PHP?
雲棲號資訊小哥
2020-07-29 12:49:48
Dolphinscheduler不重启加载Oracle驱动
原創
2024-05-28 21:22:10
linux加载动态库失败
mskk
2024-05-21 00:52:55
安装Mysql时遇到的一些疑难杂症!!!
osc_hwc3munb
2024-05-14 02:04:37
sonarQune 环境搭建
原創
2024-04-08 21:09:09
Linux系统用户登录时的环境加载顺序
原創
2024-04-07 23:52:25
如何使用pingora构建自己反向代理
原創
2024-04-01 21:57:09
vue3 的router跳转 - 页面同tab跳转和打开新tab跳转
文文1
2024-03-22 14:34:45
如何查看Docker容器环境变量,如何向容器传递环境变量
雲棲號資訊小哥
2020-08-05 13:52:51