怎么拍糖水片:舟--谁能大体解释一下这个程序吗?

来源：百度文库 编辑：中科新闻网 时间：2024/04/29 11:08:44
type
TForm1 = class(TForm)
private
{ Private declarations }
procedure WMEraseBkng(var Msg:TWMEraseBkgnd); message WM_ERASEBKGND;
end;

procedure TForm1.WMEraseBkng(var Msg: TWMEraseBkgnd);
begin
Msg.Result := 1;
end;

C语言吧？
type
TForm1 = class(TForm) //定义一个新类TForm1
private //私有变量定义开始
{ Private declarations } //定义declarations为私有变量
procedure WMEraseBkng(var Msg:TWMEraseBkgnd); message WM_ERASEBKGND; 申明一个函数WMEraseBkng 似乎是橡皮擦功能的函数
end; //函数结束

procedure TForm1.WMEraseBkng(var Msg: TWMEraseBkgnd); 具体定义TFrom1中的WMEraseBkng函数
begin
Msg.Result := 1; //函数主体
end;

舟--谁能大体解释一下这个程序吗? 谁能给我解释一下这个程序?? 谁能给我解释一下这个c程序阿？ pscp.exe这个程序的参数谁能解释一下 谁能解释一下这个 谁能解释一下这个 能解释一下宏程序吗 Net程序 谁能解释一下此程序！ 谁能解释一下这个错误? 谁能解释一下这个笑话