Q&A
- 현재 사용중인 시스템의 Program Fils 디렉토리이름을 알 순 없나요
제목 그대로입니다..
만약에 현재 사용중인 os가 C: 에 깔려 있다면...보통 c:program files가 깔리잔아여..이렇든..실행중인 os의 program files디렉토리명을 얻어 오고 싶습니다..
어찌해야 합니까..?
만약에 현재 사용중인 os가 C: 에 깔려 있다면...보통 c:program files가 깔리잔아여..이렇든..실행중인 os의 program files디렉토리명을 얻어 오고 싶습니다..
어찌해야 합니까..?
2
COMMENTS
-
-
일단 답변에 감사 드립니다...
근데..윈도우2000에서는 잘 되거든요...첫번째것이...
윈도우98에서는 둘다 되질 않군요...
최용일 wrote:
> 안녕하세요. 최용일입니다.
>
> 아래와 같이 하세요...
>
> IE v5.0이상에서...
> uses
> ..., ShlObj;
> const
> CSIDL_PROGRAM_FILES = 38;
> var
> Pidl: PItemIDList;
> Path: array[0..255] of Char;
> begin
> SHGetSpecialFolderLocation(Handle, CSIDL_PROGRAM_FILES, Pidl);
> SHGetPathFromIDList(Pidl, Path);
> ShowMessage('Program Files 폴더는 ' + Path + '입니다.');
> end;
>
>
> IE버전에 상관없이...
> uses
> ..., Registry;
> var
> Registry: TRegistry;
> Path: string;
> begin
> Registry := TRegistry.Create(HKEY_LOCAL_MACHINE);
> try
> Registry.OpenKey('SOFTWAREMicrosoftWindowsCurrentVersion', False);
> Path := Registry.ReadString('ProgramFilesDir');
> ShowMessage('Program Files 폴더는 ' + Path + '입니다.');
> finally
> Registry.Free;
> end;
> end;
>
> ^^ 항상 즐코하세요...
>
> Program Files wrote:
> > 제목 그대로입니다..
> > 만약에 현재 사용중인 os가 C: 에 깔려 있다면...보통 c:program files가 깔리잔아여..이렇든..실행중인 os의 program files디렉토리명을 얻어 오고 싶습니다..
> > 어찌해야 합니까..?
(NOTICE) You must be logged in to comment on this post.
-
- 만성
- •
- 2001.10.18 09:19
- 2 COMMENTS
- /
- 0 LIKES
-
나는나•2001.10.18 10:57procedure TForm1.Button1Click(Sender: TObject); begin Edit1.SetFocus; Edit1.SelectAll; end; ...
-
만성•2001.10.18 23:20나는나 wrote: > procedure TForm1.Button1Click(Sender: TObject); > begin > Edit1.SetFocus; > ...
-
- 델사랑
- 2001.10.18 08:52
- 0 COMMENTS
- /
- 0 LIKES
-
- Program Files
- •
- 2001.10.18 08:49
- 2 COMMENTS
- /
- 0 LIKES
제목 그대로입니다.. 만약에 현재 사용중인 os가 C: 에 깔려 있다면...보통 c:program files가 깔리잔아여..이렇든..실행중인 os의 program files디렉토리명을 얻어 오고 싶습니다.. 어찌해야 합니까..?-
최용일•2001.10.18 22:54안녕하세요. 최용일입니다. 아래와 같이 하세요... IE v5.0이상에서... uses ..., ShlObj; co...
-
Program Files•2001.10.30 19:25일단 답변에 감사 드립니다... 근데..윈도우2000에서는 잘 되거든요...첫번째것이... 윈도우98에서는 둘...
-
- 주복락
- •
- 2001.10.18 08:14
- 2 COMMENTS
- /
- 0 LIKES
-
이명훈•2001.10.18 18:42프로시져 선언을 하신담에 Shift+Ctrl+C키를 눌러보세요. 주복락 wrote: > 허접입니다.. 책을 보...
-
주복락•2001.10.18 20:14이명훈 wrote: > 프로시져 선언을 하신담에 Shift+Ctrl+C키를 눌러보세요. 이명훈님 정말 감사합니다....
-
- 김현섭
- •
- 2001.10.18 06:11
- 1 COMMENTS
- /
- 0 LIKES
-
이성찬•2001.10.19 01:34제 기억으론 퀵레포트는 델3에서 가장 많은 문제가 있었던것 같습니다. 패치를 다하셨나 확인해 보세요
-
- 찌르
- 2001.10.18 05:55
- 0 COMMENTS
- /
- 0 LIKES
-
- 이미지 출력하고파
- 2001.10.18 03:56
- 0 COMMENTS
- /
- 0 LIKES
-
- 늘초보
- •
- 2001.10.18 03:33
- 2 COMMENTS
- /
- 0 LIKES
-
돌멩이•2001.10.18 07:11늘초보 wrote: > ==등장폼== > Fmain : 메인폼 > Ffirst : 모달폼 > Fsecond : 모달폼 > > ==내용==...
-
델파이 탐 크르즈•2001.10.18 03:37이렇게 하시면 다운이 않될것 같군요.. 제가 지금 하고 있는 소스를 올립니다.. 보시고 참고 하시면 되여...
-
- 하이퍼초보
- •
- 2001.10.18 03:09
- 2 COMMENTS
- /
- 0 LIKES
-
델 삽질맨•2001.10.24 03:12하이퍼는 퀵과 달리 독립적인 유닛이필요로 합니다. 그래서 하이퍼유닛이 auto_create_Form으로 되어 있으...
-
델파이 탐 크르즈•2001.10.18 03:26QuickRep의 인스펙터 오프젝트의 속성중에 dataset에다가 Qry 컴포넌트을 연결 않하신것 같군요... 그럼...
-
- 맨땅에 헤딩 하는 넘.
- •
- 2001.10.18 02:51
- 1 COMMENTS
- /
- 0 LIKES
-
델파이 탐 크르즈•2001.10.18 03:31이렇게 하시면 될것 같군요... var FH : TextFile; begin Assignfile(FH,FileListBox...
-
- 김은희
- •
- 2001.10.18 02:43
- 3 COMMENTS
- /
- 0 LIKES
-
김지엽•2001.10.18 07:03생성을 이렇게 시켜주세요. WebBrowser2 := TWebBrowser.Create(Self); TControl(WebBrowser2).Parent ...
-
김은희•2001.10.18 18:57감사드립니다. 그렇게 하니까 되네요.. 제가 또 하나 해결하지 못한것이... webbrowser을 생성후 web...
-
김지엽•2001.10.19 20:57음.. 별다른 문제점을 생각해낼 수가 없네요? 어쩌면 ASP를 제공하는 서버의 문제가 아닐까요? 한꺼번에 ...
-
- 안창기
- •
- 2001.10.18 02:08
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2001.10.18 04:29안창기 wrote: > 디렉토리에 있는 파일을 한번에 삭제하는 방법좀 알으켜 주세요. > 디렉토리에 있는 파...
-
- 미로
- 2001.10.18 01:34
- 0 COMMENTS
- /
- 0 LIKES
-
- 이쁜이
- •
- 2001.10.18 01:32
- 1 COMMENTS
- /
- 0 LIKES
-
aparadin•2001.10.18 19:43이쁜이 wrote: > 델파이에서 직접 프린트 할려구 하는데 > 라인피드하는 방법 알려주세요.. > CHR(13),C...
-
- 델파이초보
- 2001.10.18 01:32
- 0 COMMENTS
- /
- 0 LIKES
-
- 델프리
- 2001.10.18 01:25
- 0 COMMENTS
- /
- 0 LIKES
-
- 정규성
- •
- 2001.10.18 01:20
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2001.10.18 04:58정규성 wrote: > 아래처럼 데이터를 Integer의 데이터를 날짜 형식으로 바꿔서 EditBox에 넣을려고 하는데...
-
- 수정이^^
- •
- 2001.10.18 01:02
- 1 COMMENTS
- /
- 0 LIKES
-
지나는이•2001.10.19 09:41수정이^^ wrote: > 오빠들 일은 잘 하고 있겠죠..^^..땡땡이 피지 말라구여..저처럼..^^ > 다른게 아니라...
-
- 바이오맨(초보)
- •
- 2001.10.18 01:01
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2001.10.18 06:33바이오맨(초보) wrote: > SGstock.Cells[0,0] := '입고여부'; > SGstock.cells[1,0] := '바코드';...
-
- 나옹이
- •
- 2001.10.18 00:47
- 1 COMMENTS
- /
- 0 LIKES
-
cho•2001.10.18 01:02프로그램 종료쪽 루틴에 이미 해제된 변수나 폼을 다시 해제시킨다든가 하는 부분때문일겁니다. 추적을...
-
Program Files
2001/10/18 08:49
-
Views384Likes0Comments2Reports0
-
Tag List
- 수정
- 삭제
- 목록으로
아래와 같이 하세요...
IE v5.0이상에서...
uses
..., ShlObj;
const
CSIDL_PROGRAM_FILES = 38;
var
Pidl: PItemIDList;
Path: array[0..255] of Char;
begin
SHGetSpecialFolderLocation(Handle, CSIDL_PROGRAM_FILES, Pidl);
SHGetPathFromIDList(Pidl, Path);
ShowMessage('Program Files 폴더는 ' + Path + '입니다.');
end;
IE버전에 상관없이...
uses
..., Registry;
var
Registry: TRegistry;
Path: string;
begin
Registry := TRegistry.Create(HKEY_LOCAL_MACHINE);
try
Registry.OpenKey('SOFTWAREMicrosoftWindowsCurrentVersion', False);
Path := Registry.ReadString('ProgramFilesDir');
ShowMessage('Program Files 폴더는 ' + Path + '입니다.');
finally
Registry.Free;
end;
end;
^^ 항상 즐코하세요...
Program Files wrote:
> 제목 그대로입니다..
> 만약에 현재 사용중인 os가 C: 에 깔려 있다면...보통 c:program files가 깔리잔아여..이렇든..실행중인 os의 program files디렉토리명을 얻어 오고 싶습니다..
> 어찌해야 합니까..?