如何在VSCode中借助OmniPascal创建并配置Free Pascal项目

1. 搭建基础项目结构 #

• 新建项目文件夹（如MyFPCProject），在其中创建主程序文件（如main.pp），写入测试代码：

  program HelloWorld;
  begin
    Writeln('Hello FPC!');
    Readln;
  end.
  

• 建议用Lazarus生成一个.lpi项目文件（Lazarus是FPC的官方IDE），再将项目文件夹导入VSCode——OmniPascal依赖.lpi识别项目，否则状态栏会一直提示OmniPascal: select project。如果不想用Lazarus，也可以手动创建最简.lpi文件，示例结构：

  <?xml version="1.0" encoding="UTF-8"?>
  <CONFIG>
    <ProjectOptions>
      <Version Value="12"/>
      <MainUnit Value="0"/>
      <Units>
        <Unit0>
          <Filename Value="main.pp"/>
        </Unit0>
      </Units>
    </ProjectOptions>
  </CONFIG>
  

2. 配置OmniPascal的FPC路径 #

• 打开VSCode设置（快捷键Ctrl+,），搜索OmniPascal：
  • 设置OmniPascal: Fpc Path为FPC可执行文件的完整路径，比如Windows下C:\FPC\3.2.2\bin\i386-win32\fpc.exe，Linux下/usr/bin/fpc
  • 在OmniPascal: Unit Search Paths中添加FPC的单元目录，例如Windows下添加C:\FPC\3.2.2\units\i386-win32、C:\FPC\3.2.2\units\i386-win32\rtl，Linux下添加/usr/lib/fpc/3.2.2/units/x86_64-linux、/usr/lib/fpc/3.2.2/units/x86_64-linux/rtl，同时加上项目自身文件夹路径

3. 手动创建构建任务 #

• 按Ctrl+Shift+B，选择「创建tasks.json文件」，选「Others」模板，替换为以下内容（根据系统调整）：

  {
    "version": "2.0.0",
    "tasks": [
      {
        "label": "Compile FPC Project",
        "type": "shell",
        "command": "fpc main.pp",
        "group": {
          "kind": "build",
          "isDefault": true
        },
        "problemMatcher": {
          "owner": "pascal",
          "fileLocation": "absolute",
          "pattern": {
            "regexp": "^(.*?)(\\((\\d+),(\\d+)\\))?:\\s*(Error|Warning|Note):\\s*(.*)$",
            "file": 1,
            "line": 3,
            "column": 4,
            "severity": 5,
            "message": 6
          }
        }
      }
    ]
  }
  

• 保存后，按Ctrl+Shift+B即可执行编译

4. 解决状态栏项目选择提示 #

• 点击状态栏的OmniPascal: select project提示，在弹出窗口中选择项目文件夹内的.lpi文件
• 确保VSCode打开的是整个项目文件夹，而非单独的.pp文件，这样OmniPascal能正确识别项目范围

5. 验证系统单元识别 #

• 重启VSCode后，打开main.pp，检查Writeln等系统函数是否有语法提示，是否仍报错找不到系统单元
• 若问题依旧，核对Unit Search Paths是否包含FPC的核心RTL目录，路径需与FPC安装版本、系统架构完全匹配

内容的提问来源于stack exchange，提问作者Alexander Pravdin