Q&A
- 레지스트리 저장및 읽어오기 에서...
이거 여기 질문해도 되나 모르겠습니다..
다름이 아니고 레지스트리에 스트링을 저장하고 읽어올려고 하는데요..
ListBox에 있는 아이템들을 FormDestroy할때 저장하고
FormCreate할때 읽어와서 ComboBox와 ListBox에 뿌릴려고 하는데
키는 만들어지는데 스트링이 저장되지 않습니다.
참고로 소스는 아래에.....
procedure TListFrm.FormDestroy(Sender: TObject);
var
Reg : TRegistry;
begin
LName := ListBox1.Items.Text;
Reg := TRegistry.Create;
try
Reg.OpenKey('SoftwareNetbasePost',True);
Reg.WriteString('LocalName',LName);
finally
Reg.Free;
end;
end;
요거이 저장하는거구요...(LName은 전역으로 선언)
procedure TListFrm.FormCreate(Sender: TObject);
var
Reg : TRegistry;
KeyGood : Boolean;
begin
Reg := TRegistry.Create;
try
Reg.OpenKey('SoftwareNetBasePost',False);
If Not KeyGood then begin
LName := Reg.ReadString('LocalName',LName);
ListBox1.Items.Add(LName);
ComboBox1.Items.Add(LName);
end;
finally
Reg.Free;
end;
end;
요거이 읽어오는 겁니다.
좀 봐주세요..그리고 해답을 ......
정확하게...
다름이 아니고 레지스트리에 스트링을 저장하고 읽어올려고 하는데요..
ListBox에 있는 아이템들을 FormDestroy할때 저장하고
FormCreate할때 읽어와서 ComboBox와 ListBox에 뿌릴려고 하는데
키는 만들어지는데 스트링이 저장되지 않습니다.
참고로 소스는 아래에.....
procedure TListFrm.FormDestroy(Sender: TObject);
var
Reg : TRegistry;
begin
LName := ListBox1.Items.Text;
Reg := TRegistry.Create;
try
Reg.OpenKey('SoftwareNetbasePost',True);
Reg.WriteString('LocalName',LName);
finally
Reg.Free;
end;
end;
요거이 저장하는거구요...(LName은 전역으로 선언)
procedure TListFrm.FormCreate(Sender: TObject);
var
Reg : TRegistry;
KeyGood : Boolean;
begin
Reg := TRegistry.Create;
try
Reg.OpenKey('SoftwareNetBasePost',False);
If Not KeyGood then begin
LName := Reg.ReadString('LocalName',LName);
ListBox1.Items.Add(LName);
ComboBox1.Items.Add(LName);
end;
finally
Reg.Free;
end;
end;
요거이 읽어오는 겁니다.
좀 봐주세요..그리고 해답을 ......
정확하게...
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 이호선
- •
- 1999.06.16 07:06
- 1 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.06.16 18:48이호선 께서 말씀하시기를... > 안녕하세요 > 한 폼에서 ShowModal로 폼을 띄웠습니다. 이 Modal폼에서 ...
-
- 이 소라
- 1999.06.16 06:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보
- •
- 1999.06.16 06:05
- 2 COMMENTS
- /
- 0 LIKES
-
신인재•1999.06.17 01:08테이블이 어떤 테이블인지..... 만약 파일시스템에서 사용하는 파라독스같은 것이면 delzip을 이용하...
-
초보•1999.06.17 03:14감사합니다. 근데 바쁘신가봐요 자료실에 확인해 봤는데 없더라구요 빨리 올려주세요 그럼.. 신인...
-
- 이주흥
- •
- 1999.06.16 06:04
- 1 COMMENTS
- /
- 0 LIKES
이거 여기 질문해도 되나 모르겠습니다.. 다름이 아니고 레지스트리에 스트링을 저장하고 읽어올려고 하는데요.. ListBox에 있는 아이템들을 FormDestroy할때 저장하고 FormCreate할때 읽어와서 ComboBox와 ListBox에 뿌릴려고 하는데 키...-
안치봉•1999.06.16 18:54이주흥 께서 말씀하시기를... > 이거 여기 질문해도 되나 모르겠습니다.. > 다름이 아니고 레지스트리에 ...
-
- 홍성원
- •
- 1999.06.16 05:27
- 1 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.06.16 18:57홍성원 께서 말씀하시기를... > 델파이에서의 '폼 디자인'을 그대로 > 모사할 수 있는 방법을 알고 싶습...
-
- 서현승
- 1999.06.16 04:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 최기훈
- •
- 1999.06.16 03:10
- 1 COMMENTS
- /
- 0 LIKES
-
조복기•1999.06.16 03:45최기훈 께서 말씀하시기를... > System Menu에서 X로 표시된 버튼을 누르면 User에서 물어본다면 해당 > ...
-
- 강윤환
- 1999.06.16 02:15
- 0 COMMENTS
- /
- 0 LIKES
-
- 최선기
- •
- 1999.06.16 02:08
- 2 COMMENTS
- /
- 0 LIKES
-
김우철•1999.06.16 09:35고수님의 답변에 덧붙여 몇자 적습니다. 일반적으로 Application을 만들때 젤 먼저 결정해야할 문제중 하...
-
안치봉•1999.06.16 03:55최선기 께서 말씀하시기를... > Project메뉴/option의 Forms 페이지의 기능에 대해 자세히 알고 싶습니다....
-
- 이영범
- •
- 1999.06.16 01:44
- 1 COMMENTS
- /
- 0 LIKES
-
신호성•1999.06.17 17:42이영범 께서 말씀하시기를... > 안녕하십니까?... > 퀵리포트에서는 Query컴포넌트(이후 Query)를 1개밖...
-
- 서영환
- •
- 1999.06.16 01:23
- 3 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.06.16 03:31서영환 께서 말씀하시기를... > Active Form에서 다운 받은 OCX를 설치하면, > 버전업을 해도 다시 다운...
-
서영환•1999.06.16 04:52안치봉 께서 말씀하시기를... > 서영환 께서 말씀하시기를... > > Active Form에서 다운 받은 OCX를 설치...
-
공대규•1999.06.29 17:18> codebase="http://210.116.3.220/t3/tProj1.cab"#version=1,0,0,0 위 부분의 따옴표가 혹시 "htt...
-
- 하명훈
- •
- 1999.06.16 01:16
- 1 COMMENTS
- /
- 0 LIKES
-
조복기•1999.06.16 01:27하명훈 께서 말씀하시기를... > procedure TSearch.Button1Click(Sender: TObject); > 쿼리를 엑세스하...
-
- 박성훈
- •
- 1999.06.16 01:10
- 1 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.06.16 04:16박성훈 께서 말씀하시기를... > procedure Button1Click(Sender: TObject); > begin > Self.Close; ...
-
- 강미라
- •
- 1999.06.16 00:55
- 1 COMMENTS
- /
- 0 LIKES
-
김우철•1999.06.16 02:23고수는 아니지만, 기냥 써볼랍니다. 날짜에 대한 자료를 처리할수 있는 클래스를 만들어서 윤년계산, 해당...
-
- 김진성
- •
- 1999.06.16 00:42
- 3 COMMENTS
- /
- 0 LIKES
-
김태균•1999.06.16 00:49김진성 께서 말씀하시기를... > ORACLE에서는 ROWNUM을 이용하여 존재하는 레코드에 대한 > 각각의 번호...
-
김진성•1999.06.16 06:22김태균 께서 말씀하시기를... > 김진성 께서 말씀하시기를... > > ORACLE에서는 ROWNUM을 이용하여 존재...
-
김태균•1999.06.16 18:23음..... 테이블을 만들때 포함시키는 것입니다. SQLServer에서 테이블을 생성할 때 순서가 다음과 같...
-
- 최기훈
- •
- 1999.06.16 00:31
- 1 COMMENTS
- /
- 0 LIKES
-
최기훈•1999.06.16 03:05최기훈 께서 말씀하시기를... > 안녕하세요. 염치를 불구하고 이렇게 또 메일을 올립니다. > Delphi에서 ...
-
- 장일
- 1999.06.15 22:58
- 0 COMMENTS
- /
- 0 LIKES
-
- 이주흥
- •
- 1999.06.15 22:55
- 1 COMMENTS
- /
- 0 LIKES
-
최석기•1999.06.16 01:27> TrayIcon에서요.. 팝업메뉴를 만드는 방법좀 알려주세요.. > 그러니까 Icon에서 오른쪽 마우스클릭 했을...
-
- 디제이
- •
- 1999.06.15 20:59
- 1 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.06.15 21:07디제이 께서 말씀하시기를... > > 비베에서는 On Error goto문이 있습니다만 > 델파이에서는 어떤식으...
-
- 박종성
- 1999.06.15 20:50
- 0 COMMENTS
- /
- 0 LIKES
> 이거 여기 질문해도 되나 모르겠습니다..
> 다름이 아니고 레지스트리에 스트링을 저장하고 읽어올려고 하는데요..
> ListBox에 있는 아이템들을 FormDestroy할때 저장하고
> FormCreate할때 읽어와서 ComboBox와 ListBox에 뿌릴려고 하는데
> 키는 만들어지는데 스트링이 저장되지 않습니다.
> 참고로 소스는 아래에.....
>
> procedure TListFrm.FormDestroy(Sender: TObject);
> var
> Reg : TRegistry;
> begin
> LName := ListBox1.Items.Text;
> Reg := TRegistry.Create;
> try
> Reg.OpenKey('SoftwareNetbasePost',True);
> Reg.WriteString('LocalName',LName);
> finally
> Reg.Free;
> end;
> end;
>
> 요거이 저장하는거구요...(LName은 전역으로 선언)
>
> procedure TListFrm.FormCreate(Sender: TObject);
> var
> Reg : TRegistry;
> KeyGood : Boolean;
> begin
> Reg := TRegistry.Create;
> try
> Reg.OpenKey('SoftwareNetBasePost',False);
> If Not KeyGood then begin
> LName := Reg.ReadString('LocalName',LName);
> ListBox1.Items.Add(LName);
> ComboBox1.Items.Add(LName);
> end;
> finally
> Reg.Free;
> end;
> end;
> 요거이 읽어오는 겁니다.
> 좀 봐주세요..그리고 해답을 ......
> 정확하게...
안녕하세요.
잘은 모르겠지만...
TRegIniFile 을 사용해보세요.
그리고 가급적이면 RootKey 라는 속성을 지정해서 사용하십시오.