TP

tina4stack/pascal-mcp

开发工具

本页由 AI 翻译,技术细节请以原文为准。 查看原文

10 stars 2 forks 质量 77 趋势 26MIT

Tina4 Claude Pascal Mcp - For Free Pascal and RAD Studio

概览

An MCP (Model Context Protocol) server that lets any supported AI harness compile, run, and interact with Pascal/Delphi desktop applications. Supports Free Pascal (fpc), Delphi 32-bit (dcc32), and Delphi 64-bit (dcc64) compilers. - — automatically finds Pascal compilers on your system (PATH + known install locations) - — compile single-file Pascal source or multi-file Delphi projects - — compile and execute console programs, capturing output - — compile and launch VCL/FMX applications in background (without stealing focus) - — generate proper Delphi project structure (DPR + PAS + DFM) automatically - — read and understand DFM/FMX/LFM form files - — capture running desktop app windows (non-intrusive, no focus stealing) - — click, type text, and send keyboard shortcuts to desktop app windows - — full ADB support: screenshots, tap, swipe, type, key events, app management, file transfer - — capture RAD Studio/Delphi/Lazarus IDE screenshots and read compiler errors - — live preview of...

README

以下为原文 README 节选,完整内容请查看原文。

Pascal MCP Server

An MCP (Model Context Protocol) server that lets any supported AI harness compile, run, and interact with Pascal/Delphi desktop applications. Supports Free Pascal (fpc), Delphi 32-bit (dcc32), and Delphi 64-bit (dcc64) compilers.

Features

  • Compiler Detection — automatically finds Pascal compilers on your system (PATH + known install locations)
  • Compile — compile single-file Pascal source or multi-file Delphi projects
  • Run — compile and execute console programs, capturing output
  • Launch GUI Apps — compile and launch VCL/FMX applications in background (without stealing focus)
  • Project Templates — generate proper Delphi project structure (DPR + PAS + DFM) automatically
  • Form Parser — read and understand DFM/FMX/LFM form files
  • Window Screenshots — capture running desktop app windows (non-intrusive, no focus stealing)
  • Windows App Interaction — click, type text, and send keyboard shortcuts to desktop app windows
  • Android Device Interaction — full ADB support: screenshots, tap, swipe, type, key events, app management, file transfer
  • IDE Observer — capture RAD Studio/Delphi/Lazarus IDE screenshots and read compiler errors
  • Preview Bridge — live preview of running Pascal apps through any AI tools preview system
  • FPC Installer — download and install Free Pascal if no compiler is available

Tools

Tool Description
get_compiler_info Detect available compilers and show versions
compile_pascal Compile single-file source code
compile_delphi_project Generate + compile a project from templates — vcl, fmx (cross-platform incl. Android), console, or fpc
build_dproj Build an existing .dproj via MSBuild + rsvars. Auto-resolves PAServer profile, chains Deploy, deep-cleans the dproj’s actual output dirs, supports iOS deploy-manifest synthesis. See §build_dproj details below
run_pascal Compile and execute console programs
launch_app Compile and launch GUI app in background
check_syntax Syntax check only (no linking)
parse_form Parse DFM/FMX/LFM form files
list_remote_profiles List PAServer Connection Profiles registered for iOS/macOS/Linux builds
check_ios_deploy Inspect a .dproj for the iOS DeployFile entries required by /t:Deploy
paserver_info Read local info about a PAServer Connection Profile (host/port/sysroot)
paserver_check_connection Two-stage reachability probe: registry validation + TCP socket connect
paserver_scratch_dir Compose PAServer’s restricted-mode scratch dir for a profile
paserver_get Pull a file from the PAServer remote host
paserver_put Push a file to the PAServer remote host
paserver_remove Delete a file on the PAServer remote host
ios_codesign Codesign an .app bundle on the remote Mac (paclient -c)
在 GitHub 查看完整 README

安装

uvx --from git+https://github.com/tina4stack/pascal-mcp pascal-mcp
新手?先看 mcpskill.org 教程 →

配置

{ "mcpServers": { "pascal-mcp": { "type": "stdio", "command": "uvx", "args": ["--from", "git+https://github.com/tina4stack/pascal-mcp", "pascal-mcp"] } } }