在delphi程序运行时，报错

试如下方法：

1、打开开始菜单找“运行”输入“C:\Windows\system32\msxml3.dll”、regsvr32、 C:\Windows\system32\基态msxml3.dll

2、配晌如果上面的方法不行，把以下内容复制到文本文件中，存为1.bat,然后再双击运行此文件。

For %%i in (C:\windows\system32\*.dll) Do regsvr32.exe /s %%i

For %%i in (C:\培锋锋windows\system32\*.ocx) Do regsvr32.exe /s %%i

你可以在按钮的onclick过各中利用windows提供的API函数：WinExec．这个函数的原型如下

函数原型

function

WinExec

external

kernel32

name

'WinExec'

function

WinExec(lpCmdLine:

LPCSTR

uCmdShow:

UINT):

UINT

stdcall

第一个参数为你要运行程序的全路径！

第二个参数是控制程序主窗口的显示方式

第二个参数可能的取值为

：

SW_HIDE

//程序启动后隐藏主窗口

SW_MAXIMIZE

//最大化运兆没乎行

SW_MINIMIZE

//最察毕小化运行

SW_RESTORE

//将最大化或最小化的窗口恢复正常

SW_SHOW

//以当前位置和大小显示主窗口

SW_SHOWMAXIMIZED

//激族悉活窗口并以最大化运行

SW_SHOWMINIMIZED

//激活窗口并以最小化运行

SW_SHOWMINNOACTIVE

//最小化运行，但不激活

SW_SHOWNOACTIVATE

//以上一次的窗口大小运行，但不激活

SW_SHOWNORMAL

//普通方式，一般运行时采用这个

一般情况下，第二个参数取SW_SHOWNORMAL即可，这样就是无参数

你中毒了吧，system.pas本身是亩段delphi的核心文件，是不需要这个文件就可以编译的，而且System.pas是迅顷誉保密的borland不提供源代码的，因为他涉及乎宽到delphi所编写的程序的安全性 重装下delphi吧

---