当前位置：首页 > news >正文

湖南网站建设公找人做网站排名优化

news 2025/9/16 12:04:28

湖南网站建设公,找人做网站排名优化,建行购物网站,怎么自己建立一个网站安装Lazarus 首先到Lazarus官网，找到合适的版本下载页面，比如Mac的版本： https://sourceforge.net/projects/lazarus/files/Lazarus%20macOS%20x86-64/Lazarus%203.4/ 将三个文件都下载到本地，需要安装这三个文件： …

安装Lazarus

首先到Lazarus官网，找到合适的版本下载页面，比如Mac的版本：

https://sourceforge.net/projects/lazarus/files/Lazarus%20macOS%20x86-64/Lazarus%203.4/

将三个文件都下载到本地，需要安装这三个文件：

fpc-src-3.2.2-20210709-macosx.dmg	2024-05-26	50.5 MB	70
fpc-3.2.2.intelarm64-macosx.dmg	2024-05-26	274.2 MB	75
Lazarus-3.4-macosx-x86_64.pkg	2024-05-26	278.1 MB	155

下载后双击安装，如果因为安全原因不允许安装，那么按住shift之后双击进行安装。

启动后，就进入了Lazarus的IDE主界面。

下面开始我们的第一个Lazarus程序！

Lazarus Tutorial/zh CN - Lazarus wiki

起点 - 你的第一个Lazarus程序!

启动后的界面

启动后，桌面上将出现很多窗口：顶部是主菜单，左面是对象观察器，Lazarus源代码编辑器将占据大部分的桌面，而一个预置的Form1窗体将覆盖在源代码编辑器的上面。

如果是中文系统的话，那么默认将是中文界面。如果使用GTK库的话，注意使用GTK2，因为GTK1对中文的支持不好。

创建按钮

在顶部的主菜单上，菜单分隔线的下面有一排标签。如果Standard标签还未被选中，单击选中它。然后找到TButton图标(一个有OK字样的矩形)，单击Tbutton图标，然后在Form1窗体上找个宽敞的地方单击一下。一个有着"Button1"标题的矩形按钮就出现了。重复一次，你将获得"Button2"按钮，建议你把它放到Button1的右面。

现在单击Button1选中它，左侧的对象观察器上将出现Button1对象的所有属性。找到名为Caption的属性(你可以在"收藏夹"标签下更方便地找到它)，现在这个属性的值是"Button1"。单击显示着"Button1"的方格，把里面"Button1"文本改成"Press"，当你按下Enter(或者单击别的方格)后，你会看见Form1窗体上的Button1按钮上的文本变成了"Press"。然后找到对象观察器上的"事件"标签，你会看见可以给Button1关联很多事件(Event)，包括OnClick,OnEnter,OnExit等等。选择OnClick右边的空白方格，将出现一个显示"..."(三个点，也就是省略号)的小方格，在这个方格上单击，你将自动跳转到源代码编辑器，同时你的光标会处于一段过程(procedure)代码中：在其中输入：

Button1.caption := 'Press again';

按下F12选中Form1窗体。（发现MAC下按F12无法选中From1窗体，可以在窗口里选择From1窗体）

然后我们来编辑Button2的属性，将Caption修改为"Exit"，然后选择OnClick事件，单击那个显示"..."的小方格，你又回到了源代码编辑器，光标位于另一段过程代码的中间：

 procedure TForm1.Button2Click(Sender: TObject);begin{输入:}Close;end;

由于中间出现问题，重新新建项目

重新新建项目

按前面的步骤创建按钮

运行程序

现在可以尝试编译这个程序了。最简单的方法是在顶部主菜单中选择"运行"，在弹出的子菜单中选择"运行"（你也可以使用快捷键F9，在MAC下是Commond R)。如果一切顺利，你的程序将被编译执行。

所有的编译信息都会出现在底部的"消息"窗口中。最终，一个没有刻度标记(编辑状态下才会出现)的Form1窗口将出现在屏幕上。这是你的应用程序的主窗口，它正等着你去按按钮(以及其他操作)。

尝试下点击Press按钮，你会发现按钮的标签变成了"Press again"。之后你再怎么按，它依然显示"Press again"。

现在点击Exit按钮，窗口将关闭，程序也就终止了（在MAC下按了两次才关闭。。。）。编辑状态下有着丑陋刻度标志的Form1又回到了屏幕上，准备接受更多的修改完善。

现在你应该保存你的工作了(你应该经常这么做！)，选择顶部主菜单上的" 工程 > 保存工程 "来保存工程文件。

修改项目

在Form1窗体上选择Press按钮("Button1")。

在"事件"标签中选择OnClick，点击出现的"..."方格，来回到源代码编辑器。

 procedure TForm1.Button1Click(Sender: TObject);
{这段代码使用了Button1的Tag属性，使Tag属性在0和1之间转换}beginif Button1.tag =0 thenbeginButton1.caption := 'Press again';Button1.tag := 1end elsebeginButton1.caption := 'Press';Button1.tag := 0endend;

这样按钮1可以来回在Press again和Press之间切换。

调试项目

第三步常用调试方法

有时候需要一些直接有效的打印出调试内容，比如像VB 下的 Debug.print 可直接在立即窗口中打印出调试内容

可以使用

 WriteLn('XXXX ', XXX);

 Write('XXXXXX');

但是在网上发现不少新人使用会弹出: project project1 raised exception class 'EInOutError' with message:file not open

异常通知

只需要在文件头部加入预编译指令（Mac下不需要加这句）

 {$APPTYPE CONSOLE}

这样调试时会弹出一个类dos对话框,输出调试的内容

（这里没有测试成功，没有找到调试输出的内容）

常用技巧

lazaurs的编辑器蛮强大的，支持代码补全，自动完成，模板编辑，多行缩进注释，选定代码后批量更改里面的单词！

1.代码补全

按下键盘的Ctrl+W键！输入变量后按下这个键就OK啦～

MAC下不行。

2.自动完成

自动完成的快捷键大多数都冲突了，解决方法是打开工具(T)->选项...->编辑器->键盘映射->CodeTools命令->标识符自动完成上右键编辑 ,然后根据实际情况修改吧，我的是再勾选Alt，也就是说，我的热键是Ctrl+Alt+Space！

MAC下是在Lazarus-选项-编辑器-键盘映射-Code Tools-标识符自动完成上面编辑，默认是Ctrl+Space

3.模板编辑

这个也蛮简单，按下键盘的Ctrl+J，然后输入class，回车！是不是很酷！

Mac下是“代码模版”？

4.多行缩进注释

缩进的：向左 -> Ctrl+U

向右 -> Ctrl+I（选中多行代码更爽）

多行注释：Ctrl+/

5.选定代码后批量更改里面的单词

先选中几行代码（需要修改的代码段），然后点击编辑器左边显示行号左边的那支笔。

这个时候你可以输入b，变量a就全部改为b，还可以按下tab跳到下一个单词。

6.编辑器的高亮

<?xml version="1.0"?>
<CONFIG><EditorOptions Version="9"><Display DoNotWarnForFont="Ubuntu Mono" EditorFont="Ubuntu Mono" EditorFontSize="13"><MarkupCurrentWord NoKeyword="False"/></Display><KeyMapping><default Count="1"><Version Value="6"/><Item1 Name="Identifier completion"><KeyA Default="False" Key1="32" Shift1="5"/></Item1></default></KeyMapping><CodeTools CodeTemplateFileName="/home/lht/.lazarus/lazarus.dci" CompletionLongLineHintTypeCompletionLongLineHintType="sclpExtendRightOnly" AutoDelayInMSec="104"/><Mouse><Default Version="1"/></Mouse><Color Version="9"><LangObjectPascal Version="9"><ColorScheme Value="Twilight"/><SchemeTwilight><Space Background="1973790" FrameColor="5000268" FrameStyle="slsDotted" FrameEdges="sfeBottom"/><Number Foreground="7434751"/><String Foreground="7337839"/><Symbol Foreground="clYellow"/><Comment Foreground="clSkyBlue" Style="fsItalic"/><Assembler Foreground="11715098"/><Directive Foreground="22015"/><Case_label Foreground="16541892"/><IDE_Directive Foreground="1478752"/><Reserved_word Foreground="1023473"/></SchemeTwilight></LangObjectPascal><Globals Version="9"><SchemeTwilight><ahaDefault Background="1973790"/></SchemeTwilight></Globals><LangPython Version="9"><SchemeTwilight><Float Foreground="8345087"/><Octal Foreground="16755455"/><Number Foreground="8345087"/><String Foreground="8388522"/><Symbol Foreground="clYellow"/><Comment Foreground="clSkyBlue"/><Hexadecimal Foreground="8345087"/><SyntaxError Foreground="16755285"/><Documentation Foreground="16755370"/><Reserved_word Foreground="43775"/><Non_reserved_keyword Foreground="8366847"/></SchemeTwilight></LangPython></Color><Misc PasExtendedKeywordsMode="True"/><General><Editor TabIndent="True" TabWidth="2"/></General><DividerDraw><LangObjectPascal><TypeSect><TopColor Value="9157119"/></TypeSect><TypeGVar><TopColor Value="9157119"/></TypeGVar><TypeGStruct><TopColor Value="9157119"/></TypeGStruct><TypeProc><TopColor Value="9157119"/></TypeProc><TypeLStruct><MaxDepth Value="1"/><TopColor Value="9157119"/></TypeLStruct></LangObjectPascal></DividerDraw></EditorOptions>
</CONFIG>