|
@@ -314,6 +314,13 @@ begin
|
|
|
Inherited CreateRes(ResStringRec);
|
|
|
end;
|
|
|
|
|
|
+constructor EInOutArgumentException.CreateFmt(const fmt: string; const args : array of const; const aPath : String);
|
|
|
+
|
|
|
+begin
|
|
|
+ Path:=aPath;
|
|
|
+ inherited CreateFmt(fmt,args);
|
|
|
+end;
|
|
|
+
|
|
|
{$if defined(win32) or defined(win64) or defined (wince)}
|
|
|
function EExternal.GetExceptionRecord: PExceptionRecord;
|
|
|
begin
|