C
cat.yy
Unregistered / Unconfirmed
GUEST, unregistred user!
我想做自己的类,不基于任何DELPHI提供的类
完全由API和PASCAL函数构建,怎么写呢?
完全由API和PASCAL函数构建,怎么写呢?
W
wjiachun
Unregistered / Unconfirmed
GUEST, unregistred user!
不基于TObject么？？
TObject is the ultimate ancestor for all other objects and components.
欢迎小猫重出江湖，把你的旧贴提前或结束一些吧 ^_^
TObject is the ultimate ancestor for all other objects and components.
欢迎小猫重出江湖，把你的旧贴提前或结束一些吧 ^_^
C
cat.yy
Unregistered / Unconfirmed
GUEST, unregistred user!
C 语言可以做到,PASCAL一定行!
(我可是在网吧包夜的)
(我可是在网吧包夜的)
M
menxin
Unregistered / Unconfirmed
GUEST, unregistred user!
不行，Tobject是VCL的祖先,类必须从tobject继承。 :-(
不过这也没什么关系呀,Object前已经没什么再要你做的了，象BIOS一样。
不过这也没什么关系呀,Object前已经没什么再要你做的了，象BIOS一样。
C
cat.yy
Unregistered / Unconfirmed
GUEST, unregistred user!
我打算做的类中不需要任何VCL呀
&------------------------------
如果我把一个类单独写到一个单元文件中,怎么写呢?
&------------------------------
如果我把一个类单独写到一个单元文件中,怎么写呢?
吴
吴剑明
Unregistered / Unconfirmed
GUEST, unregistred user!
T小猫=CLASS
。。。
END
。。。
END
W
wrench
Unregistered / Unconfirmed
GUEST, unregistred user!
delphi的所有类都是从tobject继承的，哪怕你没有显式的说明
C
cat.yy
Unregistered / Unconfirmed
GUEST, unregistred user!
TO :吴剑明
Ta = Class
private
...
public
...
end;
写在单独一个文件中,编译出错,WHY?
Help me!!!
Ta = Class
private
...
public
...
end;
写在单独一个文件中,编译出错,WHY?
Help me!!!
W
wvision
Unregistered / Unconfirmed
GUEST, unregistred user!
你可以参看delphi提供的例程
C
cat.yy
Unregistered / Unconfirmed
GUEST, unregistred user!
有吗 哪儿啊 ?
C
cat.yy
Unregistered / Unconfirmed
GUEST, unregistred user!
有吗 哪儿啊 ?
左
左轻侯
Unregistered / Unconfirmed
GUEST, unregistred user!
object pascal是基于单根结构的，也就是任何类都会自动继承自TObject
（java也是类似的结构）
这是语言的特性，与VCL无关，根本不用担心这个。
单根结构要优于C++的设计，据说当初C++之所以没有使用单根结构是考虑到和C的兼容性。
这种类我写得最多了，没出过问题
你说编译出错，报什么错？
（java也是类似的结构）
这是语言的特性，与VCL无关，根本不用担心这个。
单根结构要优于C++的设计，据说当初C++之所以没有使用单根结构是考虑到和C的兼容性。
这种类我写得最多了，没出过问题
你说编译出错，报什么错？
I
iforever
Unregistered / Unconfirmed
GUEST, unregistred user!
unit CatObjs;
interface
type
TCatObject = class
constructor Create;
procedure Free;
end;
implementation
constructor TCatObject.Create;
begin
end;
procedure TCatObject.Free;
begin
end;
end.
interface
type
TCatObject = class
constructor Create;
procedure Free;
end;
implementation
constructor TCatObject.Create;
begin
end;
procedure TCatObject.Free;
begin
end;
end.
A
Another_eYes
Unregistered / Unconfirmed
GUEST, unregistred user!
漏了关键的东西喽. uses部分~~~~~
吴
吴明星
Unregistered / Unconfirmed
GUEST, unregistred user!
如果使用uses部分，则所定义的类继承自TObject
C
cat.yy
Unregistered / Unconfirmed
GUEST, unregistred user!
多人接受答案了。