½Ð°Ý¤@¤UBCBÃö©ówindowsªºregistry....

[天蠍男]

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
Registry->WriteString("Server List",ComboBox1->Text);
Registry->Free();

}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormShow(TObject *Sender)
{
Registry = new TRegistry;
Registry->RootKey=HKEY_LOCAL_MACHINE;
Registry->OpenKey("SOTFWARE\\test\\Configuration",true);

//---------------------------------------------------------------------------

請問一下各位先進,小弟寫了在windows下註冊registry的程式...

如上面的原始碼,第一次執行時可以產生該regisrtry(原本沒有該Registry)

之後我把registry刪除後再重新執行程式一次就無法產生該registry

而且我在ComboBox1->Text中填入IP address會出現錯誤訊息

"Failed to set data for Srever List"

難道說IP address不能用string的資料型態傳送嗎???

希望有人能告訴我原因,thanks......

--
[1;32m※ Origin: [33m交大資工鳳凰城資訊站 [37m<bbs.csie.nctu.edu.tw> [m
[1;31m◆ From: [36m140.124.72.210 [m

[yujui]

※ 引述《timya...@bbs.csie.nctu.edu.tw (天蠍男)》之銘言：

> #include <vcl.h>
> #pragma hdrstop
> #include "Unit1.h"
> //---------------------------------------------------------------------------
> #pragma package(smart_init)
> #pragma resource "*.dfm"
> TForm1 *Form1;

//增加這行
TRegistry *Registry;

> //---------------------------------------------------------------------------
> __fastcall TForm1::TForm1(TComponent* Owner)
> : TForm(Owner)
> {
> }
> //---------------------------------------------------------------------------
> void __fastcall TForm1::BitBtn1Click(TObject *Sender)
> {
> Registry->WriteString("Server List",ComboBox1->Text);

> //Registry->Free(); <--問題出在這裡你已經將Registry物件釋放了

> }
> //---------------------------------------------------------------------------
> void __fastcall TForm1::FormShow(TObject *Sender)
> {
> Registry = new TRegistry;
> Registry->RootKey=HKEY_LOCAL_MACHINE;
> Registry->OpenKey("SOTFWARE\\test\\Configuration",true);
> //---------------------------------------------------------------------------

加入Form的OnClose事件
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
delete Registry;

}
//---------------------------------------------------------------------------
> 請問一下各位先進,小弟寫了在windows下註冊registry的程式...
> 如上面的原始碼,第一次執行時可以產生該regisrtry(原本沒有該Registry)
> 之後我把registry刪除後再重新執行程式一次就無法產生該registry
> 而且我在ComboBox1->Text中填入IP address會出現錯誤訊息
> "Failed to set data for Srever List"
> 難道說IP address不能用string的資料型態傳送嗎???
> 希望有人能告訴我原因,thanks......

這樣應該就可以了~~~
--
[1;33m※ Origin: [36m奇摩 大摩域 [37m<telnet://bbs.kimo.com.tw> [m
[1;35m◆ From: [1;32m211.72.126.67 [m