Delphi 6菜单安装了pack 2之后project---options...不能打开

本文介绍了解决Dephil32.exe遇到的问题的方法,通过在Windows 2003操作系统中调整数据执行保护(DEP)设置来避免程序运行时出现异常。

 

如果是2003操作系统的话(其他系统没验证),在 我的电脑-属性-性能选项-数据执行保护  中添加Dephil32.exe

 

或者关闭DEP(DataExceptionProtect)

 

如下图:

 

 

 

Checking project dependencies... Compiling m8decode.dproj (Debug, Win32) dcc32 command line for "m8decode.dpr" d:\d\rad104\bin\dcc32.exe -$O- -$W+ --no-config -M -Q -TX.exe -AGenerics.Collections=System.Generics.Collections; Generics.Defaults=System.Generics.Defaults;WinTypes=Winapi.Windows;WinProcs=Winapi.Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE -DDEBUG -E.\Win32\Debug -Id:\d\rad104\lib\Win32\debug;D:\d\RAD104\Components\EhLib\Lib\Win32\Debug;d:\d\rad104\lib\Win32\release; C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports;d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp; d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release;"D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source"; D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages;D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104; D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0";D:\d\RAD104\Extra\TNT-Unicode-Controls-master; D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source;D:\d\RAD104\Extra\graphics32-master\graphics32-master\Source; D:\d\RAD104\Extra\cnvcl\Source\Crypto;D:\d\RAD104\Extra\cnvcl\Source\Common;D:\d\RAD104\Extra\LockBox-master\source -LEC:\Users\Public\Documents\Embarcadero\Studio\21.0\Bpl -LNC:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp -NU.\Win32\Debug -NSWinapi; System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell; -Od:\d\rad104\lib\Win32\release;C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports;d:\d\rad104\Imports; C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp;d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release;"D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source";D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages;D:\d\RAD104\icsv870\Lib; D:\d\RAD104\XLSReadWrite\Package\DDX104;D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0"; D:\d\RAD104\Extra\TNT-Unicode-Controls-master;D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source; D:\d\RAD104\Extra\graphics32-master\graphics32-master\Source;D:\d\RAD104\Extra\cnvcl\Source\Crypto;D:\d\RAD104\Extra\cnvcl\Source\Common; D:\d\RAD104\Extra\LockBox-master\source -Rd:\d\rad104\lib\Win32\release;C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports; d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp;d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release; "D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source";D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages; D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104;D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0"; D:\d\RAD104\Extra\TNT-Unicode-Controls-master;D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source; D:\d\RAD104\Extra\graphics32-master\graphics32-master\Source;D:\d\RAD104\Extra\cnvcl\Source\Crypto;D:\d\RAD104\Extra\cnvcl\Source\Common; D:\d\RAD104\Extra\LockBox-master\source -Ud:\d\rad104\lib\Win32\debug;D:\d\RAD104\Components\EhLib\Lib\Win32\Debug;d:\d\rad104\lib\Win32\release; C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports;d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp; d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release;"D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source"; D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages;D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104; D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0";D:\d\RAD104\Extra\TNT-Unicode-Controls-master; D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source;D:\d\RAD104\Extra\graphics32-master\graphics32-master\Source; D:\d\RAD104\Extra\cnvcl\Source\Crypto;D:\d\RAD104\Extra\cnvcl\Source\Common;D:\d\RAD104\Extra\LockBox-master\source -V -VN -NBC:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp -NHC:\Users\Public\Documents\Embarcadero\Studio\21.0\hpp\Win32 -NO.\Win32\Debug m8decode.dpr [dcc32 Fatal Error] AESUtil.pas(6): F2613 Unit 'IdHMACSHA256' not found. Failed Elapsed time: 00:00:00.3 上述代碼報錯
最新发布
11-12
Checking project dependencies... Compiling RPA1.dproj (Debug, Win32) dcc32 command line for "RPA1.dpr" d:\d\rad104\bin\dcc32.exe -$O- -$W+ --no-config -M -Q -TX.exe -AGenerics.Collections=System.Generics.Collections; Generics.Defaults=System.Generics.Defaults;WinTypes=Winapi.Windows;WinProcs=Winapi.Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE -DDEBUG -E.\Win32\Debug -Id:\d\rad104\lib\Win32\debug;D:\d\RAD104\Components\EhLib\Lib\Win32\Debug;d:\d\rad104\lib\Win32\release; C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports;d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp; d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release;"D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source"; D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages;D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104; D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0";D:\d\RAD104\Extra\TNT-Unicode-Controls-master; D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source -LEC:\Users\Public\Documents\Embarcadero\Studio\21.0\Bpl -LNC:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp -NU.\Win32\Debug -NSWinapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde; System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell; -Od:\d\rad104\lib\Win32\release; C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports;d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp; d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release;"D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source"; D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages;D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104; D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0";D:\d\RAD104\Extra\TNT-Unicode-Controls-master; D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source -Rd:\d\rad104\lib\Win32\release;C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports; d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp;d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release; "D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source";D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages; D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104;D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0"; D:\d\RAD104\Extra\TNT-Unicode-Controls-master;D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source -Ud:\d\rad104\lib\Win32\debug; D:\d\RAD104\Components\EhLib\Lib\Win32\Debug;d:\d\rad104\lib\Win32\release;C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports; d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp;d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release; "D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source";D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages; D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104;D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0"; D:\d\RAD104\Extra\TNT-Unicode-Controls-master;D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source -V -VN -NBC:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp -NHC:\Users\Public\Documents\Embarcadero\Studio\21.0\hpp\Win32 -NO.\Win32\Debug RPA1.dpr [dcc32 Error] mainform.pas(68): E2066 Missing operator or semicolon [dcc32 Error] mainform.pas(73): E2003 Undeclared identifier: 'treeview1' [dcc32 Error] mainform.pas(73): E2066 Missing operator or semicolon [dcc32 Error] mainform.pas(77): E2003 Undeclared identifier: 'TreeView1' [dcc32 Error] mainform.pas(77): E2066 Missing operator or semicolon [dcc32 Error] mainform.pas(79): E2003 Undeclared identifier: 'TreeView1' [dcc32 Error] mainform.pas(79): E2066 Missing operator or semicolon [dcc32 Error] mainform.pas(100): E2007 Constant or type identifier expected [dcc32 Fatal Error] RPA1.dpr(5): F2063 Could not compile used unit 'mainform.pas' Failed Elapsed time: 00:00:00.1
10-30
unit mainform; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls; type TForm1 = class(TForm) treeview1: TTreeView; btn1: TButton; btn2: TButton; procedure btn1Click(Sender: TObject); procedure btn2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} function EnumWindowsProc(hWnd: HWND; lParam: LPARAM): BOOL; stdcall; var WindowTitle, ClassName: array[0..255] of Char; IsVisible: Boolean; TreeView: TTreeView; ParentNode: TTreeNode; begin TreeView := TTreeView(lParam); IsVisible := IsWindowVisible(hWnd); if IsVisible then begin // 获取窗口标题和类名 GetWindowText(hWnd, WindowTitle, 256); GetClassName(hWnd, ClassName, 256); // 添加到树形视图 ParentNode := TreeView.Items.Add(nil, Format('窗口: %s [类名: %s]', [WindowTitle, ClassName])); // 添加窗口句柄信息 TreeView.Items.AddChild(ParentNode, Format('句柄: 0x%.8X', [hWnd])); end; Result := True; // 继续枚举 end; // 控件枚举回调函数 function EnumChildProc(hWnd: HWND; lParam: LPARAM): BOOL; stdcall; var ElementText, ClassName: array[0..255] of Char; Rect: TRect; ParentNode: TTreeNode; Node: TTreeNode; begin ParentNode := TTreeNode(lParam); // 获取控件信息 SendMessage(hWnd, WM_GETTEXT, 256, LPARAM(@ElementText)); GetClassName(hWnd, ClassName, 256); GetWindowRect(hWnd, Rect); // 添加到树形视图 Node :=treeview1.Items.AddChild(ParentNode, Format('元素: %s [类名: %s]', [ElementText, ClassName])); // 添加详细信息 MainForm.TreeView1.Items.AddChild(Node, Format('句柄: 0x%.8X', [hWnd])); MainForm.TreeView1.Items.AddChild(Node, Format('位置: (%d, %d) 大小: %dx%d', [Rect.Left, Rect.Top, Rect.Right - Rect.Left, Rect.Bottom - Rect.Top])); Result := True; // 继续枚举 end; procedure TForm1.btn1Click(Sender: TObject); begin TreeView1.Items.BeginUpdate; try TreeView1.Items.Clear; EnumWindows(@EnumWindowsProc, LPARAM(TreeView1)); finally TreeView1.Items.EndUpdate; end; end; procedure TForm1.btn2Click(Sender: TObject); var SelectedNode: TTreeNode; hWnd: HWND; begin if not Assigned(TreeView1.Selected) then Exit; SelectedNode := TreeView1.Selected; while Assigned(SelectedNode.Parent) do SelectedNode := SelectedNode.Parent; if Pos('句柄:', SelectedNode.Text) > 0 then SelectedNode := SelectedNode.Parent; if Pos('窗口:', SelectedNode.Text) > 0 then begin hWnd := HWND(StrToInt('$' + Copy( SelectedNode.getFirstChild.Text, Pos('0x', SelectedNode.getFirstChild.Text) + 2, 8))); TreeView1.Items.BeginUpdate; try SelectedNode.DeleteChildren; // 清除旧数据 EnumChildWindows(hWnd, @EnumChildProc, LPARAM(SelectedNode)); SelectedNode.Expand(True); finally TreeView1.Items.EndUpdate; end; end; end; end. 編譯報錯: Checking project dependencies... Compiling RPA1.dproj (Debug, Win32) dcc32 command line for "RPA1.dpr" d:\d\rad104\bin\dcc32.exe -$O- -$W+ --no-config -M -Q -TX.exe -AGenerics.Collections=System.Generics.Collections; Generics.Defaults=System.Generics.Defaults;WinTypes=Winapi.Windows;WinProcs=Winapi.Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE -DDEBUG -E.\Win32\Debug -Id:\d\rad104\lib\Win32\debug;D:\d\RAD104\Components\EhLib\Lib\Win32\Debug;d:\d\rad104\lib\Win32\release; C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports;d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp; d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release;"D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source"; D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages;D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104; D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0";D:\d\RAD104\Extra\TNT-Unicode-Controls-master; D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source -LEC:\Users\Public\Documents\Embarcadero\Studio\21.0\Bpl -LNC:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp -NU.\Win32\Debug -NSWinapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde; System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell; -Od:\d\rad104\lib\Win32\release; C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports;d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp; d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release;"D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source"; D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages;D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104; D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0";D:\d\RAD104\Extra\TNT-Unicode-Controls-master; D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source -Rd:\d\rad104\lib\Win32\release;C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports; d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp;d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release; "D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source";D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages; D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104;D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0"; D:\d\RAD104\Extra\TNT-Unicode-Controls-master;D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source -Ud:\d\rad104\lib\Win32\debug; D:\d\RAD104\Components\EhLib\Lib\Win32\Debug;d:\d\rad104\lib\Win32\release;C:\Users\f3206373.CFAG\Documents\Embarcadero\Studio\21.0\Imports; d:\d\rad104\Imports;C:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp;d:\d\rad104\include;D:\d\RAD104\Components\EhLib\Lib\Win32\Release; "D:\d\RAD104\TMS VCL UI Pack 10.5.0.2 for Delphi 7-XE10.4 Full Source";D:\d\RAD104\icsv870\Source;D:\d\RAD104\icsv870\Packages; D:\d\RAD104\icsv870\Lib;D:\d\RAD104\XLSReadWrite\Package\DDX104;D:\d\RAD104\Components\ComportV4X103;"D:\d\RAD104\Extra\TMS MQTT v2.0.2.0"; D:\d\RAD104\Extra\TNT-Unicode-Controls-master;D:\d\RAD104\Extra\TNT-Unicode-Controls-master\Source -V -VN -NBC:\Users\Public\Documents\Embarcadero\Studio\21.0\Dcp -NHC:\Users\Public\Documents\Embarcadero\Studio\21.0\hpp\Win32 -NO.\Win32\Debug RPA1.dpr [dcc32 Error] mainform.pas(68): E2066 Missing operator or semicolon [dcc32 Error] mainform.pas(73): E2003 Undeclared identifier: 'treeview1' [dcc32 Error] mainform.pas(73): E2066 Missing operator or semicolon [dcc32 Error] mainform.pas(77): E2003 Undeclared identifier: 'TreeView1' [dcc32 Error] mainform.pas(77): E2066 Missing operator or semicolon [dcc32 Error] mainform.pas(79): E2003 Undeclared identifier: 'TreeView1' [dcc32 Error] mainform.pas(79): E2066 Missing operator or semicolon [dcc32 Error] mainform.pas(100): E2007 Constant or type identifier expected [dcc32 Fatal Error] RPA1.dpr(5): F2063 Could not compile used unit 'mainform.pas' Failed Elapsed time: 00:00:00.1
10-30
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值