delphi 开发技巧

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;

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值