보라미 wrote:

> 델파이로 짠 프로그램으로 CD_ROM에 있는 다른 프로그램 실행시켜야만 합니당..

>

> Winexec(' ', )를 써주면 다른 프로그램을 실행시킬 수 있다는 사실은 게시판을 보고 알았습니다.

>

> 근데 잘 모르겠는건 CD_ROM의 경로를 정확히 알지 못한다는 것이죠.

>

> 어떤 컴퓨터는 E:드라이브일 수도 있구 어떤 컴퓨터는 F:드라이브이기두 하고..

>

> 그럴땐 어떻게 실행 시켜줘야하는지 도저히 모르겠습니다.

>

> 이걸 델파이에서 알아내서 실행시켜 줄 수 있는 방법을 알고 계신 분이 있다면...

>

> 제발 꼬옥 도와주시기 바랍니다..

>

> 저 정말 급합니당.. 꼬옥 도와 주시기 바랍니당...



procedure TForm1.Button1Click(Sender: TObject);

var Drive : char ;

begin

for Drive := 'A' to 'Z' do

begin

if GetDriveType(PChar(Drive+':')) = DRIVE_CDROM then

ShowMessage('CD-ROM : ' + Drive);

end;

end;

이렇게 하면 시디롬의 드라이브를 알 수 있습니다..

하지만 시디롬드라이브가 두개 이상이면 어쩌실려구??

click wrote:

> 보라미 wrote:

> > 델파이로 짠 프로그램으로 CD_ROM에 있는 다른 프로그램 실행시켜야만 합니당..

> >

> > Winexec(' ', )를 써주면 다른 프로그램을 실행시킬 수 있다는 사실은 게시판을 보고 알았습니다.

> >

> > 근데 잘 모르겠는건 CD_ROM의 경로를 정확히 알지 못한다는 것이죠.

> >

> > 어떤 컴퓨터는 E:드라이브일 수도 있구 어떤 컴퓨터는 F:드라이브이기두 하고..

> >

> > 그럴땐 어떻게 실행 시켜줘야하는지 도저히 모르겠습니다.

> >

> > 이걸 델파이에서 알아내서 실행시켜 줄 수 있는 방법을 알고 계신 분이 있다면...

> >

> > 제발 꼬옥 도와주시기 바랍니다..

> >

> > 저 정말 급합니당.. 꼬옥 도와 주시기 바랍니당...

>

> procedure TForm1.Button1Click(Sender: TObject);

> var Drive : char ;

> begin

> for Drive := 'A' to 'Z' do

> begin

> if GetDriveType(PChar(Drive+':')) = DRIVE_CDROM then

> ShowMessage('CD-ROM : ' + Drive);

> end;

> end;

> 이렇게 하면 시디롬의 드라이브를 알 수 있습니다..

> 하지만 시디롬드라이브가 두개 이상이면 어쩌실려구??



씨디롬이 두개일경우를 대비해서 님이 답해 주신것에다

FileExists를 하용하여 실행하고자 하는 화일이 있는지 없는지를 검사하고

사용하시는 것도 하나의 방법이 될것 같은데요... ^^;