社区
Delphi
帖子详情
如何为memo中文本的每行的首尾添加一定量的空格。通过编程实现自动添加。
ymhf19373200
2003-10-20 04:17:55
如何为memo中文本的每行的首尾添加一定量的空格。通过编程实现自动添加。
注:是首尾!!
...全文
55
3
打赏
收藏
如何为memo中文本的每行的首尾添加一定量的空格。通过编程实现自动添加。
如何为memo中文本的每行的首尾添加一定量的空格。通过编程实现自动添加。 注:是首尾!!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
noil0125
2003-10-20
打赏
举报
回复
var
s:string;
begin
s:=memo1.Lines[0];
insert(' ',s,1);
insert(' ',s,length(s)+1);
memo1.Lines[0]:=s;
huojiehai
2003-10-20
打赏
举报
回复
var
lp: integer;
begin
for lp := 0 to memo1.lines.count - 1 do
memo1.lines[lp] := memo1.lines[lp] + ' ';
end;
chw_csdn_chw
2003-10-20
打赏
举报
回复
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i:=0 to self.Memo1.Lines.Count-1 do
begin
self.Memo1.Lines[i]:= ' '+ self.Memo1.Lines[i]+' ';
end;
end;
网络
编程
项目 (网络词典)
TCP搭建
实现
多对1 服务器端使用IO多路复用 数据库
网络
编程
_8(项目附件)
完成,
实现
achievement n.完成,成就 acid n.酸 acknowledge v.承认,鸣谢 acknowledgment n.承认,鸣谢,回执 acquaint n.使熟悉,相识 acquaintance n.熟悉人,相识 acquaintant adj.熟悉的 acquire v.求得,获得...
网络
编程
TCP电子网络词库
实现
以下电子词典功能 登录注册功能,不能重复登录,重复注册。用户信息也存储在数据库
中
。 单词查询功能 历史记录功能,存储单词,意思,以及查询时间,存储在数据库 基于TCP,支持多客户端连接 采用数据库保存用户...
vicuna-13b与ChatGPT3.5对决,GPT4为裁判的80道考题,
中
文机翻版
文章目录 引言 写作 Q1: 撰写一篇关于最近去夏威夷旅行的引人入胜的旅游博客文章,重点介绍文化体验和必看景点。 ChatGPT-3.5 Vicuna-13b GPT-4 评估(得分:ChatGPT-3.5 9/10,Vicuna-13b 9/10) Q2: 你能帮我写一...
Python常见面试题合集
Python是一种解释型语言。这就是说,与C语言和C的衍生语言不同,Python代码在运行之前不需要...Python非常适合面向对象的
编程
(OOP),因为它支持通过组合(composition)与继承(inheritance)的方式定义类(class)。
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章