新开始学delphi,有几个指针总是不明白:) ( 积分: 100 )

  • 主题发起人 everhappy
  • 开始时间
E

everhappy

Unregistered / Unconfirmed
GUEST, unregistred user!
function ReadFlashData(ComDevice:String;
Stream:TStream):Boolean;
begin
with TDialogCommGetData.Create(Application)do
...
这里的Application指的是什么?当前工程?
function ShowExecuteDialog(Caller:TForm;
Cancel:pBoolean):HWND;
var
F:TDialogExecuteCommand;
begin
F:=TDialogExecuteCommand.Create(Caller);
什么时候在create函数中调用调用的句柄?有时还用Create(nil)什么的?
procedure TFormMain.btnManagerClick(Sender: TObject);
var
F:TFormManager;
begin
F:=TFormManager.Create(Self);
Self应该是指TFormManager而不是TFormMain?
什么都不懂,读不知道怎么提问了:)
 
function ReadFlashData(ComDevice:String;
Stream:TStream):Boolean;
begin
with TDialogCommGetData.Create(Application)do
...
这里的Application指的是什么?当前工程?
function ShowExecuteDialog(Caller:TForm;
Cancel:pBoolean):HWND;
var
F:TDialogExecuteCommand;
begin
F:=TDialogExecuteCommand.Create(Caller);
什么时候在create函数中调用调用的句柄?有时还用Create(nil)什么的?
procedure TFormMain.btnManagerClick(Sender: TObject);
var
F:TFormManager;
begin
F:=TFormManager.Create(Self);
Self应该是指TFormManager而不是TFormMain?
什么都不懂,读不知道怎么提问了:)
 
function ReadFlashData(ComDevice:String;
Stream:TStream):Boolean;
begin
with TDialogCommGetData.Create(Application)do
...
这里的Application指的是什么?当前工程?
->本应用程序的实例,它由delphi自动帮我们创建了
function ShowExecuteDialog(Caller:TForm;
Cancel:pBoolean):HWND;
var
F:TDialogExecuteCommand;
begin
F:=TDialogExecuteCommand.Create(Caller);
什么时候在create函数中调用调用的句柄?有时还用Create(nil)什么的?
->继承自TComponent的对象的create方法都包含一个的Owner参数
->如果你指定它,Owner释放时,会同时释放它所拥有的对象
->如果你使用nil作为owner,则自己要考虑对象释放问题
procedure TFormMain.btnManagerClick(Sender: TObject);
var
F:TFormManager;
begin
F:=TFormManager.Create(Self);
Self应该是指TFormManager而不是TFormMain?
什么都不懂,读不知道怎么提问了:)
->Self在这里指TFormMain
不在这里说太多,自己多看一下Object pascal参考
未理解前,就先照别人的葫芦画瓢
 
Create 有三种情况
Create(Application)
Create(nil)
Create(Self)
下面摘抄的这段文字会有所帮助的:
一、Owner和Parent的区别:
  Parent属性是指构件的包容器,构件只能在此范围内显示和移动。举例子如下:
  (1)在Form1的窗体上,放一个Panel1,并将Panel1拉大,
  (2)在Panel1上放一Button1;
  (3)在Form1上放一Button2。
  现在如果移动Panel1,则Button1随着Panel1移动,这是因为Button1的Parent是Panel1。
现在将Button2移到Panel1上,再次移动Panel1,Button2并不跟着移动,这是因为Button2的
Parent是Form1。除在窗体设计中,应注意构件的Parent是谁外,在动态创建构件时,也应
指出构件的Parent,如在上例中继续操作:
  1)Procedure Tform1.Button2click(Sender:Tobjet);

  2)Var
  3) Button:Tbutton;

  4) begin

  5) Button:Tbutton.cerate(self);

  6) Button.parent=panel1;

  7) Button.lleft=0;

  8) Button.top=0;

  9) Button.caption:='OK';

  10) End;
  当按Button2时,将在Panel1上创建一个Button,而如果把第6句改为Button.parent:=self;
按Button2时,将在Form1上创建一个Button了。如果将第6句删除,按Button2时,什么都不
会发生,这是因为创建方法无法知道应在哪里显示构件。
  Owner属性是指构件的所有者,它负责构件的创建和释放。如在上例中,系统默认窗体
上所有构件的所有者是窗体,而窗体的所有者是Application。顺便指出,create方法应带
有表示构件所有者的参数,如在上例中,构件所有者是窗体,即self。
  Parent属性和Owner属性是运行阶段的属性,只能在运行阶段,通过代码设置。
  
二、Self和Sender的区别:
  在事件处理程序参数表中,至少含有一个参数Sender,它代表触发事件处理程序的构件,
如在上例中,Sender就指Button2,有了Sender参数,可以使多个构件共用相同的事件处理
程序,如下例:
  Procedure Tform1.Buttonclick(Sender:Tobject);

  begin

  If sender=button1 then

  Label1.caption:=′看庭前花开花落′  else
Label2.caption:=′望天上云卷云舒′
  End;
  在此例中,Button1,Button2共用了Buttonclick事件处理程序。
  Self是指所编的程序范围是在哪一个类中,Delphi中大都在窗体范围内编程,因此,
self即指窗体,如果在编写一个类或是一个组件,则self指该类或组件。我们在函数或过
程的声明中可看出self是代表哪个组件,即self代表‘.’号之前的组件,如在第一个例子
中,self代表Tform1。另外应注意,self只能用在类方法中,而不能用在过程或函数中,
如下例用法是错的:Function a1(B:Integer):Integer;

  begin

  ……
  Button:=tbutton.create(self);……
  End;  
 
Application就是指当前程序,如在Create()中指定Application,则创建的对象由Application负责销毁,你可以不必管
我想你可以先找本较全面的书来看
 
谢谢各位:)
可能我看书看的太不仔细了:)
 
顶部