導航:首頁 > 編程大全 > delphi資料庫ini兩種模式

delphi資料庫ini兩種模式

發布時間:2023-01-07 00:40:19

A. Delphi創建或讀取Ini文件

1、TIniFile對象

 以Delphi中,定義了一個TIniFile對象,將.INI文件封裝在其中,並提供一些方法,專門用來對INI文件進行讀寫操作。如果在程序中要用到TIniFile類或其方法屬性,就必須在程序單元的uses語句中手工加入對IniFiles單元的引用。

2、Create方法

 該方法用來創建一個處理INI文件的TIniFile類型實例。

 方法聲明:constructor Create(const FileName:string);

 參數說明:FileName指明待創建的INI文件的文件名;

 注釋:在使用TIniFile對象之前,必須先用此方法創建一個INI文件的實例。FileName中可以包含路徑名,預設時為Windows所在目錄(一般就是C:windows,對於Windows NT來說,則一般是c:winnt)。用Create方法創建的實例,在使用完之後,調用Free方法釋放內存。

B. delphi 程序中讀取ini文件的問題

//寫Ini
Procere WriteIniFile(sSection,sIndent,sValue:String);
Var
TmpIni:TIniFile;
Begin
TmpIni:=TIniFile.Create(SysInfo.AppDir+'\SysConfig.ini');
Try
TmpIni.WriteString(sSection,sIndent,sValue);
Finally
TmpIni.Free;
End;
End;
//讀取INI
Function ReadFromIniFile(sSection,sIndent,sDefault:String):String;
Var
TmpIni:TIniFile;
Begin
TmpIni:=TIniFile.Create(SysInfo.AppDir+'\SysConfig.ini');
Try
Result:=TmpIni.ReadString(sSection,sIndent,sDefault);
Finally
TmpIni.Free;
End;
End;
//取得連接串
function GetDBCnstr:String;
begin
Result:=Format('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Persist Security Info=False;'+
'Jet OLEDB:Database Password=%s',[123.mdb','你的密碼'])

end;

//機密解密
function UncrypStr(sInput:String):String;
begin
//具體代碼網上找
end;

function EncrypStr(sInput:String): String;
Begin
End;

//可以了巴,函數體都給你了,自己組合去,^_^。

你可以把ConnectionString加密一下,得出的字元串設在INI裡面,不用把INI整個文件加密了。

C. delphi通過INI文件設置資料庫動態連接,打不開表格,手動將ADOquery打開,提示無效的授權說明

1、建議檢查從 INI 中讀取資料庫連接配置後,能否正確連接到資料庫。

2、建議將 Query 組件的打開操作放到窗體(或數據模塊)的初始化事件中,比如 OnFormCreate。

D. DELPHI ini 連接資料庫

33行錯誤 少一個end 或者是 end沒有分號
35行錯誤 TiniFile 沒有定義,你是不是定義的局部變數,所以在本過程中沒有
41行錯誤 好像是40行少個分號。
43行錯誤,你那個try語句少個end

從此看來你語法很欠缺,應該多看看書練習一下,還有就是太馬虎了。

E. delphi創建文件和讀取.ini文件怎麼寫

filecreate('路徑加文件名');//創建一個文件。

讀寫ini文件:
先在 uses 定義 Inifiles, 在 var 定義 myinifile:Tinifile;

實現部分寫代碼:
myinifile:=Tinifile.create('d:\1.ini');//打開D盤的 1.ini 文件。
myinifile.readstring('小節名','關鍵字','預設值');//讀取字元型數據。
myinifile.redainteger('小節名','關鍵字','預設值');//讀取整數型數據。
myinifile.readbool('小節名','關鍵字','預設值');//讀取邏輯型數據。

寫入INI文件:
myinifile.writestring('小節名','關鍵字',變數或字元串值);//寫入字元型數據。
myinifile.writeinteger('小節名','關鍵字','變數或整型數值);//寫入整數型數據。
myinifile.writebool('小節名','關鍵字',變數或TRUE或FALSE);//寫入邏輯型數

myinifile.Free;//釋放INI文件。

F. 關於delphi 7用ini文件連接資料庫

adoconnection1.Connected:=false;
adoconnection1.LoginPrompt := False;//加上這一句
adoconnection1.ConnectionString:=myinifile.readstring('part1','dbstring','www'); //這里你只讀了一部分,應該讀出該小節的全部數據,
//adoconnection1.ConnectionString:=myinifile.readstring('dblinkstr','dbstring','') + myinifile.readstring('dblinkstr','password','') .....一直加到 data source那;
adoconnection1.Connected:=true;

//不建立ODBC數據源,連接不成功,如果想不建立數據源的話,還要在ini中添加Initial Catalog等信息

G. delphi如何利用ini文件動態連接ACCESS資料庫

不建議這樣做 這樣做的結果就是資料庫的信息 包括用戶名 密碼等全部泄漏
如果你非要這么坐的話 那就正常操作INI文件即可
你先看看ini文件 怎麼操作

H. 如何使用Delphi 建立、讀取、存貯INI文件

INI文件在系統配置及應用程序參數保存與設置方面,具有很重要的作用,所以可視化的編程一族,如VB、VC、 VFP、Delphi等都提供了讀寫INI文件的方法,其中Delphi中操作INI文件,最為簡潔,這是因為Delphi3提供了一個TInifile 類,使我們可以非常靈活的處理INI文件。
一、有必要了解INI文件的結構:

;注釋
[小節名]
關鍵字=值
...

INI文件允許有多個小節,每個小節又允許有多個關鍵字,「=」後面是該關鍵字的值。

值的類型有三種:字元串、整型數值和布爾值。其中字元串存貯在INI文件中時沒有引號,布爾真值用1表示,布爾假值用0表示。

注釋以分號「;」開頭。
二、定義
1、在Interface的Uses節增加IniFiles;

2、在Var變數定義部分增加一行:

myinifile:Tinifile;

然後,就可以對變數myinifile進行創建、打開、讀取、寫入等操作了。
三、打開INI文件

myinifile:=Tinifile.create(program.ini);

上面這一行語句將會為變數myinifile與具體的文件program.ini建立聯系,然後,就可以通過變數myinifile,來讀寫program.ini文件中的關鍵字的值了。

值得注意的是,如果括弧中的文件名沒有指明路徑的話,那麼這個Program.ini文件會存儲在Windows目錄中,把Program.ini文件存儲在應用程序當前目錄中的方法是:為其指定完整的路徑及文件名。下面的兩條語句可以完成這個功能:

Filename:=ExtractFilePath(Paramstr
(0))+program.ini;
myinifile:=Tinifile.Create(filename);

四、讀取關鍵字的值
針對INI文件支持的字元串、整型數值、布爾值三種數據類型,TINIfiles類提供了三種不同的對象方法來讀取INI文件中關鍵字的值。

假設已定義變數vs、vi、vb分別為string、integer、boolean類型。

vs:=myinifile.Readstring
(小節名,關鍵字,預設值);
vi:=myinifile.Readinteger
(小節名,關鍵字,預設值);
vb:=myinifile.Readbool
(小節名,關鍵字,預設值);

其中預設值為該INI文件不存在該關鍵字時返回的預設值。
五、寫入INI文件
同樣的,TInifile類也提供了三種不同的對象方法,向INI文件寫入字元串、整型數及布爾類型的關鍵字。

myinifile.writestring(小節名,關鍵字,變數或字元串值);
myinifile.writeinteger(小節名,關鍵字,變數或整型數值);
myinifile.writebool(小節名,關鍵字,變數或True或False);

當這個INI文件不存在時,上面的語句還會自動創建該INI文件。
六、刪除關鍵字
除了可用寫入方法增加一個關鍵字,Tinifile類還提供了一個刪除關鍵字的對象方法:

myinifile.DeleteKey(小節名,關鍵字);

七、小節操作
增加一個小節可用寫入的方法來完成,刪除一個小節可用下面的對象方法:

myinifile.EraseSection(小節名);

另外Tinifile類還提供了三種對象方法來對小節進行操作:

myinifile.readsection(小節名,TStrings變數);可將指定小節中的所有關鍵字名讀取至一個字元串列表變數中;

myinifile.readsections(TStrings變數);可將INI文件中所有小節名讀取至一個字元串列表變數中去。

myinifile.readsectionvalues(小節名,TStrings變數);可將INI文件中指定小節的所有行(包括關鍵字、=、值)讀取至一個字元串列表變數中去。
八、釋放

在適當的位置用下面的語句釋放myinifile:
myinifile.distory;

九、一個實例
下面用一個簡單的例子(如圖),演示了建立、讀取、存貯INI文件的方法。myini.ini文件中包含有 「程序參數」小節,和用戶名稱(字元串)、是否正式用戶(布爾值)和已運行時間(整型值)三個關鍵字。程序在窗體建立讀取這些數據,並在窗體釋放時寫 myini.ini文件。

附源程序清單

unitUnit1;
interface
uses
Windows,Messages,SysUtils,Classes,Graphics,
Controls,Forms,Dialogs,inifiles,StdCtrls,ExtCtrls;
type
TForm1=class(TForm)
Edit1:TEdit;
CheckBox1:TCheckBox;
Edit2:TEdit;
Label1:TLabel;
Label2:TLabel;
Timer1:TTimer;
Label3:TLabel;
procereFormCreate(Sender:TObject);
procereFormDestroy(Sender:TObject);
procereTimer1Timer(Sender:TObject);
private
{Privatedeclarations}
public
{Publicdeclarations}
end;
var
Form1:TForm1;

implementation
var
myinifile:TInifile;
{$R*.DFM}

procereTForm1.FormCreate(Sender:TObject);
var
filename:string;
begin
filename:=ExtractFilePath(paramstr(0))+myini.ini;
myinifile:=TInifile.Create(filename);
edit1.Text:=myinifile.readstring
(程序參數,用戶名稱,預設的用戶名稱);
edit2.text:=inttostr(myinifile.readinteger
(程序參數,已運行時間,0));
checkbox1.Checked:=myinifile.readbool
(程序參數,是否正式用戶,False);
end;

procereTForm1.FormDestroy(Sender:TObject);
begin
myinifile.writestring(程序參數,用戶名稱,edit1.Text);
myinifile.writeinteger(程序參數,已運行時間,
strtoint(edit2.text));
myinifile.writebool(程序參數,是否正式用戶,
checkbox1.Checked);
myinifile.Destroy;
end;

procereTForm1.Timer1Timer(Sender:TObject);
begin
edit2.Text:=inttostr(strtoint(edit2.text)+1);
end;

end.

程序在Pwin95、Delphi3下調試通過

I. delphi 用ini文件連接資料庫

ServerNameStr:=conn.ReadString('config','ServerName','');

ini文件中沒有ServerName這項。

建議:連接資料庫最好不要放在數據模塊或窗體的Create事件中,這樣容易引起其他問題。

閱讀全文

與delphi資料庫ini兩種模式相關的資料

熱點內容
5s升級ios83耗電 瀏覽:496
舊版追書神器的文件在哪裡 瀏覽:356
附近哪裡有賣文件夾的 瀏覽:285
網路連接項目有哪些 瀏覽:253
系統備份鏡像文件備份放到哪裡 瀏覽:207
intelx58超頻教程 瀏覽:590
在驅動器查找文件在哪裡 瀏覽:15
pdf文件轉換word時亂碼 瀏覽:474
紅色警戒3沒有mod文件夾 瀏覽:587
企業服務代辦平台App有哪些 瀏覽:103
桌面一個文件夾打不開 瀏覽:503
js設定日期 瀏覽:893
qq如何文件 瀏覽:159
win10游戲模式在那裡 瀏覽:60
烏蘇里船歌女聲版本 瀏覽:942
數控銑t型槽怎麼編程 瀏覽:36
我的世界win10合成表 瀏覽:410
ai怎麼導小文件pdf 瀏覽:345
多益網路怎麼通過 瀏覽:350
編程scratch軟體怎麼下載 瀏覽:595

友情鏈接