- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
在我的项目中,我试图将另一个名为 Lang_Unit.pas 的单元与一些类和过程连接起来,但是,在编译项目时,Delphi 给出了名为“[dcc32 Fatal Error] Lang_Unit.pas(5): F2084 的未知错误”内部错误:AV07953449-R26D7474C-0"。
关键是,如果我关闭我的项目,或者删除这个连接的单元,错误不会消失。
如果我创建明确的默认 VCL 应用程序,它仍然会出现此错误。
只有当我重新启动 Delphi 2010 时,错误才会消失。
但是,如果我尝试编辑代码中的某些内容,此错误会再次出现...
什么是问题?一切都很好,我没有碰任何东西。
我刚刚关闭我的电脑,一段时间后将其打开并打开我的项目并编辑我的代码,然后我看到此错误...
如果有帮助,这是我的 Lang_Unit.pas 代码:
unit Languages_UNIT;
interface
Uses
System.Generics.Collections, IniFiles;
Type
TLanguages_List = Class
private
LangType:string;
LangDescription:string;
LangFile:TIniFile;
public
Constructor Create(LType,LDes:string; LFile:TiniFile);
Function GetLangType:string;
Function GetDescription:string;
Function GetStructure:TIniFile;
End;
TLanguages_Controller = Class
public
Function GetStructureByType(RequestedType:string; LangList:TObjectList<TLanguages_List>):TIniFile;
Function TypeExists(RequestedType:string; LangList:TObjectList<TLanguages_List>):Boolean;
Procedure LoadLanguage(RequestedType:string; LangList:TObjectList<TLanguages_List>);
End;
implementation
uses Unit1;
Constructor TLanguages_List.Create(LType,LDes:string; LFile:TiniFile);
Begin
LangType:=LType;
LangDescription:=LDes;
LangFile:=LFile;
End;
Function TLanguages_List.GetLangType:string;
Begin
Result:=LangType;
End;
Function TLanguages_List.GetDescription:string;
Begin
Result:=LangDescription;
End;
Function TLanguages_List.GetStructure:TIniFile;
Begin
Result:=LangFile;
End;
Function TLanguages_Controller.GetStructureByType(RequestedType:string; LangList:TObjectList<TLanguages_List>):TIniFile;
var
i:integer;
Begin
For i := 0 to LangList.Count-1 Do
Begin
IF(LangList[i].GetLangType=RequestedType) Then
Begin
Result:=LangList[i].GetStructure;
Break;
End;
End;
End;
Function TLanguages_Controller.TypeExists(RequestedType:string; LangList:TObjectList<TLanguages_List>):Boolean;
var
i:integer;
GOTYA:Boolean;
Begin
GOTYA:=False;
For i := 0 to LangList.Count-1 Do
Begin
IF(LangList[i].GetLangType=RequestedType) Then
Begin
GOTYA:=True;
Break;
End;
End;
IF(GOTYA) Then
Result:=True
Else
Result:=False;
End;
Procedure TLanguages_Controller.LoadLanguage(RequestedType:string; LangList:TObjectList<TLanguages_List>);
var
i:integer;
SLS:TIniFile;//SELECTED LANGUAGE STRUCTURE
CS:string;//CURRENT SECTION
Begin
//GET SELECTED LANGUAGE STRUCTURE
For i := 0 to LangList.Count-1 Do
Begin
IF(LangList[i].GetLangType=RequestedType) Then
Begin
SLS:=LangList[i].GetStructure;
Break;
End;
End;
//START LOADING SELECTED LANGUAGE
//TABS SECTION LOAD
CS:='TABS';
SD_DEFNAME:=SLS.ReadString(CS,'Speed_Dials','Speed_Dials');
Form1.goleft.Hint:=SLS.ReadString(CS,'Back','Back');
Form1.goright.Hint:=SLS.ReadString(CS,'Forward','Forward');
REFLESHBTN_TEXT:=SLS.ReadString(CS,'Reflesh','Reflesh');
STOPBTN_TEXT:=SLS.ReadString(CS,'Stop','Stop');
//PAGE_POPUP SECTION LOAD
CS:='PAGE_POPUP';
Form1.ChromiumPopup.Items[0].Caption:=SLS.ReadString(CS,'Forward','Forward');
Form1.ChromiumPopup.Items[1].Caption:=SLS.ReadString(CS,'Back','Back');
Form1.ChromiumPopup.Items[2].Caption:=SLS.ReadString(CS,'Reflesh','Reflesh');
Form1.ChromiumPopup.Items[3].Caption:=SLS.ReadString(CS,'Copy_Link','Copy Link');
Form1.ChromiumPopup.Items[4].Caption:=SLS.ReadString(CS,'Save','Save');
Form1.ChromiumPopup.Items[5].Caption:=SLS.ReadString(CS,'Print','Print');
Form1.ChromiumPopup.Items[6].Caption:=SLS.ReadString(CS,'view_source','View Source');
Form1.ChromiumPopup.Items[7].Caption:=SLS.ReadString(CS,'code_debug','Code Debug');
End;
end.
最佳答案
内部错误意味着编译器本身处于“困惑”状态。
摆脱这种情况的方法是:
将代码保存在安全位置以供以后引用。
重新启动德尔福
通过撤消上次编辑或加载临时保存文件,将源代码恢复到上次已知的良好状态。
您可以在_backup
文件夹中找到以前的文件。
确保将文件类型设置为任何文件
。
为了让 Delphi 在编译时生成保存文件,您需要启用自动保存
最好让 Delphi 保留多于默认的 10 个保存。我喜欢将其设置为最大值:90。
只要继续重新启动 Delphi,并编译以前的版本,直到内部错误消失。
然后,您只需以稍微不同的方式重新创建代码即可。(您确实保存了原始代码吗?)
关于德尔福 F2084 内部错误 : AV07953449-R26D7474C-0,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/17889502/
我开始了一个项目,使用 UIImagePickerController 来捕获静态图像。由于叠加层和刚刚捕获的图像之间的交互不佳,我已经放弃使用这种简单的机制。问题如下:如果您有一个叠加层处于事件状态
这个问题在这里已经有了答案: 关闭 10 年前。 Possible Duplicate: How many styles of writing functions are there in C? 我
最近在看GSM音频编码的源码。这些代码是在 1992 年或之后编写的。 有一些奇怪的代码,例如: main P2((ac, av), int ac, char ** av) void Gsm_Code
使用 https://pypi.org/project/av/试图打开文件进行无限播放。但循环以最后一帧结束。 查找和阅读手册后,测试代码如下: (注意:这些选项预计将传递给 aiortc.contr
随着新病毒变种的发布,搜索字符串形式的数据继续增长,这引发了我的问题 - AV 引擎如何如此有效地搜索文件以查找已知签名?如果我下载了一个新文件,我的 AV 扫描仪会根据其签名迅速识别该文件是否为威胁
在应用程序按预期关闭后大约 3 到 5 秒,我收到此 AV 消息: 00073225 模块 rtl160.bpl 中的异常 EAccessViolation。模块 'rtl160.bpl' 中地址 5
在VCL中,TByteDynArray被定义为动态数组: type TByteDynArray = array of Byte; 但似乎没有完成索引边界检查: var DataBytes: Sys
我有两个引用计数类,它们相互引用实例。其中一个引用被标记为 [weak]防止创建强引用循环。 type TFoo = class(TInterfacedObject) private
我通过资源和图像对话框向我的项目添加图标,并决定放弃TIcon.LoadFromResourceName,因为它不执行任何错误检查。我编写了看似等效的代码,但没有按预期工作。 这是一个对我来说失败的测
我正在尝试使用自定义相机,并将代码从 swift 2 转换为 swift 3;我已经很完整了;但是我收到与设备有关的错误;我想要一个后置和前置摄像头,在 swift 2 之前,您可以像这样设置设备:
我想使用透明重定向(Paypal Payments Pro 软件包的功能)来处理结帐。 PayPal 文档(下面的摘录)说,当使用透明重定向时,PayPal 不会处理检查 AVS 和 CSC,把这个任
音频和视频文件可以使用AV Foundation framework播放和 Media Player framework . 当我只想播放媒体文件时,更好的选择是什么? 借助 Media Player
我将本地视频加载到新的 View Controller 中,但在完成后它会消失并立即再次弹出。我不知道是否有办法跟踪通知或什么。 这是我的代码: import UIKit import AVKit i
您好,我正在使用 AV 框架尝试访问前置摄像头... 这是我这样做的代码.. + (AVCaptureDevice *)camera { NSArray *devices = [AVCaptureD
我正在尝试使用 AVPlayer 在 iOS 上播放视频,该视频是用 zencoder 编码的。我看到的问题是播放器项目报告的持续时间是四舍五入的/不精确的。例如,视频持续时间可能是 173.134,
所以我遇到了旋转问题。我有一个 AV 摄像机设置为在 View Controller 中显示。现在我知道其中涉及很多组件,这就是为什么我只是说 AV 摄像机。我的问题是,当我旋转设备时,预览层也不随设
我的公司正在使用 Stripe API 处理信用卡。 Stripe 提供邮政编码和地址验证系统 (AVS) 检查。 AVS 将用户输入的街道号码与发卡银行的街道号码进行核对。 Stripe 返回三个结
我使用 AVFoundation 来拍照。麻烦的是,即使曝光持续时间、ISO 和白平衡的设置不变,我也会得到不同亮度的照片。手电筒、闪光灯和所有可能的稳定性都被禁用。 此问题也出现在介绍使用相机的标准
我正在尝试诱使 AV Foundation 从内存中的 mp4 文件中读取(不使用中间的写入磁盘解决方案)。我尝试了自己的自定义 URL 协议(protocol)但失败了,因为 AV Foundati
我正在尝试加载视频,在其上添加动画,然后将其导出,但动画永远不会在导出的视频中开始播放。它只是按原样显示图像“dogge_icon.png”。 我尝试了不同类型的动画,不确定我做错了什么。任何帮助将不
我是一名优秀的程序员,十分优秀!