怎样创建一个外观类同窗体的控件 100分(100分)

T

txiuq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-03

• #1

怎样创建一个控件,此控件的外观同窗体有提示条,有图标有ClientWidth,ClientGeight
等窗体的属性,该控件能够象窗体一样上面可以放置其他可视控件,并且能够象面板一样
可以放在窗体或其他控件上.

 

C

CathyEagle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-03

• #2

Frame

 

杀

杀大龙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-04

• #3

用Frame ，限于Delphi5 ，里面的Demo有例子，参照就可以了。

 

X

xfma

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-11-07

• #4

参见《delphi 5开发人员指南》第642页——21.3.5 把窗体加到组件面板上。
参见<delphi dir>/source/vcl/Dialogs.pas中的TFontDialog、TOpenDialog部分。

 

X

xfma

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-11-07

• #5

没看清题目是要做容器组件，那就不要参见TFontDialog了

 

Z

z_cd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-11-07

• #6

TFormContainer

 

J

Jayant

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-11-07

• #7

你所提出的问题涉及到delphi内部的编程问题，具体说就是定制设计模块，这要使用到
TCustomModule类和RegisterCustomModule过程。具体方法可以参考《Delphi高级开发指南》的
第15章。

 

G

gcq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-11-07

• #8

TFORM也可以放到其他窗体上的啊！！！
你可以把TFORM当控件容器用的！！！

 

Z

Zephyr

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-11-08

• #9

最简单的方法：建立两个窗体，例如一个子窗体Form1，一个父窗体Form2，然后
在Form2中用以下代码：

procedure TForm2.Button1Click(Sender: TObject);
begin
Application.CreateForm(TForm1, Form1);
Form1.Parent := Self;
Form1.Show;
end;

然后...瞧，Form1出现在Form2中，就好像Form2是一个Windows的桌面一样，你甚至
可以在用鼠标任意移动Form1，如果不想让人移动它的话，可以把Form1的BorderStyle
设为bsNone。

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-23

• #10

多人接受答案了。