回 帖 发 新 帖 刷新版面

主题:这个到底什么意思啊

[em7]program gc219;

uses
  Forms,
  dy219 in 'dy219.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.



还有Edit3.Text:= IntToStr( add(StrToInt(Edit1.Text),StrToInt(Edit2.Text)));

大家帮助我解释下,要仔细点啊
谢谢各位

回复列表 (共1个回复)

沙发

从源代码上看,你这个程序的项目名称为gc219,而以上代码保存于gc219.dpr(注意扩展名),可以通过Project -> View Source来查看该文件中的内容。

  program关键字后是项目名称。

  uses后是项目所涉及到的单元名称及其文件名

    begin...end;是主体程序,用于控制程序的运行。

  Application是全局对象,它在Forms单元(这就是为什么在uses中有Forms单元的原因了),实际上Application也是一个Form,只是比较特殊,它的大小为0,而且在程序运行时是隐藏的,其他窗体以它为父窗体。

  Application.Initialize;执行初始化
  Application.Run;运行程序。
  其他具体做了些什么,可以参考它的源代码。

  Application.CreateForm(TForm1, Form1);告诉程序创造Form1窗体。因为Form1是第一个被创建的,程序一运行就显示Form1(但Form1不是主窗体,Application才是),当然DataModule就例外了。

  Edit3.Text:= IntToStr( add(StrToInt(Edit1.Text),StrToInt(Edit2.Text)));中是将Edit1.Text与Edit2.Text中的字符串先转换为整型,再相加,然后将结果转化为字符串,最后赋值给Edit3.Text。怀疑add方法是自已定义的。

我来回复

您尚未登录,请登录后再回复。点此登录或注册