Delphi 双色球分析软件(1)

有一段时间没正经的用delphi了，前两天下载了Delphi2010，用它来找找Delphi的感觉，把写的一些东西共享出来，大家共同学习一下，呵呵。
我想做一个双色球的分析软件，以下是其中实现的部分类的单元文件，其他文件后续一点一点的补齐，有不妥的地方，希望大家指正，谢谢啦！
在使用Delphi2010是，发现个问题，在用show函数调用窗体时，主窗口总是在子窗口的下面。
{工具类单元，包括一些用到的辅助类定义}
unit uCustomUtils;
interface
uses
  Classes;
type
  TLottery = packed record
   {红球集合}
    RedBalls: TStringList;
    {篮球}
    BlueBall: string;
    {开奖期号}
    Period: string;
    {开奖时间}
    Time: string;
    {奇偶数比}
    OddEvenCompare: string;
    {大小比}
    BigSmallCompare: string;
    {和值}
    Sum: string;
  end;
  pLottery = ^TLottery;
implementation
end.
{数据库辅助单元，通过这个类去与数据库打交道,因为当前用到的是Access数据库，}
{所以继承了一个Access的类，其他数据库，可以再另行实现}
unit uDBHelper;
interface
uses
  Classes, ADODB, SysUtils, Windows,
  uCustomUtils;
const
  CONNECTION_STRING_ACCESS = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Persist Security Info=False';
type
  TDBHelper = class
  private
    FDBFilePath: string;
    FCommandText: string;
    FConnection: TADOConnection;
  public
    {执行Insert,Delete,Update操作}
    procedure Execute; virtual; abstract;
    {执行select操作}
    procedure SelectExecute; virtual; abstract;
    {打开数据库连接}
    procedure Open; virtual; abstract;
    {关闭数据库连接}
    procedure Close; virtual; abstract;
    {构造函数}
  &n