program Project1;uses
Forms,
Unit1 in 'Unit1.pas' {loginForm},
Unit2 in 'Unit2.pas' {mainForm},
Unit3 in 'Unit3.pas' {mainform2};{$R *.res}begin
Application.Initialize;
Application.Title := '合同管理系统';
Application.CreateForm(TloginForm, loginForm);
Application.CreateForm(TmainForm, mainForm);
Application.CreateForm(Tmainform2, mainform2);
Application.Run;
end.问题1:请问 在那个uses和{$R *.res}之间写的是什么东东啊? 为什么要那样写?
问题2:请问 Application.CreateForm(TloginForm, loginForm);是什么意思???
Application.Run;有什么用??
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, ADODB;type
TloginForm = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
i_user: TEdit;
i_passwd: TEdit;
Button1: TButton;
Button2: TButton;
ADOConnection1: TADOConnection;
ADOQuery1: TADOQuery;
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
loginForm: TloginForm;implementationuses Unit2, Unit3;{$R *.dfm}
问题3: 请问 interface 什么意思? 有什么用?
问题4: 请问 uses 接的那一大堆 是什么东东??
问题4: 请问 procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject); 这两句什么意思?
问题5: 请问 private { Private declarations }
public { Public declarations } 这是干吗? declarations
是啥意思??
implementation和{$R *.dfm}之间写的是什么东东?
这个和上面的uses.....{$R *.res} 都是干吗的呀????
严重申明: 我是Delphi初学者 什么都不懂 所以 请大家不吝赐教 希望大家在百忙中 抽出点点时间给予解答 尽量详细点 谢谢~~~
Forms,
Unit1 in 'Unit1.pas' {loginForm},
Unit2 in 'Unit2.pas' {mainForm},
Unit3 in 'Unit3.pas' {mainform2};{$R *.res}begin
Application.Initialize;
Application.Title := '合同管理系统';
Application.CreateForm(TloginForm, loginForm);
Application.CreateForm(TmainForm, mainForm);
Application.CreateForm(Tmainform2, mainform2);
Application.Run;
end.问题1:请问 在那个uses和{$R *.res}之间写的是什么东东啊? 为什么要那样写?
问题2:请问 Application.CreateForm(TloginForm, loginForm);是什么意思???
Application.Run;有什么用??
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, ADODB;type
TloginForm = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
i_user: TEdit;
i_passwd: TEdit;
Button1: TButton;
Button2: TButton;
ADOConnection1: TADOConnection;
ADOQuery1: TADOQuery;
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
loginForm: TloginForm;implementationuses Unit2, Unit3;{$R *.dfm}
问题3: 请问 interface 什么意思? 有什么用?
问题4: 请问 uses 接的那一大堆 是什么东东??
问题4: 请问 procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject); 这两句什么意思?
问题5: 请问 private { Private declarations }
public { Public declarations } 这是干吗? declarations
是啥意思??
implementation和{$R *.dfm}之间写的是什么东东?
这个和上面的uses.....{$R *.res} 都是干吗的呀????
严重申明: 我是Delphi初学者 什么都不懂 所以 请大家不吝赐教 希望大家在百忙中 抽出点点时间给予解答 尽量详细点 谢谢~~~
解决方案 »
- 为何Delphi 10 Lite 中sendmessage中TMsg域对应不对?
- 急,comboBox控件下拉框的内容如何动态从数据库中调啊?不用Items这个属性啊,谢谢
- 用wordapplication如何获得一个文档的页数?
- 串口通信?怎样用串口传送一个文件,选择文件后发送,不管文件的格式?网上的例子一般都是传送字符串?
- dbgrid问题急求解决
- 关于dbgrid 载数据修改后的刷新问题
- 怎么样取得一个句柄?
- 检查delphi或c++builder内存泄漏的工具?
- 如何在“文件”菜单中保留最近使用的文档。
- 又是FILTER的问题
- ABC 为ado连接,如下代码仍不能关闭ABC的连接,不知为什么?
- 如何在复制控件的时候,自动复制其代码?
这个几乎不用自己写!!在这里说明单元文件在软件中的位置,属于固定的
问题2:请问 Application.CreateForm(TloginForm, loginForm);是什么意思???
Application.Run;有什么用??
Application.CreateForm(TloginForm, loginForm);是创建窗体
Application.Run 工程开始运行
问题3: 请问 interface 什么意思? 有什么用?
是表面接口部分的意思,
问题4: 请问 uses 接的那一大堆 是什么东东??
当你添加控件时多数自动添加,是一些类
问题4: 请问 procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject); 这两句什么意思?
说的是两个过程是单击Button的
2.你有 Windows 编程的概念,就可知道 3,4
3.你有面向对象编程的思想,就知道5
uses 是程序所调用的api函数库把
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
这2个是分别对你的2个button控件的进程
declarations 声明的意思;
在那个uses和{$R *.res}之间不需要写东西
你只需要双击你选用的控件,它就会把鼠标落在需要添加代码的地方,很方便
Application.Run:运行程序
问题3: 请问 interface 什么意思? 有什么用?
问题4: 请问 uses 接的那一大堆是系统要用的东西,就像C中的include一样
问题4: 请问 procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject); 这两句是点击按钮激活的事件
问题1&:请问 在那个uses和{$R *.res}之间写的是什么东东啊? 为什么要那样写?
A:写的是这个工程所包含(需要)的单元,如,你的TLoginform在Unit1中,
在Application.CreateForm(TloginForm, loginForm);他就会在unit1中找到 TloginForm类,有点类似c中的.h文件
问题4: 请问 procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject); 这两句什么意思?
A:这相当于定义了一个过程,当用户按钮上单击时,会触发这个过程,至于实现细
节,你慢慢学习吧问题5: 请问 private { Private declarations }
public { Public declarations } 这是干吗? declarations
是啥意思??
implementation和{$R *.dfm}之间写的是什么东东?
这个和上面的uses.....{$R *.res} 都是干吗的呀????
{}这个是注释,没有多少意义,但{$R *.DFM}是指当编译单元里(类似的还有预编
译指令如:{$I}{$IFDEF}等等,这条语句会根据单元名自动找到窗体文件(*.dfm)或
资源文件(*.res) 如: Unit1.pas,它会加载同名的窗体unit1.dfm
implementation和{$R *.dfm}之间写的是什么东东?类似问题1,但有很多不同,如果unit2需要unit3,而其他需要Unit2单元不需要unit3,则d unit2中uses unit3一般写在implementation之后,而其他需要Unit2单元不需要unit3,则d unit2中uses unit3一般写在Interface之后
说的不好,以下热心人来指正
问题1:那段代码写明了这个工程的系统用户,说白了就是窗口单元和pascal文件单元
你需要明白的是:delphi程序包含有这样几个文件单元是你必须清楚的,dpr文件
是工程文件,它说明了这个工程的所有信息;.frm文件是窗口文件也就是
你看到了控件放置的那个窗口;.pas文件它是单元文件(unit)它存放了
所有的pascal语言的代码。一般来说一个.frm文件就一定对应一个.pas文件
。对于一个工程文件,它必须说明它的系统用 户,这就是的。
问题2:是应用程序的初始化,包括所有的窗口的创建,当这些完成后就是run,也就是应用
程序开始运行。一般来说如果你没有更改的话,那么几个form create的顺序就是你创
建的顺序,所以,这个工程一定有三个窗口。createform()括号中前一个只这个窗
口的类,后面的是这个窗口的名字。
问题4:uses指的是这个单元文件的系统用户(就如同工程也有自己的系统用户一样),其实
我的理解是系统用户就是说明了一些系统的资源。
问题5:privte和public是说你在privte下定义的变量是私有的,它只能在该单元中使用;
而你在public下定义的变量是公有的,它在整个工程中都是有用的。其他的单元文件
也可以使用。
var后说明的是这个单元文件对应的窗口文件的名称
uses后说明的:指明了这的单元文件(就是对应的窗口)所调用的单元,说白了就是
在本窗口中一定有某一个事件触发了另外两个窗口的显示。这非常有用,因为当你的
这个窗口因为某个需要调用另外的窗口出现的时候,就一定自动的在其后添加它的单
元文件的名称,但是当你不在需要时候你一定要手动的在这里删除它。
你要区别前面uses和后面的uses,前面的是指系统的“用户”,而后面的是指本单元所调用的用户所自己定义的“用户”。
我也是第一次来这里胡说,对于delphi也是门外汉,如果不对还请原谅
谢谢wojiaoliufeng(木喜) 谢谢 100分 给你了 呵呵 以后多多关照!!!!!!!
谢谢wojiaoliufeng(木喜) 谢谢 100分 给你了 呵呵 以后多多关照!!!!!!!
谢谢wojiaoliufeng(木喜) 谢谢 100分 给你了 呵呵 以后多多关照!!!!!!!
其余的GG们 也非常感谢~~~~~~~~~
其余的GG们 也非常感谢~~~~~~~~~
谢谢楼主
我今天是第一次上论坛,对于delphi我只是自己看了书,学了一点点,以后还要多多交流哦
^_^
编程的经历呀 还望木喜GG多多关照~~~