<HTML><HEAD>
<META content="text/html; charset=UTF-8" http-equiv=Content-Type></HEAD>
<BODY dir=ltr bgColor=#ffffff text=#000000>
<DIV dir=ltr>
<DIV style="FONT-FAMILY: 'Arial'; COLOR: #000000; FONT-SIZE: 10pt">
<DIV>Well it is what I was looking for but I probably won’t use it as it is
incredibly ugly – as in it has Windows 3.1 look. Is this really the
most modern version of selecting a drive I can use on Windows 7?</DIV>
<DIV> </DIV>
<DIV style="FONT-FAMILY: 'Arial'; COLOR: #000000; FONT-SIZE: 10pt">John</DIV>
<DIV style="FONT-FAMILY: 'Arial'; COLOR: #000000; FONT-SIZE: 10pt">
<DIV
style="FONT-STYLE: normal; DISPLAY: inline; FONT-FAMILY: 'Calibri'; COLOR: #000000; FONT-SIZE: small; FONT-WEIGHT: normal; TEXT-DECORATION: none"><FONT
size=2 face=Arial></FONT></DIV>
<DIV style="FONT: 10pt tahoma">
<DIV style="BACKGROUND: #f5f5f5">
<DIV style="font-color: black"><B>From:</B> <A title=rohit@cfl.co.nz
href="mailto:rohit@cfl.co.nz">Rohit Gupta</A> </DIV>
<DIV><B>Sent:</B> Monday, May 23, 2011 2:37 PM</DIV>
<DIV><B>To:</B> <A title=delphi@delphi.org.nz
href="mailto:delphi@delphi.org.nz">NZ Borland Developers Group - Delphi List</A>
</DIV>
<DIV><B>Subject:</B> Re: [DUG] File/Dir Open at "My Computer"</DIV></DIV></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV></DIV>
<DIV
style="FONT-STYLE: normal; DISPLAY: inline; FONT-FAMILY: 'Calibri'; COLOR: #000000; FONT-SIZE: small; FONT-WEIGHT: normal; TEXT-DECORATION: none">John,<BR><BR>the
TDriveCombobox should do the trick.<BR><BR><BR><BR>On 20/05/2011 1:35 a.m., John
Bird wrote:
<BLOCKQUOTE cite=mid:DD01004E82E24F95A7CB503D3A93F54A@JohnSony2 type="cite">
<DIV dir=ltr>
<DIV style="FONT-FAMILY: 'Arial'; COLOR: rgb(0,0,0); FONT-SIZE: 10pt">
<DIV>I want to bring up a dialog to select a drive (Will be usually a
removable USB drive). Can I do this with any of the standard
Delphi TOpenDialog or SelectDirectory etc?</DIV>
<DIV> </DIV>
<DIV>Ideally I want to bring up a dialog starting at My
Computer...(D2007)</DIV>
<DIV> </DIV>
<DIV>[Aside - I know how to show My Computer by starting Windows
Explorer:</DIV>
<DIV> </DIV>
<DIV>To start with my computer:</DIV>
<DIV> </DIV>
<DIV>explorer.exe /n,/e,/select, c:\</DIV>
<DIV> </DIV>
<DIV>To start with desktop:</DIV>
<DIV> </DIV>
<DIV>%SystemRoot%\explorer.exe /e,%USERPROFILE%\Desktop</DIV>
<DIV> </DIV>
<DIV>– it can show the drive but doesn’t return the drive letter to Delphi as
it comes up as a separate process of course]</DIV>
<DIV> </DIV>
<DIV
style="FONT-FAMILY: 'Arial'; COLOR: rgb(0,0,0); FONT-SIZE: 10pt">John</DIV></DIV></DIV><BR><BR>__________
Information from ESET NOD32 Antivirus, version of virus signature database
6134 (20110519) __________<BR><BR>The message was checked by ESET NOD32
Antivirus.<BR><BR><A href="http://www.eset.com"
moz-do-not-send="true">http://www.eset.com</A><BR><PRE wrap=""><FIELDSET class=mimeAttachmentHeader></FIELDSET>
_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: <A class=moz-txt-link-abbreviated href="mailto:delphi@delphi.org.nz">delphi@delphi.org.nz</A>
Admin: <A class=moz-txt-link-freetext href="http://delphi.org.nz/mailman/listinfo/delphi">http://delphi.org.nz/mailman/listinfo/delphi</A>
Unsubscribe: send an email to <A class=moz-txt-link-abbreviated href="mailto:delphi-request@delphi.org.nz">delphi-request@delphi.org.nz</A> with Subject: unsubscribe
__________ Information from ESET NOD32 Antivirus, version of virus signature database 6134 (20110519) __________
The message was checked by ESET NOD32 Antivirus.
<A class=moz-txt-link-freetext href="http://www.eset.com">http://www.eset.com</A>
</PRE></BLOCKQUOTE><BR><BR>
<DIV class=moz-signature>-- <BR>Regards<BR><BR><B>Rohit Gupta</B><BR>B.E. Elec.,
M.E., Mem IEEE, Mem IET<BR>Technical Director<BR>Computer Fanatics
Ltd<BR><BR><B>Tel </B>4892280 <BR><B>Fax </B>4892290 <BR><B>Web </B><A
href="wlmailhtml:www.cfl.co.nz">www.cfl.co.nz</A><BR>
<HR>
This email and any attachments contain information, which is confidential and
may be subject to legal privilege and copyright. If you are not the intended
recipient, you must not use, distribute or copy this email or attachments. If
you have received this in error, please notify us immediately by return email
and then delete this email and any attachments.</DIV>
<P>
<HR>
_______________________________________________<BR>NZ Borland Developers Group -
Delphi mailing list<BR>Post: delphi@delphi.org.nz<BR>Admin:
http://delphi.org.nz/mailman/listinfo/delphi<BR>Unsubscribe: send an email to
delphi-request@delphi.org.nz with Subject:
unsubscribe<BR></DIV></DIV></DIV></BODY></HTML>