v1.5.0

Added SPTI support for NT based operating system.
Added SPTI/ASPI menu change option to select one of the access drives if available in the system.
Added refresh menu option wich refreshes all the information (useful when plugging external drives to recognise them without rerunning the program again).
Added screenshots option to save the program window into PNG image file (for main window and capability page).
Added summary page wich shows all the details about a drive in a text field.
Added new Toshiba drive model recognition (SD-R6012, SD-C2412,...).
Fixed a bug with Toshiba drive recognition if the drive was not really a Toshiba.
Improved SCSI drive detection (it's much faster now) and ability to view capabilities for those drives.
Improved capabilities page with new detection of +R(W) standard and other stuff wich are possible to read from the drives.

Author: Hijacker

About.cpp

@@ -0,0 +1,60 @@
+//---------------------------------------------------------------------------
+
+#include <vcl.h>
+#pragma hdrstop
+
+#include "About.h"
+//---------------------------------------------------------------------------
+#pragma package(smart_init)
+#pragma resource "*.dfm"
+TAbout_Box *About_Box;
+//---------------------------------------------------------------------------
+__fastcall TAbout_Box::TAbout_Box(TComponent* Owner)
+        : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TAbout_Box::About_CloseClick(TObject *Sender)
+{
+        TAbout_Box::Close();
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TAbout_Box::FormCreate(TObject *Sender)
+{
+        Label5->Caption=Application->Title;        
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TAbout_Box::Label3Click(TObject *Sender)
+{
+        ShellExecute(About_Box->Handle,"open","mailto:[email protected]?Subject=DISCInfo feedback","","",0);
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TAbout_Box::Label8Click(TObject *Sender)
+{
+        ShellExecute(About_Box->Handle,"open","url:http://www.rpc1.org","","",0);
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TAbout_Box::Label5Click(TObject *Sender)
+{
+        ShellExecute(About_Box->Handle,"open","url:http://discinfo.rpc1.org/","","",0);        
+}
+//---------------------------------------------------------------------------
+void __fastcall TAbout_Box::Image1Click(TObject *Sender)
+{
+    ShellExecute(About_Box->Handle,"open","url:http://store.yahoo.com/cgi-bin/clink?dvdsupply+HgqATs+index.html","","",0);    
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TAbout_Box::BitBtn1KeyPress(TObject *Sender, char &Key)
+{
+    if (Key == 'x' || Key == 'X' || Key == VK_ESCAPE)
+    {
+        TAbout_Box::Close();
+    }
+}
+//---------------------------------------------------------------------------
+