Delphi7.0怎么安装才能运行？如何delphi7获取xp、win7、vista系统下主板序列号

鼠标双击安装，DELPHI7下载文件应该是180M左右，如果太小可能不对，除非特别说明是精简版。如果下载的文件正确，一般是一个压缩包，例如RAR文件，打开后里面有许多文件，有一个叫做SETUP.EXE的，如果是这样，那就把文件解压缩到一个文件夹下，鼠标双击里面的SETUP.EXE文件既可完成安装。

这个问题让我来回答你吧，因为我用delphi7做这个有八九年历史了，一直用硬件序列号进行加密注册，所以还是有发言权的。又因为不要你的分数，所以就懒得登陆了。不过，答案你也会有点点失望，因为我没能解决你的问题。先说说主板吧，如果你是想做软件加密，这个你就死了心吧，因为主板的Bios没有统一格式，而且Bios版本不同，所用的存储格式也不尽相同，所以，你即使今天把获取市面上的所有主板序列号的函数都写好了，明天出新的主板，你的函数照样识别不了，获取主板序列号就失败了。那么什么最稳定呢？答案是硬盘序列号。其他那些什么网卡MAC、CPU序列号等等等等，都是不行的。只有硬盘序列号最稳定，几乎百分百成功，而且在VISTA和Win7下面不需要管理员权限都可以获取到。但是，硬盘种类也不少，比如有IDE的，有SATA一代、二代的，有SCSI的，要针对每种硬盘写对应的函数，这个工作量也不小。正因为这样，这种函数大多被做成了dll，商业出售。换句话说，你想用得专业，就请购买。因为人家专门研究这个，肯定也是要吃饭的。天下没有免费午餐的，即使有，也是不容易消化的。

一、 发起封面完成思绪 为了完成发起封面的效果，我们要在delphi中运用两个窗体。一个窗体A用于显现顺序的发起封面，而另一个为顺序的主窗体B包括了您所想象的种种功用。窗体A是一个非规则窗口，其标题栏及最大化、最小化按钮和边框都被屏蔽掉了，其用一个Image控件装载一个图片文件来显现顺序的封面，并用一个timer控件完成该窗口的定时封锁。为了便利顺序运用者快速跳过发起封面直接进入顺序主窗体，我们还要设置一个click事情来封锁窗体A并调用主窗体B。 二、操作详细方法 1、 请先在delphi6。0中创立一个运用顺序及主窗体。选择主菜单下的File。New。Application命令，这个操作将创立一个运用顺序和一个主窗体。随后将主窗体的name属性由form1改为Ma。rm，主窗体的其他状况在此不详述，请依据您所想象的运用顺序功用自行操作。 2、 制造顺序发起封面的图片。图片的大小您应当细细考虑一下，为此笔者还特地将foxmail4。0的发起封面用抓图软件抓了下去，在绘图软件中细细丈量了一下。其大小为380×240，笔者觉得foxmail这款主流软件在想象发起封面的大小时肯定停止过周全的考虑。故建议您也采用这个尺寸，当然您也可以自行设置发起封面的大小。（请考虑当今盛行的屏幕主区分率是800×600）在制造发起封面时要考虑您所编制软件的功用及称号，软件的封面是给人的第一印象。假设您的软件是要在市场上推行的话，建议您找专业的美工想象师来想象一番为好！笔者在此偷懒了一番，随意去因特网抓了一幅景色画用paint shop pro减少了图片的尺寸便做为了封面。另外图片的格式最好为gif或许jpg格式，这样在编译进去的顺序不致于太肥。 3、 增加封面窗体，请点击delphi工具栏中的new form按钮。创立一个新窗体，并在其上增加一个 Image控件，并且选中Image控件并在属性框中找到picture属性点左边的小按钮。在弹出的图像编辑窗口中，单击load键载入您所制造的封面。然后将Image控件的Autosize属性设为True，这样Image控件便能自动顺应图片的大小了。为了完成发起封面的定时封锁，再增加一个Timer控件，将其enable属性设为true以触发ontimer事情，Interval属性设为5000(即5秒)，这两项属性操作便是在窗体显现5秒后触发ontimer事情来封锁窗口。 图一 4、 设置封面窗体属性使之契合发起封面恳求。请修正下列封面窗体属性： Position = PoscreenCenter 。。运转时居于屏幕中央 Autosize = true 。。自动顺应Image控件，使发起图片完整显现 BorderStyle = bsnone 。。窗口无标题栏及最大化、最小化及封锁按钮和边框 Name = splashform 三、 顺序代码解析 选择主菜单下的Project。View Scource 命令，翻开这个项手段项目文件。依据下列代码停止修正。 program Project2; uses Forms,Controls, Unit1 in ’Unit1。pas’ {MainForm}, Unit2 in ’Unit2。pas’ {SplashForm}; {$R *。res} begin Application。Initialize; SplashForm :=TSplashForm。Create(Application); 。。创立splash窗体 SplashForm。ShowModal; 。。以形式对话框的方式显现splash窗体 if (SplashForm。ModalResult = mrOK) then 。。假设定经常间到或单击了窗体上的图形 begin Application。Title := ’测试Splash窗体’; 。。设置运用顺序的标题 Application。CreateForm(TMainForm, MainForm); 。。自动方式创立的主窗体 SplashForm。Hide; 。。将发起封面窗体隐藏 SplashForm。Release; 。。将发起封面窗体肃清 Application。Run; end; end。 随后在splash窗体上编写下列事情代码 procedure TSplashForm。Timer1Timer(Sender: TObject); begin SplashForm。ModalResult:= mrOK; 。。定经常辰到后的事情处置顺序 end; procedure TSplashForm。Image1Click(Sender: TObject); begin SplashForm。ModalResult:= mrOK; 。。单击splash窗体上图像的事情处置顺序 end; 2011-10-24 5:53:18