delphi例程-应用程序级信息
- 格式:doc
- 大小:15.94 KB
- 文档页数:12
DelphiApplicationMessagebox参数详解及应用实例DelphiApplication MessageboxApplication.MessageBox 是 TApplication 的成员函数,宣告如下:function TApplication.MessageBox(const Text,Caption: PChar; Flags: Longint): Integer;自变量:1. Text:要显示的讯息2. Caption:讯息窗口的标题列文字3. Flags:讯息旗标3.1. 可指定讯息窗口上的图标3.2. 可指定讯息窗口出现的按钮3.3. 可指定预设Focus在哪一个按钮3.4. 可指定是否 Modal3.5. 其它自变量说明:Text、Caption 自变量为 PCahr 型态,字符串型态的变量可用 PChar()转换,若直接传入一个字符串的话,就不用转型。
例如:var s: string;....s := '存档失败';Application.MessageBox(PChar(s), '错误', MB_ICONERROR);Flag 自变量为 Longint 型态,可用的传入值有:1. 指定讯息窗口上的图标1.1 MB_ICONEXCLAMATION 或 MB_ICONWARNING出现「黄三角形内有一个惊叹号」图示1.2 MB_ICONINFORMATION 或 MB_ICONASTERISK出现「白色椭圆内有一个蓝色小写 i」图示1.3 MB_ICONQUESTION出现「问号」图示1.4 MB_ICONSTOP 或 MB_ICONERROR 或 MB_ICONHAND出现「红色X」图示2. 指定讯息窗口出现的按钮2.1 MB_ABORTRETRYIGNORE出现「Abort」「Retry」「Ignore」三个按钮2.2 MB_OK出现「Ok」按钮,为默认值。
Delphi程序加密示例以下为具有读写、限时功能的五型加密锁加密示例加密对象Delphi环境下编写的程序(DelphiSample),在本例中DelphiSample是一个简单的界面程序。
加密目的对DelphiSample程序进行内嵌加密后,只有通过对应的加密锁才能打开DelphiSample 程序(即显示界面),否则不能打开。
通过限时控制(设定一至三个期限及解开期限的相应密码),控制用户的使用期限;达到加密强度高、程序运行稳定、使用便捷的目的;加密工具五型加密锁(序列号617622)、随锁KEY值(key1=51004,key2=11410,key3=46486,key4=12938)、动态库CDLL5.dll、CDLL5.lib、接口程序、读写函数、密码修改工具、限时限次工具等;加密准备先开发一个程序write来向加密锁中相应的地址写入数据。
现在向加密锁中的1号地址(该锁有32个地址,可任选)写入数据”12345”。
步骤如下:1、将CDLL5.dll复制到write的同一目录下; (参见步骤三)2、在程序代码code中定义动态库函数;(参见步骤四)3、写入数据程序代码,并运行:password : ='abcdefgh';LockAddr: =1;Lockdata: =12345;WriteLock(LockAddr,Lockdata,password);4、成功写入数据后关闭该程序。
加密过程步骤一:首先在Delphi6.0环境下打开DelphiSample程序,运行几次,确保程序正常运行。
确定加密位置,现在根据需要确定在界面运行前进行加密。
步骤二:将光盘中的所有文件拷贝到计算机硬盘上,打开tools,使用工具ModPassw修改密码。
新密码值根据个人需要设置,这里我把它设置为“009lirog”。
步骤三:通过路径:\内嵌加密\实例\ Delphi\代码找到CDLL5.dll并将CDLL5.dll复制到DelphiSample的同一目录下。
使用Delphi进行Windows应用程序开发教程第一章: Delphi简介Delphi是一种集成开发环境(IDE),用于编写Windows上的应用程序。
它基于Pascal语言,并提供了丰富的库和组件,使开发人员能够快速构建功能强大的应用程序。
在本教程中,我们将介绍Delphi的基本概念和工具,以帮助您入门。
第二章:环境设置在开始编写Delphi应用程序之前,我们需要设置开发环境。
首先,下载并安装Delphi IDE。
然后,我们将通过设置项目选项来配置编译器和调试器,以确保我们的应用程序能够顺利运行。
第三章:界面设计一个成功的应用程序离不开良好的用户界面设计。
Delphi提供了丰富的可视化设计工具,如窗体设计器和组件面板,帮助开发人员创建吸引人且易于使用的界面。
在本章中,我们将学习如何添加控件、设置属性以及处理事件。
第四章:数据操作应用程序通常需要与数据库进行交互,以存储和检索数据。
Delphi通过提供数据库连接组件和数据集组件,使得数据操作变得轻松。
我们将学习如何连接和配置数据库,以及如何使用数据集组件执行查询和更新操作。
第五章:文件操作文件操作是应用程序中常见的任务之一。
Delphi提供了用于文件操作的各种函数和组件,如文件读写和文件夹操作等。
我们将演示如何使用这些功能来读取、写入和管理文件。
第六章:多媒体处理现代应用程序通常涉及到音频、视频和图像处理。
Delphi提供了用于多媒体处理的组件和库,如音频播放器、视频解码器和图像处理功能。
我们将学习如何使用这些组件来实现音频、视频和图像的播放、录制和编辑。
第七章:网络通讯在互联网时代,网络通讯在应用程序中变得越来越重要。
Delphi提供了强大的网络编程库,如Socket和HTTP组件,使开发人员能够轻松地与服务器进行通讯。
我们将介绍如何使用这些组件来实现网络通讯功能。
第八章:调试和测试调试和测试是开发过程中必不可少的步骤。
Delphi提供了强大的调试工具,如断点和单步调试器,以帮助开发人员快速定位和解决问题。
delphi中的应用程序文件和工程管理器delphi中的应用程序、文件和工程管理器申请、文件和项目经理一.工程Delphi项目由表单、单元、选项设置、资源等组成。
在设计应用程序时,Delphi会生成以下文件:工程文件(.dpr):这个文件用于保存有关窗体和单元的信息,在这里也可找到初始化代码。
单位文件(.PAS):该文件用于存储代码。
有些单位与形式有关;有些只存储函数和过程。
许多Delphi函数和过程都存储在单元格中。
窗体文件(.dfm):这是由delphi产生的二进制文件,用于储存有关窗体的信息。
每个窗体文件都有一个与之相对应的单元(.pas)文件。
例如,myform.pas文件拥有一个叫做myform.dfm文件与其相联系。
项目选项文件(.DFO):项目选项设置存储在此文件中。
包信息文件(.DRF):这是Delphi使用包创建的二进制文件。
资源文件(.RES):这个二进制文件包含项目使用的图标。
用户不应更改或创建此文件。
Delphi不断更新和重建此文件。
备份文件(.~dp,.~df,.~pa):它们分别是工程、窗体和单元文件的备份文件。
编译器生成下列文件:可执行文件(.exe):这是应用程序的可执行文件。
除非使用了含在dll、ocx等中的库,否则,这个文件是不需要其他任何内容的独立的可执行文件。
单位目标文件(.DCU):该文件是单位文件(.PAS)的编译版本。
它将连接到最后一个可执行文件。
动态连接库文件(.dll):如果设计了你自己的dll,那么就产生这个文件。
可以用于delphi的其他windows文件如下:帮助文件(.hlp):在delphi应用程序中可利用标准的windowshelp文件。
图像或图形文件(.wmf,.bmp,.ico):这些文件通常用于windows应用程序中来创建具有吸引力和用户友好的应用程序。
二.窗体Delphi应用程序(以及大多数Windows应用程序)以表单为中心。
《DELPHI应用程序设计》实验指导书枣庄学院计算机系2007年9月实验1 DELPHI可视化开发环境实验学时:2学时背景知识:集成开发环境、窗体程序特点。
目的要求:1. 基本掌握Delphi编译环境。
2. 简单了解窗体程序运行特点。
实验内容:1.在一个窗体上建立一个按钮,要求用户每单击一次按钮,按钮的高度增加一倍。
1)新建项目文件File → New → Application2)设计窗体3)创建一个按钮,并拖到合适的位置和大小4)编写按钮单击响应代码5)双击按钮,输入如下代码:Button1.Height:=Button1.Height*2;6)执行程序2.建立一个应用程序,要求在一个窗口上显示一个Delphi系统提供的Customer.db数据表,并对此表具有浏览、编辑、修改、删除表中记录的功能。
其中Customer.db数据表在DBDEMOS所指定的数据库中。
1)新建项目文件2)设计窗体在组件面板上选择Data Controls标签,创建两个控件DBGrid1、DbNavigator1;在BED上选择table组件,命名为table1;DataAccess上选择datasource组件,命名为datasource13)设置组件属性设置table1的databasename属性为dbdemos,tablename为customer.db,active为true;设置datasource1的dataset属性为table1;设置dbgrid1和dbnavigator1的datasource1属性为datasource14)执行程序实验说明:1. Form1主窗体是由系统缺省创建。
2. 窗体文件和单元文件一一对应。
3. 编写Button1点击事件既可由双击按钮产生,也可在对象观察器中点击按钮时间产生。
注意问题:1.要清晰了解项目文件和单元文件结构。
2.注意用户自己输入代码位置及其作用。
3.组件之间的连接方式及其产生的作用。
delphi excel 例程Delphi Excel 例程:一步一步回答在Delphi中,我们可以使用Excel 例程来实现与Excel文件的交互。
Excel 例程是一组可以通过Delphi编程语言来操作Excel文件的方法和函数。
本文将介绍如何使用Delphi和Excel 例程来创建、读取、写入和操作Excel 文件。
第一步:安装Excel 例程要开始使用Delphi和Excel 例程,我们首先需要安装Excel 例程库。
这可以通过三种方法之一来实现:1. 使用ActiveX组件:在Delphi IDE的“Component”菜单下,选择“Import ActiveX Control”。
在弹出的窗口中,选择“Microsoft Excel xx.x Object Library”(其中"xx.x"表示Excel版本号),然后点击“Install”按钮进行安装。
2. 使用第三方库:你还可以使用第三方库,如TExcelComponent或Flexcel,它们提供了更多的功能和灵活性。
3. 编写自己的Excel 例程:如果你对编程充满信心,你可以自己编写一组Excel 例程,以与Excel文件交互。
不过,这需要一些时间和努力。
第二步:创建一个新的Excel文件在使用Delphi和Excel 例程之前,我们首先需要创建一个Excel文件。
下面是示例代码,展示了如何使用Excel 例程来创建和保存一个新的Excel文件:delphivarExcelApp: Variant;ExcelWorkbook: Variant;ExcelWorksheet: Variant;begin创建Excel应用程序对象ExcelApp := CreateOleObject('Excel.Application');创建一个新的工作簿ExcelWorkbook := ExcelApp.Workbooks.Add;获取第一个工作表ExcelWorksheet := ExcelWorkbook.Worksheets.Item[1];设置单元格的值ExcelWorksheet.Cells[1, 1].Value := 'Hello'; ExcelWorksheet.Cells[1, 2].Value := 'World!';保存工作簿ExcelWorkbook.SaveAs('C:\NewExcelFile.xlsx');关闭Excel应用程序ExcelApp.Quit;end;通过这段代码,我们可以创建一个新的Excel应用程序对象,并在其中创建一个新的工作簿。
DELPHI基础教程:Delphi开发数据库应用程序概述(一)[2]其他语言用于开发数据库应用程序的语言中还可以使用目前数常见的面向对象程序设计(OOP)语言如C++ Objact Pascal等 OOP代表了一种完全不同的程序设计方法在这种程序设计方法中活动被定义为在对象上发生的操作而不是作为一系列过程来定义的在数据库应用程序中使用OOP语言的情况正在不断增加开发数据库应用程序使用的另一种语言是宏语言宏语言不是一种完全的程序设计语言它实际上是一个用户手工输入的表这个表被输入到应用程序中以便自动执行一定的任务对于某个特定应用的高级语言宏语言通常可以在低档DBMS软件中或数据库服务器的前端中找到最后还有一种 Query By Example (QBE 范例查询)语言严格地讲QBE不是一种语言它是面向用户提供了一个或多个空表的界面这些空表对应于数据库中的表用户可以通过键盘选择需要查询的列并在适当的列中填入条件从而定义查询的检索条件然后DBMS就把QBE 转换成相应的动作以完成用户要求的查询任务Delphi的数据库特性及功能简介直到目前为止计算机软件的开发分为两个不同的体系其中一个体系是使用传统的程序设计语言(如Pascal Basic和C等)开发数值控制数值运算等软件围绕它们的重点是算术数据结构以及近年产生的面向对象技术另一个体系则是通用的数据库管理软件领域(数据库应用程序的开发)这两个体系的发展都极为迅猛但是二者并没出现混合渗透迹象如果使用数据库语言进行传统的算术编程虽然也能完成相应的功能但是其编程过程可能极为复杂如果使用传统的编程语言进行数据库编程通过调用专用的数据库应用程序接口函数和过程利用这些函数和过程提供的功能可能也能做得比较完善但这做起来大多是极其困难的而Delphi结合了两个体系的优点它结合了传统的编程语言Object Pascal和数据库语言的强大功能它即可以用于传统的算术编程又可以用于数据库编程特别是Delphi具有强大的数据库功能利用Delphi的数据库工具我们根本不需要编写任何Object Pascal代码便可以创建一个简单的数据库应用Delphi是Borland公司于年底发布的用于开发数据库应用程序的工具它是面向对象的它是目前开发客户/服务器数据库应用程序的强有力的工具 Delphi在Window 以上版本的系统环境下运行目前具有两个版本Delphi的标准版本和客户/服务器版本标准版本包含一个Borland Database Engine的局部拷贝它允许用户创建能访问dBASE Paradox和Local InterBase 服务器的数据库应用它还支持具有 ODBC 接口的数据库 Delphi的客户/服务器版本包括Borland SQL Link 它能直接访问ORACLE SyBase 和Microsoft SQL Server Informix以及InterBase数据库服务器Delphi可以访问多种数据库管理系统的数据库凭借窗体(Forms)和报表(Reports) BDE(Borland Database Engine)可以访问诸如Paradox dBASE 本地InterBase 服务器的数据库也可以访问远程数据库服务器上的数据库(如ORACLE SyBase Informix等客户/服务器数据库中的数据库)或任何经ODBC(Open Database Connecticity)可访问的数据库管理系统中的数据库Delphi的数据库特性跟其他的应用程序一样 Delphi提供了许多部件以方便地创建数据库应用程序数据库对象的数据成员既可在设计阶段设置也可在运行阶段通过程序代码进行设置 Delphi的部件板上提供了两页数据库应用程序开发中所要使用的部件数据访问页(Data Access Page)上的部件用于直接访问数据库中的数据库表数据控制页(Data Control Page)上的部件用来与用户交互显示修改数据库中的数据数据库应用程序首先是利用Delphi提供的数据库部件与BDE建立联系然后再通过BDE与数据库联系下图阐述了Delphi的数据库工具和部件 Delphi数据库应用程序与BDE 数据源之间的关系下表概括了Delphi的数据库特性表 Delphi的数据库特性━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━工具和部件主要用途──────────────────────────────────────Data Access Components 访问数据库数据库表存贮过程等──────────────────────────────────────Data Control Components 与用户交互提供显示修改数据库中数据的界面──────────────────────────────────────Database Desktop(DBD)建立索引查询数据库表以及访问编辑来自各数据中的数据──────────────────────────────────────ReportSmith 建立浏览和打印数据库表中的数据──────────────────────────────────────Borland Database Engine 数据库应用通过BDE访问dBASE Paradox数据库中的数据(BDE)和本地InterBase数据库服务器中的数据──────────────────────────────────────BDE Configuration 建立和管理BDE与数据库建立连接时所使用的数据库的Utility 别名──────────────────────────────────────Local InterBase Server 它是一个单用户多例程的本地SQL数据库服务器可在单机环境下用来开发或测试客户/服务器数据库应用程序然后再将之扩展成一个访问远程数据库服务器如ORACLE SyBase Informix等──────────────────────────────────────InterBase SQL Link 连接Delphi数据库应用程序一本地InterBase服务器的驱动程序Delphi上述这些特性使得我们创建数据库应用程序通过BDE能够很灵活地与 dBASE Paradox Local InterBase数据库服务器进行连接并可以方便地访问其中的数据我们在创建一个简单的数据库应用时通过使用Delphi提供的上述工具和部件甚至可以不需编写任何程序BDE被自动地包含在Delphi中因此我们在创建数据库应用程序时不必关心BDE的有关内容Delphi的安装程序自动为Paradox dBASE和本地InterBaseServer 安装相应的驱动程序并建立了有关的配置 DBE Configuration Utility 可以建立应用程序与数据库的连接信息还可以为数据库设置别名下表列出了Delphi开发Client/Server应用程序的有关特性这些特性扩展了Delphi访问远程数据库的功能如SQL数据库服务器(ORACLE SyBase Informix Microsoft SQL Server InterBase)表 Delphi Client/server数据库特性━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━工具主要用途─────────────────────────────────SQL Drivers SQL Drivers中的SQL link和ReportSmith为Delphi数据库应用程序提供了访问远程SQL服务器的驱动程序如访问ORACLE SyBase Microsoft SQL server Informix Intermix ─────────────────────────────────lishixinzhi/Article/program/Delphi/201311/25183。
delphi例程-应用程序级信息1.Application 变量(标准应用程序)描绘应用程序级的信息单元Formsvar Application: TApplication;描述默认地,当创建一个新的项目,Delphi会构造一个应用程序对象并将其赋给位于Forms单元中的Application变量。
Application拥有数个属性,在应用程序运行时可心用于得到关于应用程序的信息。
示例这段代码将在编辑框中显示你的项目的名称:procedure TForm1.Button1Click(Sender: TObject);beginEdit1.Text := Application.Title;end;2.CmdShow 变量CmdShow被传递给Windows API 函数ShowWindow。
单元Systemvar CmdShow: Integer;描述在程序中,当应用程序创建主窗口时,CmdShow变量包含了Windows 希望传递给ShowWindow 的参数值。
在库(DLL)中,CmdShow总是为0。
pilerVersion 常量指明了Delphi编译器的版本编号单元Systemconst CompilerVersion = 15.0;描述使用CompilerVersion可以测试Delphi编译器的统配级别。
如果你想条件化利用了Delphi语言更新特色的代码,这会很有用(This is useful if you want to conditionalize code that takes advantage of newer features in the Delphi language)。
4.ExitProcessProc 变量ExitProcessProc 指定在应用程序关闭(shut down)前最后执行的过程(procedure)。
单元Systemvar ExitProcessProc: procedure;描述赋值给ExitProcessProc 来指定你想在应用程序关闭前执行的过程。
ExitProcessProc 的值是一个没有参数的过程。
5.GetFileVersion 函数返回文件版本单元SysUtilsfunction GetFileVersion(const AFileName: string): Cardinal;描述GetFileVersion返回一个文件二进制版本号中最有意义的32位。
AFileName指定文件名,可以使用和LoadLibrary 函数相同的路径搜索到。
6.GetModuleName 函数返回给定句柄的模块的完全限定名称(fully qualified name)。
单元SysUtilsfunction GetModuleName(Module: HMODULE):string;描述调用GetModuleFileName来获得给定句柄的模块的完全限定名称。
Module是模块的句柄。
7.HInstance 变量句柄,由Windows提供给模块(module)。
单元SysInitvar HInstance: LongWord;描述HInstance 容纳了由Windows提供的应用程序或库的实例句柄8.HintWindowClass 变量指定用于显示帮助提示(help hint)的窗口的类。
单元Formsvar HintWindowClass: THintWindowClass = THintWindow;描述当应用程序显示帮助提示(Help Hint)时,它会创建一个HintWindowClass的实例来描绘用来显示提示的窗口。
应用程序通过创建THintWindow的派生类,然后在应用程序启动时将派生类赋予HintWindowClass变量,能够定制这个窗口。
9.InitProc 变量InitProc 是最后一个安装的初始化过程。
单元Systemvar InitProc: Pointer;描述赋值给InitProc来指定一个你想在应用程序启动时执行的过程。
InitProc是一个无参数过程。
例如:procedure MyInitProcedure;...initializationInitProc := @MyInitProcedure;beginend;只有一个初始化过程能够被赋予InitProc变量。
如果你的应用程序定义了多个初始化过程,仅最后一个赋予InitProc的会执行。
要允许其他初始化过程执行,你必须将过程“链接”到一起,从InitProc的新值中调用原先的值。
例如,下面来自ComObj单元的代码在赋新值前保存了InitProc原先的值,然后在新赋予的初始化过程中调用保存在值:SaveInitProc := InitProc;InitProc := @InitComObj;10.IsConsole 变量指示模块(module)是否作为控制台应用程序编译。
单元Systemvar IsConsole: Boolean;描述如果模块作为控制台应用程序编译,那么IsConsole变量为True。
同时在可执行文件和DLL中将为True(This will be True in both an executable and a DLL)。
11.IsLibrary 变量指示模块是否是一个DLL。
单元Systemvar IsLibrary: Boolean;描述如果模块是一个DLL,那么IsLibrary变量为True。
12.JITEnable 变量控制何时及时调度器会被调用(Controls when thejust-in-time debugger is called)。
单元Systemvar JITEnable: Byte = 0;描述使用JITEnable来指示什么类型的异常会触发及时调试器。
当JITEnable为0(默认值)时,所有的异常将使用应用程序的异常处理机制处理。
及时调试器仅当应用程序没有提供任何捕获异常的机制时被调用。
注意,除了Delphi单元中的初始化和结束化区,任何包含了Forms单元的应用程序都提供了异常处理(通过Application对象),不会触发及时调试器(Note that any application that includes the Forms unit provides exception handling (via the Application object) for all but the initialization and finalization sections and does not trigger the just-in-time debugger)。
当JITEnable为1时,任何非原生(non-native)异常(使用其他产品编译的代码引发的异常)。
都会触发及时调试器。
原生异常由应用程序的异常处理机制处理。
当JITEnable大于1时,所有的异常都会触发及时调试器。
注意:当你安装IDE时,它会被注册为及时调试器。
如果你安装了其他带调试器的工具,他们可能注册了自己,而覆盖了IDE的注册。
nguages 函数列出可用的支持区域(List the locale for which support is available)。
单元SysUtilsfunction Languages: TLanguages;描述使用由Languages返回的值可以获得系统支持的关于区域的信息。
这个函数仅可用在Windows平台14.MainInstance变量指示主要的可执行文件的实例句柄。
单元Systemvar MainInstance: LongWord;描述使用MainInstance来获得一个应用程序中主要的可执行文件的实例句柄。
在使用了运行时库或包的应用程序中,当你需要可执行文件而不是库的句柄时,这很有用。
注意:当从一个使用其他工具编译的可执行文件中运行一个CLX动态链接库(Windows)或者共享对象(Linux)时,不要使用MainInstance。
15.MainThreadID变量指示当前模块中主执行线程。
单元Systemvar MainThreadID: LongWord;描述使用MainThreadID来获得主执行线程(模块初始化时的当前线程)的线程ID。
在调试时,这个主线程ID显示在线程状态盒中。
在Windows上,MainThreadID的值和一些Win32API 调用所需要的线程ID是兼容的。
16.NoErrMsg变量控制当运行时错误发生时应用程序是否显示一个错误信息。
单元Systemvar NoErrMsg: Boolean = False;描述在Windows上,设置NoErrMsg来控制是否有一个消息显示来指出有一个运行时错误发生了。
当NoErrMsg为false(默认值)时,运行时错误会导致应用程序显示一个消息框来提出发生的错误的类型。
当NoErrMsg为true时,这些消息将被禁止。
在Linux上,NoErrMsg没有任何效果。
注意:SysUtils单元会将大部分的运行时错误转变成异常。
如果你的应用程序包含了SysUtils,那么即使NoErrMsg 是false,运行时错误消息框也未必会显示。
17.PopupList变量提供了对发向弹出菜单(popup menu)的Windows消息的集中处理单元Menusvar PopupList: TPopupList;描述使用PopupList可以访问应用程序中的全部弹出菜单或者访问响应弹出菜单消息的窗口的窗口句柄。
PopupList维持了在应用程序中创建的全部弹出菜单组件的列表。
这个列表保存一个集中处理发向这些弹出菜单的Windows消息的隐藏窗口的句柄。
18.RTLVersion常量指出Delphi运行时库的版本号。
单元Systemconst RTLVersion = 15.0;描述使用RTLVersion可以检查不依赖于编译器版本级别的Delphi运行时库的版本号。
19.Screen变量表现一个屏幕设备单元Formsvar Screen: TScreen;描述Screen变量是一个表现应用程序运行时所在系统的屏幕的TScreen组件。
默认地,应用程序会创建一个基于当前屏幕设备有关信息的屏幕组件并将其赋给Screen变量。
20.Win32Platform变量指定Win32平台的标识符单元SysUtilsvar Win32Platform: Integer = 0;描述Win32Platform用于标识系统运行的Win32平台的类型。