请选择 进入手机版 | 继续访问电脑版

Lazarus中文社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

Lazarus IDE and 组件 下载地址版权申明
查看: 5602|回复: 4

lazarus里面怎么格式化代码?

[复制链接]

该用户从未签到

发表于 2010-8-5 16:03:34 | 显示全部楼层 |阅读模式
lazarus里面怎么格式化编辑器里面的代码?
回复

使用道具 举报

该用户从未签到

发表于 2010-8-5 16:25:25 | 显示全部楼层
怎么格式化?
回复 支持 反对

使用道具 举报

该用户从未签到

 楼主 发表于 2010-8-6 11:14:23 | 显示全部楼层
下面的代码
procedure TMainForm.SystemExit1Execute(Sender: TObject);
begin
      if MessageBox(0,'确定退出程序?','提示',MB_OKCANCEL+MB_ICONQUESTION+MB_DEFBUTTON2) = 1 then
                    Close;
end;

能否自动格式为
procedure TMainForm.SystemExit1Execute(Sender: TObject);
begin
      if MessageBox(0,'确定退出程序?','提示',MB_OKCANCEL+MB_ICONQUESTION+MB_DEFBUTTON2) = 1 then
        Close;
end;

delphi 2010可以自动格式化为这种形式,不知道lazarus能否做到
回复 支持 反对

使用道具 举报

该用户从未签到

发表于 2010-8-12 21:35:47 | 显示全部楼层
Tools 裡面有一个 JEDI Code Format

或者用 Free Pascal 附带的 ptop (文档在 http://http://wiki.freepascal.org/PTop)。

Google 一下 pascal source formatter 就出来了。
回复 支持 反对

使用道具 举报

该用户从未签到

 楼主 发表于 2010-8-12 22:31:56 | 显示全部楼层
谢谢,JEDI Code Format已经实现了
回复 支持 反对

使用道具 举报

QQ|手机版|小黑屋|Lazarus中国|Lazarus中文社区 ( 鄂ICP备16006501号-1

GMT+8, 2021-5-9 05:58 , Processed in 0.058052 second(s), 26 queries .

Powered by Discuz! F1.0 Build 20160930

© 2001-2021 Comsenz Inc. & Discuz! Fans

快速回复 返回顶部 返回列表