一個控件編寫問題(100分)

L

luckystar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-09

• #1

我從TButton繼承了一個TMyButton,現在我要在里面為caption在
運行時賦值﹐我寫TMyButton.captin:='...'會報錯﹐我寫
caption:=''又好了﹐請問這是什么原因呢?

 

O

OpuBF

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-09

• #2

TMyButton是一个类的名称，当然不能直接拿来赋值！

 

吴

吴剑明

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-09

• #3

直接写： caption := '...' 就行了

 

小

小猪

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-09

• #4

to:OpuBF
好像也不一定的.
如果赋值的代码不是在形如procedure Txxxxx.xxx(xxx)这样的事件或者说方法的代码中,
而是单独写一个形如procedure writecaption(s:string)这样的一个过程中,就是说,这个
过程本身与这个类是无关的,似乎是要用类名来引用的.不过我也记不清了.说出来就当是
灌水吧.

 

Z

zhangkan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-09

• #5

對﹐你直接寫Caption='...'就行了。實際上你繼承了TButton,那么你已經有Caption這個
屬性了﹐用不著去改它了。當然﹐你自己想改的話﹐就用Caption='...'就行了。

 

J

JohnsonGuo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-09

• #6

var MyButton: TMyButton;

MyButton.Caption := '...';

 

L

luckystar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-09

• #7

多人接受答案了。

 

G

gcq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-09

• #8

在TMYBUTTON。CREATE（……）里直接用他的各项属性，不用加类名！