社区
Delphi
帖子详情
关于memo的问题!~
EUII
2003-08-20 11:53:38
如何用空格填充memo控件 120行*120字符 这样一个文件并保存
...全文
33
10
打赏
收藏
关于memo的问题!~
如何用空格填充memo控件 120行*120字符 这样一个文件并保存
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
10 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
EUII
2003-08-21
打赏
举报
回复
两个方法都可以,麻烦问 lxpbuaa(桂枝香在故国晚秋) 能不能说一下 dupestring 是什么?怎么用啊? 谢谢了
EUII
2003-08-21
打赏
举报
回复
我这样做是为了要生成一个huffman编码树,我没有想到有什么其它的办法!!~~~要在.txt中保存
samcrm
2003-08-21
打赏
举报
回复
不知道你这样做为了啥
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
FillStr:string;
begin
for i:=1 to 120 do FillStr:=FillStr+'a';
for i:=1 to 120 do memo1.Lines.Append(FillStr);
memo1.Lines.SaveToFile('我生成的bt文件.txt');
end;
lxpbuaa
2003-08-21
打赏
举报
回复
保存:
Memo1.Lines.SaveToFile('g:\Memo1.txt');
—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————
lxpbuaa
2003-08-21
打赏
举报
回复
uses StrUtils;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.ScrollBars := ssBoth;
Memo1.Lines.Text := DupeString(StringOfChar('A', 120) + #13#10 , 120);
end;
—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————
EUII
2003-08-21
打赏
举报
回复
用别的字符填充也可以啊!~
lxpbuaa
2003-08-21
打赏
举报
回复
在帮助里可以看到,StringOfChar用于重复某个字符从而得到一个字符串;dupestring用于重复某个字符串从而得到一个字符串。
StringOfChar('A', 120)不是必须的,比如用循环就可以实现,用FillChar也可以。不过用StringOfChar可以得到最简洁的代码。
—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————
timgreen
2003-08-21
打赏
举报
回复
来晚了
EUII
2003-08-21
打赏
举报
回复
谢谢,解答!~
EUII
2003-08-21
打赏
举报
回复
两种方法都能实现 谢谢两们
lxpbuaa(桂枝香在故国晚秋) dupestring我已经大概明白用法,只是还想听你指点一下
StringOfChar('A', 120) 要填充的字符一定需要这样转化吗?
MEMO
窗口移动设计源码
可以显示
MEMO
,显示消息的的设计源码,支持在任务栏上显示或隐藏,支持
MEMO
窗口的移动哦~~值得学习!!!
利用Windows消息获取
Memo
的行和列.rar_DELPHI 消息_delphi
memo
_
memo
利用Windows消息获取
Memo
的行和列 是了解Windows消息的基础实例!
super
memo
note-crx插件
语言:English (United States) super
memo
note with sync function Simple and great ! Safe ! Sync over all your computers!简单! 实用! 同步于您所有电脑!1.19: now can resize the
memo
work-abroad-jp:工程师海外就业案例摘要
工程师海外聘用摘要 我们收集的信息将对案例研究和工程师希望在海外工作提供帮助。我要你加上这个! !!如果是这样,请随时进行PR :) 国家/地区不确定 :
memo
: :
memo
: :
memo
: 温哥华 :headphone: :
memo
: :
memo
: 美国 :
memo
: :
memo
: :
memo
: :headphone: :
memo
: 其他 日本人在海外工作的站点。 :headphone: 正茶 在这个播客中,我想请正在海外挣扎的日本职业女性“光彩照人”她们从外部看不到的艰辛和挫折的经历,以及克服这些困难和坚强生活的秘诀。 :headphone: 重建文件 由在硅谷工作的日本工程师更新的播客。 城市 您想住在外国吗?如果您认为,请问居民
新手报到android studio简单的密码记事本,实现增删改查功能
项目的结构如下图:DBHlper是创建数据库的java文件,RegisterActivity是用户注册的逻辑代码,MainActivity是用户登入代码,
Memo
Info是bean文件,
Memo
是登入成功后的逻辑代码,Save
Memo
是用户记录的逻辑代码,show
memo
是用户修改记事本该条内容的逻辑代码。下面开始看源码吧!!!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~...
Delphi
5,388
社区成员
262,731
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章