一个初学者的4个小问题，这100分相当于白送啊！！！(100分)

T

tianrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #1

各位高手：
小弟刚学delphi，有许多问题请教，望赐教。
1，下载的控件我怎么安装不上去？
我不管安装什么控件，总是提示 file not found:"AnaClock.dcu".
AnaClock.dcu到底是什么？我到哪去找呀！！！

2，下载的控件中总有一些Demo，它是干什么用的？怎么看？

3，如果我有一个程序的原代码，我怎么编译并运行它？


4，现有一个程序如下：
unit ExpUnit;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
ExtCtrls,StdCtrls;
type
TExample = class(TForm)
SetButton:Tbutton;
FontButton:Tbutton;
Edit1:TEdit;
Resultpanel:Tpanel;
panelfont:tFontDialog;
procedure setbuttonclick(sender:Tobject);
procedure fontbuttonclick(sender:tobject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Example:TExample;

implementation

{$R *.DFM}
procedure TExample.setbuttonclick(sender:tobject);
begin
resultpanel.caption:edit1.text:

end.
（这个程序下面还有一些，我就不写了）
在编译时提示：[Error] Unit1.pas(31): Undeclared identifier: 'caption'
这是怎么回事。

 

S

snake

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #2

我来接分：
1、找到这个dcu文件的路径(全盘查找)，在
tools--Enveronment option--libray--libray direction里加上这个路径
2、Demo就是演示例子，里面介绍新装控件的用法
3、resultpanel.caption:edit1.text://少了一个"="号

 

T

tianrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #3

snake:
在tools--Enveronment option--libray--libray direction里的哪个地方加上路径，我
在第2和第3个空格处改了路径，但没用。

在resultpanel.caption:edit1.text://加上“=”，也没用。

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #4

3.用 File->Open Project...->打开dpr文件，按 F9 就可以编译。
4.resultpanel.caption:=edit1.text;//不仅缺＝，句末还要用;而不是:

 

T

tianrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #5

wjiachun:
我所说的是写在写字板中的程序，

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #6

1.要是还不能安装，把安装的原文件拷入到delphi的Lib目录下再安装控件

我不明白了？在写字版上的只可能是程序源代码的一部分啊，没法编译的。
一般是一些辅助的函数或者过程，看看它是干嘛用的，在你自己的程序里
直接可以使用的。

 

T

tianrei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #7

请问tianrui你的名字的来历！
没有别的意思！只是问问！
因为你的名字和我的很象！
我是tianrei！

 

T

tianrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #8

wjiachun:
我已经copy到delphi的Lib目录了，只是提示file not found:"AnaClock.dcu".
tianrui：
这是我的名字，看来我两同名。呵呵！！！

 

T

tianrei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #9

你在线吧！
tianrui（天瑞，好象出自尚书，天的信物的意思！）

 

T

tianrei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #10

不过一定要向斑竹声明，
要不又会有误会了！

 

T

tianrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #11

求教：我现在把程序写完。
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Panelfont: TPanel;
resultpanel: TEdit;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
resultpanel.caption:=edit1.text;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
if fontpanel.execute then
resultpanel.font:=fontpanel.font
end;

end.


系统提示如下：
[Error] Unit1.pas(32): Undeclared identifier: 'caption'
[Error] Unit1.pas(32): Missing operator or semicolon
[Error] Unit1.pas(37): Undeclared identifier: 'fontpanel'
[Error] Unit1.pas(43): Statement expected but end of file found
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

这是怎么回事呀？？？

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #12

我的天哪，你把分数全给我得了！！

你编译程序的时候是不是<font color=red>跳出一大堆ERROR窗口</font>然后你选择No了？？

 

张

张文超

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #13

resultpanel是Tedit类的，应是resultpanel.text:=edit1.text;
fontpanel应是panelfont.

 

T

tianrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #14

wjiachun:
我的这段程序是书上的例题，但我无法编译，
安装控件时我已经copy到delphi的Lib目录了，只是提示file not found:"AnaClock.dcu".
我找到AnaClock.dcu后它又要AnaClock.pas，我就找不到了。
请多多帮忙！！！我才刚刚开始学编程。

 

G

gy1969

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #15

应该是
implementation

{$R *.DFM}
procedure TExample.setbuttonclick(sender:tobject);
begin
resultpanel.caption :=edit1.text;
end;
end.

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #16

>><font color=blue>三个文件夹，另外35个dcu，一个dpk，一个pas</font>
这是你在OICQ中说的，.其实对于带*.dpk文件的控件包，应该File-->open(下拉列表框中选*.dpk)
-->然后install即可.

 

T

tianrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #17

文超兄，照你的说法改了后，提示如下：
[Error] Unit1.pas(32): Undeclared identifier: 'edit1'
[Error] Unit1.pas(37): Undeclared identifier: 'fontpanel'
[Error] Unit1.pas(43): Statement expected but end of file found
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

该怎么办？？？

 

L

lyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #18

1、resultpanel是TEdit类，没有caption属性，TPanel类才有。
2、你没有定义edi1这个控件
3、你没有定义fontpanel这个控件

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #19

tianrui：其实你程序的问题太多了！

1。每一个控件名都对应存在么？
2。resultpanel究竟是panel还是edit?
3。edit1是在哪里定义的？
4。fontpanel又是在哪里定义的？

 

T

tianrui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-03

• #20

我也知道要定义，但我在type下写
Edit1:tedit;
panelfont:tfontdialog;
再按F9，就出一个对话筐，我选YES，那我刚输入的两句就没了。