<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=us-ascii">
<META content="MSHTML 6.00.6000.16705" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV dir=ltr align=left><SPAN class=125444521-23112008><FONT face=Arial
size=2>Hi John,</FONT></SPAN></DIV>
<DIV dir=ltr align=left><SPAN class=125444521-23112008><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV dir=ltr align=left><SPAN class=125444521-23112008><FONT face=Arial
size=2>I've had customers report this same problem, I just ask them to put any
dvd into the drive and then it works. Our software doesnt even try to
access the dvd drives so it looks like a vista issue?</FONT></SPAN></DIV>
<DIV dir=ltr align=left><SPAN class=125444521-23112008><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV align=left>
<DIV align=left><FONT face=Arial size=2>Regards</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV style="WIDTH: 231px; HEIGHT: 16px"><FONT face=Arial size=2>Richard
Bullin</FONT></DIV>
<DIV style="WIDTH: 551px; HEIGHT: 16px"><FONT face=Arial size=2>B.E.(Hons) -
Mechatronics
</FONT></DIV>
<DIV style="WIDTH: 461px; HEIGHT: 74px"><FONT face=Arial size=2>Lowman
Consulting Ltd
</FONT>
<DIV><FONT face=Arial
size=2><STRONG>Ph</STRONG> +64 9 535
8647</FONT></DIV>
<DIV style="WIDTH: 461px; HEIGHT: 16px"><FONT face=Arial
size=2><STRONG>Cell</STRONG> +64 21 053
6127</FONT></DIV>
<DIV><FONT face=Arial size=2><STRONG>Skype</STRONG>
Richard.Bullin</FONT></DIV>
<DIV><FONT face=Arial size=2><STRONG>Web</STRONG> <A
href="http://www.framecad.com/">www.framecad.com</A></FONT></DIV></DIV></DIV>
<DIV> </DIV><BR>
<DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left>
<HR tabIndex=-1>
<FONT face=Tahoma size=2><B>From:</B> delphi-bounces@delphi.org.nz
[mailto:delphi-bounces@delphi.org.nz] <B>On Behalf Of </B>John
Bird<BR><B>Sent:</B> Friday, 21 November 2008 8:55 p.m.<BR><B>To:</B> NZ Borland
Developers Group - Delphi List<BR><B>Subject:</B> [DUG] Error message starting
Delphi program on Vista<BR></FONT><BR></DIV>
<DIV></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT><FONT face=Arial color=#000000
size=2>Can anyone shed light on this?</FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2>I have one program that is prone to
getting an exception dialog when it starts on Vista.</FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2>The dialog is </FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2>Windows - No Disk</FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2>Exception processing Message
0xc0000013 Parameters 0x764292A0</FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2>0x00000004 0x764292A0
0x764292A0</FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2>I think its a Vista problem because
the program does this whether inside or outside the IDE, and it disappears if
the PC is rebooted, and returns later. Is it trying to access one of the
other drive letters such as a card reader (there is one on this
PC)?</FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2>There are also references to this on
the web, eg</FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2><A
href="http://forums.microsoft.com/TechNet/ShowPost.aspx?PostID=1621609&SiteID=17">http://forums.microsoft.com/TechNet/ShowPost.aspx?PostID=1621609&SiteID=17</A></FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2>where people are just guessing, which
suggests amongst others problems with USB or removable disk
drivers.</FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV>
<DIV><FONT face=Arial color=#000000 size=2>This program is checking free hard
disk space on start up with code like below:</FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2>(But I don't think its even getting
this far - it</FONT><FONT face=Arial color=#000000 size=2> is based
on some code I found on the net - and it gives the
error message even if the code is commented out)</FONT></DIV></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#000000 size=2>procedure xcDiskStats(Drive: string;
var aTotalDisk: real; var aDiskUsed: Real; var aDiskFree: real; var
aDiskPercentFree: integer; var aStat: string);<BR>var<BR> ldisk:
string;<BR> ldiskchar: char;<BR> lTotalDiskMB: Real;<BR>
lDiskFreeMB: Real;<BR>begin<BR> try<BR> ldisk :=
uppercase(copy(Drive, 1, 1));<BR> lDiskChar :=
Ldisk[1];<BR> aDiskFree := DiskFree(Ord(ldiskChar) -
64);<BR> aTotalDisk := DiskSize(Ord(ldiskChar) -
64);<BR> aDiskUsed := ATotalDisk - ADiskFree;<BR>
finally<BR> aStat:='';<BR> end;<BR> if aTotalDisk
> 0 then<BR> begin<BR> aDiskPercentFree :=
round((aDiskFree / aTotalDisk) * 100);<BR> end;<BR> lTotalDiskMB :=
aTotalDisk / (1024 * 1024);<BR> lDiskFreeMB := aDiskFree / (1024 *
1024);<BR> aStat := 'Disk Total=' + trim(format('%10.2f', [lTotalDiskMB]))
+ 'MB'<BR> + ' Disk Free=' + trim(format('%10.2f',
[lDiskFreeMB])) + 'MB'<BR> + ' Free=' +
inttostr(aDiskPercentFree) + '%';<BR>end;<BR></FONT></DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV>
<DIV>John</DIV>
<DIV><FONT face=Arial color=#000000 size=2></FONT> </DIV></BODY></HTML>