社区
Delphi
帖子详情
请问如何程序实现原元件组的复制???
Nuke
2000-01-29 07:45:00
一个Pagecontrol上有一个Page,Page上有一个richedit.
目的是通过程序实现可以新建任意个新Page,每个Page都和原Page相同。
且每个新Page上的richedit都和原Page上的richedit各项属性相同,也有相同的
事件处理过程。但各个Page间操作相互独立。
请问该如何处理呢??
...全文
86
1
打赏
收藏
请问如何程序实现原元件组的复制???
一个Pagecontrol上有一个Page,Page上有一个richedit. 目的是通过程序实现可以新建任意个新Page,每个Page都和原Page相同。 且每个新Page上的richedit都和原Page上的richedit各项属性相同,也有相同的 事件处理过程。但各个Page间操作相互独立。 请问该如何处理呢??
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
1 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
corsier
2000-01-30
打赏
举报
回复
首先定义全局变量SS(TFILESTREAM类型)和PATH(STRING类型),这里以复制一个
LISTVIEW控件为例,先将LISTVIEW1的信息保存到文件SAVECOMPONENT,然后,再将其信息读出,符给LISTVIEW2,程序代码如下:
//保存LISTVIEW1的信息
PROCEDURE SAVECOMPONENT;
var
ss:TFileStream;
Path:String;
begin
Path:=ExtractFilePath(ParamStr(0));//获得当前路径
Try
ss.Create(Path+'\SaveComponent',fmCreate);
//保存控件信息到SAVECOMPONENT文件
ss.WriteComponent(ListView1);
Finally
ss.Free ;
end;
//读取LISTVIEW1的信息符给LISTVIEW2控件
PROCEDURE READCOMPONENT;
begin
Try
ss.Create(Path+'SaveComponent',fmOpenRead);
ss.ReadComponent(ListView2); //从SAVECOMPONENT文件读回控件信息给LISTVIEW2
Finally
ss.Free ;
end;
end;
小白也可以学会的Jmeter工具使用
1.本课程会详细的介绍Jmeter工具中的框架
组
成、Jmeter每个
元件
的具体使用,常用的
元件
会进行更加详细的说明,并且会结合样例进行讲解。 2.本课程会介绍通过自己编写的Java程序如何进行打包后在Jmeter使用,如何定制...
程序是怎么跑起来的 | 个人笔记
程序是怎么跑起来的 这里写目录标题cpu是啥1.01.1 cpu是啥 1.0 程序是什么? ...硬盘和磁盘等媒介上保存的程序被
复制
到内存后才能运行。 什么是内存地址? 内存中用来表示数据和命令存储位置的
程序是怎样跑起来的(1)
《程序是怎样跑起来的》笔记 第1章.对程序员来说CPU是什么 1:程序是什么? 指令序列,指示计算机每一步动作的一
组
指令。...2:程序是由什么
组
成的?...内存,硬盘等媒介上保存的程序被
复制
到内存后才能...
《程序是怎样跑起来的》(上)
学习笔记 此书前言 无论任何事情,了解其本质非常重要。只有了解了本质才能提高利用效率。这样一来,即使有新技术出现,也能很容易的理解并掌握。...计算机的构成
元件
中,负责程序的解释和运行的是哪一个? 本...
《程序是怎样跑起来的》(上、中、下)
计算机基础
原
理(包含程序是怎样跑起来的上中下) https://www.cnblogs.com/xmusxy/category/1469722.html 《程序是怎样跑起来的》(上) 学习笔记 此书前言 无论任何事情,了解其本质非常重要。只有了解了...
Delphi
5,388
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章