1.在 Caption 中写上 "Click me ( &C ) ",这样就给这个组件添加了响应事件。按快捷键” Alt + C “和单击组件的效果一模一样。
2.可以通过 project --- 》 view Resource 来查看工程源代码,也可以通过点击工具栏中(两个文件折叠在一起的)按钮来打开单元。可以打开工程文件和单元文件
但是建议不要轻易修改工程文件,应该由Delphi工具自动维护工程文件。
3.单元文件中接口部分的作用
这一部分定义了程序中其他部分可以访问的函数,过程和数据, 在接口部分还可以定义类型,常量,变量,这些内容在其他单元中都是可以访问的。
4.在实现部分,也可以定义类型,常数和变量,但是在这部分定义的内容只能在本单元中访问,如果函数和过程没有在接口部分声明,则这些函数只能在本单元总访问,如果需要在外部访问这些函数。必须在接口中对之进行声明。
5. Uses,应用其他单元,两个单元不能在接口的Uses中相互引用。
6.资源文件
资源文件可以将应用程序用到的资源资源(如声音,图像)包含进来,应用程序调用资源文件编译后,可以将资源编译到.exe文件中。
8.有的代码中有些变量没有定义,运行的时候会报错,这时候我们可以查看winSDK API,查看函数的返回类型,然后在变量里进行定义,就可以运行了,嘎嘎。
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls,MMSystem;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
{$R system.res} //在此声明Sound.res资源文件 、
//播放音乐文件
procedure TForm1.Button1Click(Sender: TObject);
var
hResInfo :THandle; //资源信息句柄
hres : THandle;
ptrsound : Pointer;
begin
//查找资源的函数,各个参数的作用。资源模块句柄,资源名和资源类型
hResInfo := FindResource(HInstance,'sound','wav');
hRes := loadResource(HInstance,hResInfo);
if hres > 32 then
begin
ptrsound := lockresource(hRes);
end;
sndPlaySound(ptrsound,SND_ASYNC or SND_MEMORY);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Application.Terminate;
end;
end.
7.可以使用 Ctrl + Y 来删除一整行,在 Eclipes 中用的是 Ctrl + D;