当前位置:首页 > 代码 > 正文

delphi代码添加控件(delphi自定义控件)

admin 发布:2022-12-19 16:52 142


今天给各位分享delphi代码添加控件的知识,其中也会对delphi自定义控件进行解释,如果能碰巧解决你现在面临的问题,别忘了关注本站,现在开始吧!

本文目录一览:

delphi 怎么添加Mscomm控件【转】

ActiveX选项,出现ActiveX控件导入窗口;

(2)在其中选中MicrosoftCommControl

6.0(Version

1.1),并按需要选定Palette

pages、unitdirname、Search

path值(一般取默认值),最后选择Install按钮进行安装。即可将MSComm控件引入到Delphi

(3)在编程使用中,直接打开ActiveX控件,选取TMSComm控件,放在窗体上,设置其属性即可。

delphi7中,如何添加控件?

如果控件的代码只在一个.pas文件里,首先要把.pas文件打进包bpl里,再Install 。

delphi中添加控件的问题

当然可以,还可以动态创建控件数组,给你两个简单的例子:

动态创建组件:

procedure TForm1.Button1Click(Sender: TObject);

var

MyButton : TButton;

begin

MyButton := TButton.Create(Self);

MyButton.Parent := Form1;

MyButton.Top := 10;

MyButton.Left := 10;

MyButton.Height := 25;

MyButton.Width := 75;

MyButton.Caption := '确定';

MyButton.OnClick := Mybuttonclick;

MyButton.Show;

end;

procedure TForm1.Mybuttonclick(Sender: TObject);

begin

Application.MessageBox('动态创建的Button组件','提示',64);

end;

动态创建控件数组:

procedure TForm1.Button1Click(Sender: TObject);

var

MyButton:array of TButton;

i,m:integer;

begin

SetLength(MyButton,6);

for i := 0 to 5 do

begin

MyButton[i] := TButton.Create(Self);

MyButton[i].Top := 10 + i * 30;

MyButton[i].Left :=20;

MyButton[i].Height := 30;

MyButton[i].Width := 70;

MyButton[i].Parent := Self;

MyButton[i].Caption := '按钮';

MyButton[i].OnClick := Mybuttonclick;

MyButton[i].Show;

Button1.Visible := False;

end;

end;

procedure TForm1.Mybuttonclick(Sender: TObject);

begin

showmessage('动态组件数组');

end;

上面都是动态创建button组件的例子,其他的组件你可以参照上面的例子自己写。。。

Delphi中怎么加入OCX控件?

首先创建一个新的VCL工程用于测试(方法大家都会),现在开始安装OCX控件,方法有点繁琐首先单击File▶New▶Package 创建一个控件包,然后保存这个工程(注意这一步很关键),然后单击Component▶Import Component▶Import ActiveX Control,在列表中选一个已注册的OCX控件或直接导入一个ocx文件,然后单击Next直到出现Add unit to....那一项(记住一定要选择这个项,最后点击Finish完成,最后用右键单击工程列表中的已创建的那个包文件(也就是后缀名为bpl的文件)在出现的列表中选择Install即可。

Delphi7 如何添加第三方控件

1 dpk文件就直接双击 编译 安装

2 bpl文件 那你component---install packages---add 选择bpl文件

3 pas 文件 就component ---install component--into new package--

Tools下找到Environment Options,打开环境设置的对话框,打开Library选项卡,将控件包里包含dcu或者pas文件的主要目录添加进delphi的 Library目录 这样的话 delphi在编译的时候才知道去哪儿找这个文件。

如何在delphi中添加自定义控件

像定义属性一样,类型为TNotifyEvent。

private

FMyEvent: TNotifyEvent;

public

MyEvent: TNotifyEvent read FMyEvent write FMyEvent;

在你需要触发事件的地方调用以下代码:

if Assinged(FMyEvent)

FMyEvent(Self);

关于delphi代码添加控件和delphi自定义控件的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站。

版权说明:如非注明,本站文章均为 AH站长 原创,转载请注明出处和附带本文链接;

本文地址:http://ahzz.com.cn/post/14146.html


取消回复欢迎 发表评论:

分享到

温馨提示

下载成功了么?或者链接失效了?

联系我们反馈

立即下载