如何显示记数器?(50分)

  • 主题发起人 主题发起人 bzmouse
  • 开始时间 开始时间
B

bzmouse

Unregistered / Unconfirmed
GUEST, unregistred user!
我现在正在编一个记数器,但不知如何显示?
我已经定义了一个数字的字符数组,在中用write(ch:n)即可,
但在Delphi如何用?用XXX.Text:=ch:n不行;用XXX.Text:=ch[n]也不行;谁能帮帮我?
 
看不懂啊,是网页上用的么?那样的话应该是URL才对
 
是程序中需要记数,且要将该数显示出来!
我现在正在编一个记数器,但不知如何显示?
我已经定义了一个数字的字符数组,在pascal中用write(ch:n)即可,
但在Delphi如何用?用XXX.Text:=ch:n不行;用XXX.Text:=ch[n]也不行;谁能帮帮我?
 
我自己找到答案了!
源程序:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
x:integer ;
begin
x:=strtoint(label1.Caption);
x:=x+1;
label1.Caption:=inttostr(x);
end;

end.
 
Kao!原来你是要这个玩艺,拜托你以后提问把问题用“中文”说清楚。
 
哈,文字表达能力有待提高
 
同意!!
这小子真不知道是怎么表达的
原来是xxx.caption := ...
kao!!!
 
接受答案!
 
多人接受答案了。
 
后退
顶部