delphi 程序运行一个

你好！我来问你一个问题:我多开了一个delphi7运行one-1delphi7程序。我给楼主说清楚:比如大型ERP不止一个exe 程序，而且通常是一个功能模块和一个exe文件，单击某个功能模块，在当前表单中打开该功能模块的EXE文件，所以楼主的意思是:用DELPHI执行一个自己做的exe，让这个EXE嵌入指定的形式，如果那个程序提供了一个可调用的接口，可以用Delphi的OLE容器操作，嵌入到一个表单中，像word一样。

将以下代码添加到程序的主窗体的FORMcreate事件中:过程主窗体。FORMCREATE(发件人:对象)；var errno:integer；hmutex:hwnd；beginhmutex:createmutex(nil，false，pchar(application。标题))；errno:getlasterror；iferrnoerror _ Already _ ExistTheBeginShowMessage(程序Already in运行now )；申请。终止；结束；//...这是你的原始代码。继续吧。

分类:计算机/网络> >程序 design > >其他编程语言问题描述:比如我有一个程序首先，启动页等主窗口加载后，退出启动页，进入主窗口，但是现在主窗口连接到了网页，这时候如果用户网速慢或者网页打不开，需要很长时间才能离开启动页面。在连接到网页之前，如何使主窗口完全显示？分析:你的意思是像Delphi做的WORD启动时的闪屏(作者:Shilu)。精心编写的WINDOWS 程序 display启动注意事项叫做闪屏。

因为项目本身会创建程序的主窗口，并且闪屏必须在主窗口创建之前出现，所以项目文件必须创建自己的启动屏幕。这意味着用户必须修改源代码来创建工程文件，而这在DELPHI编程中通常是不需要的。以下程序介绍了建立溅射屏的过程。1.开始一个新项目。将该窗体命名为MainForm，并将其Caption属性设置为SplashinDemo。

给你个思路:1。使用WinExec、ShellExec或CreateProcess运行Executable程序。//不需要教这一步吧？2.用定时器定时遍历进程的可视化形式，发送消息隐藏窗口。首先，获取已经执行的流程，并将其流程ID放入一个临时变量中。{用于枚举所有表单} function enum _ ALL(Hw:HWND；LP:LPARAM):Boolean；stdcallBeginif进程ID变量intto str(getWindowThreadProcessID(HW))然后beginifsiwindowvisible(HW)和IsWindowEnabled(HW)beginshow窗口(HW，

打开新的DELPHI项目。programProject1usesForms，unit 1 in unit 1 . pas“{ form 1 }”。{$R*。res }开始应用。初始化；申请。CreateForm(TForm1，form 1)；申请。跑步；结束。adelphiApplication程序的条目是项目单元的开始部分。通常，带有窗口程序的应用程序会使用application创建一个隐藏窗口，并建立一个消息循环来接收Windows消息并完成分发操作。以上操作均在应用程序中完成。初始化

取消此dcu文件的链接。如果没有使用，可以直接用ultraedit32编辑下面的dpr文件，删除引用。如果用的话，查一下同名的pas文件，在文件里编译一下，就出来一个dcu文件了。你安装了第三方控件吗？正常情况下，控件的路径应该在控件安装后在环境中设置。如果没有设置，肯定会出现这个问题，或者本来设置了，但是控制文件的路径改变了。

是启动时应该先启动的窗口吗？菜单:项目>选项...，选择forms选项卡，mainform框显示主窗体。如果不想执行unit1，在form2.show后添加exit退出当前进程。至于执行unit2，需要触发相应的事件。

如果是单机版，推荐你用ACCESS或者PARADOX。实际上，paradox占用的资源更少。如果你的数据库要求不高，推荐。否则，请使用ACCESS。只要连接，ADO就能买到一本关于DELPHI数据库的书。如果上面的介绍很简单，可以使用BORLAND专门为DELPHI制作的打包工具EXPRESS_INSTALLshield。有不同版本的FRODELPHI5和DELPHI6，很不错。SQLSERVER是一个相对较大的数据库。如果是桌面版，就不要用了。

呵呵，我太笨了，看不懂你贴的网站内容。不过只有程序 运行 once好像代码很少，要参考Windows units如下:CreateMutex(nil，False， NetSend )；IfgetlasterrorError _ Already _ existthebeginapplication . messagebox(程序Already运行，

MB _ OK)；halt(0)；结束；写入程序单元中。楼上提供的代码和楼主提供的网页代码都可以同时到达程序-2/两次，但是楼主提供的网页代码和楼上不一样:楼主提供的代码只有程序两次运行，但是网页上的代码有一个优点。当您的程序的窗口被其他窗口遮挡时，将会激活运行的主窗口，并将其放置在其他窗口上两次。