Lazarus中文社区

 找回密码
 立即注册(注册审核可向QQ群索取)

QQ登录

只需一步,快速开始

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

Lazarus执行外部程序的方法

[复制链接]

该用户从未签到

发表于 2010-4-12 17:29:29 | 显示全部楼层 |阅读模式
  1.       
  2. s := 'calc.exe';
  3. i := ShellExecute(Form1.Handle, PChar ('open'), PChar (s), PChar (''), PChar (''), 1);   
复制代码
回复

使用道具 举报

该用户从未签到

发表于 2013-3-25 11:06:29 | 显示全部楼层

再加上刚刚渔夫教我的方法,此方式可以跨平台:
uses
  UTF8Process;
BrowserProcess:=TProcessUTF8.Create(nil);
    try
      BrowserProcess.CommandLine:=BrowserPath+' '+BrowserParams;
      BrowserProcess.Execute;
    finally
      BrowserProcess.Free;
    end;
回复 支持 反对

使用道具 举报

*滑块验证:

本版积分规则

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

GMT+8, 2025-5-2 20:22 , Processed in 0.027407 second(s), 10 queries , Redis On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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