DELPHI基础教程
第一章 Delphi快速入门(五)
1.4.3.1 调用标准对话框
您可以发现,除了 Font,Find,Replace 对话框之外,其余标准对话框的 Events
在编制应用程序时,您可以先设计好主菜单。在需要使用标准对话框的菜单项的事件处理过程中,调用标准对话框的 Execute
1.4.3.2 OpenDialog 和 SaveDialog
OpenDialog(
if OpenDialog1.Execute then OpenDialog1.HistoryList.Insert(0,OpenDialog1.FileName); 1.4.3.3 ColorDialog 和 FontDialog 颜色对话框 ColorDialog
字体对话框 Font
以下的例程在窗体中先放置一个按钮 Button1
Procedure TForm1.Button1Click(Sender:TObject); begin FontDialog1.Execute; end; Procedure TForm1.FontDlgApply(Sender:Tobject); begin Button1.Font:= FontDialog1.Font; end; 1.4.3.4 PrintDialog 和 PrintSetupDiaog 打印对话框 PrintDialog
1.4.3.5 FindDialog 和 ReplaceDialog FindDialog 和 ReplaceDialog
1.5 使用 Delphi
Delphi 2.0 是完备的工程设计系统,除提供了大量的可视化编程部件和简单方便的设计方法外,还备有功能强大的工程管理、窗口设计工具。 1.5.1 创建多窗体工程项目 绝大多数的应用程序都用到不只一个窗口, Delphi
1.5.1.1 创建一个含有 About
作为例子,我们先创建一个含主窗体和简单的 About
在 Delphi
选用主菜单的 File|New
下面编程实现主窗体对 About 框的显示控制。很可能在设计时,两个窗体出现重叠, Form1
procedure TForm1.Button1Click(Sender: TObject); begin Form2.Show; end; 由于 Form1
在 About
Form2.ShowModal; 再运行程序,除了与上述功能相同显示 About
1.5.1.2 指定自动创建窗体 上面我们简单地生成了一个含 About 框的双窗体应用程序,运行时,应用程序启动时将自动创建第二个窗体。窗体保持隐蔽状态,但仍然占用 Windows
选用 Project|Options
图示为 Delphi
如果不需要自动创建窗体,使用箭头按钮把窗体移动到 Available
Forms 列表框中。自动创建的窗体可以用 Show
Begin EditForm := TeditForm.Create(Self); EditForm.Open(OpenFileDialog.Filename); EditForm.Visible := True; End; 也即,必须使用 Create
1.5.2 使用工程管理器 Project Manager 当窗体的数目逐步增加时,跟踪窗体以及与之相连的库单元代码就变得比较烦琐。用 Delphi
1.5.2.1 工程文件的组成 工程 (project) 是整个应用程序的源文件集合,这样的文件一共有三种: 1. 一个包含主程序部分的工程文件,用以驱动由 Delphi
2. 一个或多个窗体文件,它们含有相应的库单元文件。窗体文件的扩展名是 .DFM
3. Object Pascal
1.5.2.2 使用 Project Manager
选用 View|Project
Manager ,会调出 Project Manager 窗口。 Project Manager
Project Manager
1.5.3 使用窗体样板和对话框专家 在前文的例程中,我们创建了一个简单的 About
1.5.3.1 使用窗体样板创建窗体 创建一个新工程时, Delphi 为用户创建了一个新的空窗体。如果需要使用一个窗体样板,向工程中增加一个窗体。选用 File|New
1.5.3.2 存储自己的窗体样板 您可以在样板库中存储自己的窗体样板。首先创制一个窗体的样本,在窗体区域中单击鼠标的右键,可以调出窗体的加速菜单。选用 Add
To Repository... ,将弹出对话框。 在 Forms
再次打开 New
Items 对话框,您会发现您的窗体已经被存储成一个窗体样板。 1.5.3.3 使用对话框专家 Dialog Expert 对话框样板呈现了友好界面的被保存对话框,而对话框专家却能根据用户提供的信息,智能地创建复杂的对话框。 选用 File|New...
1.5.4 使用工程样板和应用专家 Delphi
1.5.4.1 使用工程样板 当您通过一个工程样板来开始一个工程时,除了空白工程样板外,都会被要求指定一个唯一的子目录即工程目录 Project
Directory ,用来存储新的工程。如果您指定一个不存在的目录, Delphi
选用 File|New ,在 New Items
1.5.4.2 使用应用专家 Application Expert 一个应用专家就是一个应用程序,它会依照您在一系列对话框中所设置的选项值来产生一个工程。 如果您想在打开一个工程时,利用应用专家来取代工程样板而成为缺省值,则使用 File|New
Delphi 会要求您输入您的工程文件名及它存储的唯一目录,并提示您选择应用程序是否使用 MDI