如何讓更新過的資料，在下一次啟動程式依然保留？

發文回覆瀏覽次數：877

推到 Plurk!

推到 Facebook!

如何讓更新過的資料，在下一次啟動程式依然保留？

答題得分者是：axsoft

rockmax
一般會員

發表：24
回覆：12
積分：7
註冊：2003-02-20

發送簡訊給我

#1 引用回覆回覆

發表時間：2003-08-23 14:23:41

IP:61.223.xxx.xxx 未訂閱

在我的程式裡頭，有許多的TEdit元件做為輸入，我希望程式在下一次開啟後，依然能夠保留我上次設定過的值，而不是一開始程式撰寫時的設定值，我是不是需要用到*.res檔呀？可不可以教我怎麼用呢？謝謝。

axsoft
版主

發表：681
回覆：1056
積分：969
註冊：2002-03-13

發送簡訊給我

#2 引用回覆回覆

發表時間：2003-08-23 23:24:35

IP:211.76.xxx.xxx 未訂閱

rockmax您好:
試試看用TiniFile把資訊存到iniFile中
//---------------------------------------------------------------------------    #include 
#pragma hdrstop    #include "Unit1.h"
#include 
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
 TIniFile *ini;
 ini = new TIniFile( ChangeFileExt( Application->ExeName, ".INI" ) );
 Edit1->Text =  ini->ReadInteger( "Edit1", "value", 100 );
 delete ini;    }
//---------------------------------------------------------------------------    void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
   TIniFile *ini;
   ini = new TIniFile(ChangeFileExt( Application->ExeName, ".INI" ) );
   ini->WriteInteger( "Edit1", "value", StrToInt(Edit1->Text));
   delete ini;    }
//---------------------------------------------------------------------------

/*開心的事情別隱藏在心裡,分享給別人知道會更快樂的*/
/*得到新知識別隱藏在心裡,分享給別人了解會更清楚的*/

系統時間：2024-05-14 11:46:24

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！