Repaso general. Adaptación de librerías. Eliminado el uso del componente JvgWizardHeader.
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@413 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
parent
f84a4c6a9e
commit
b55dd9382c
224
Build/Build.fbp5
224
Build/Build.fbp5
@ -702,12 +702,12 @@ source_path
|
||||
<Property name="MajorVersion" type="Integer">2</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
<Property name="MaxRetryAttempts" type="Cardinal">0</Property>
|
||||
<Property name="MinorVersion" type="Integer">2</Property>
|
||||
<Property name="MinorVersion" type="Integer">3</Property>
|
||||
<Property name="NodeCollapsed" type="Boolean">False</Property>
|
||||
<Property name="PauseInterval" type="Cardinal">0</Property>
|
||||
<Property MultiValue="0" name="ProjectFile" type="WideString">%source_path%\Servidor\FactuGES_Server.dpr</Property>
|
||||
<Property name="RegenerateResource" type="WordBool">True</Property>
|
||||
<Property name="ReleaseVersion" type="Integer">3</Property>
|
||||
<Property name="ReleaseVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ResourceCompilerOptions" type="string"></Property>
|
||||
<Property MultiValue="0" name="ResourceCompilerPath" type="string"></Property>
|
||||
<Property name="ResourceCompilerType" type="TFBDelphiResourceCompiler">rcBorland</Property>
|
||||
@ -722,15 +722,15 @@ source_path
|
||||
<Property name="UseVersionFromDOF" type="Boolean">True</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=Rodax Software S.L.
|
||||
FileDescription=
|
||||
FileVersion=2.2.3.0
|
||||
FileVersion=2.3.1.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=FactuGES (Servidor)
|
||||
ProductVersion=2.2.3.0
|
||||
ProductVersion=2.3.1.0
|
||||
Comments=
|
||||
CompileDate=viernes, 23 de mayo de 2008 17:19
|
||||
CompileDate=miércoles, 11 de marzo de 2009 16:18
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -6788,7 +6788,7 @@ Comments=
|
||||
<Property MultiValue="0" name="LibraryPath" type="WideString">%library_path%</Property>
|
||||
<Property name="LinkerOutput" type="Integer">0</Property>
|
||||
<Property name="LocalSymbols" type="WordBool">False</Property>
|
||||
<Property name="Mapfile" type="Integer">0</Property>
|
||||
<Property name="Mapfile" type="Integer">3</Property>
|
||||
<Property name="MaxStackSize" type="Cardinal">1048576</Property>
|
||||
<Property name="MinStackSize" type="Cardinal">16384</Property>
|
||||
<Property MultiValue="0" name="NamespacePrefixes" type="string"></Property>
|
||||
@ -6916,7 +6916,7 @@ Comments=
|
||||
<Property MultiValue="0" name="LibraryPath" type="WideString">%library_path%</Property>
|
||||
<Property name="LinkerOutput" type="Integer">0</Property>
|
||||
<Property name="LocalSymbols" type="WordBool">False</Property>
|
||||
<Property name="Mapfile" type="Integer">0</Property>
|
||||
<Property name="Mapfile" type="Integer">3</Property>
|
||||
<Property name="MaxStackSize" type="Cardinal">1048576</Property>
|
||||
<Property name="MinStackSize" type="Cardinal">16384</Property>
|
||||
<Property MultiValue="0" name="NamespacePrefixes" type="string"></Property>
|
||||
@ -7754,7 +7754,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -7764,7 +7764,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -7788,7 +7788,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -8264,7 +8273,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -8274,7 +8283,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -8297,7 +8306,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -8882,7 +8900,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -8892,7 +8910,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -8915,7 +8933,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -9409,7 +9436,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -9419,7 +9446,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -9443,7 +9470,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -9528,7 +9564,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -9538,7 +9574,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -9562,7 +9598,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -10380,7 +10425,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -10390,7 +10435,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -10414,7 +10459,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -11168,7 +11222,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -11178,7 +11232,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -11202,7 +11256,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -13261,7 +13324,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -13271,7 +13334,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -13295,7 +13358,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -13756,7 +13828,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -13766,7 +13838,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -13790,7 +13862,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -18068,7 +18149,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -18078,7 +18159,7 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
@ -18102,7 +18183,16 @@ Comments=
|
||||
<Property name="UseProjectSettings" type="TFBUseProjectSettings">[usPackages,usCompiler,usLinker,usVersionInfo]</Property>
|
||||
<Property name="UsePropertySet" type="Boolean">False</Property>
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[FileVersion=1.0.0.0
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="VersionInfoPropertySetName" type="string"></Property>
|
||||
@ -18681,7 +18771,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -18691,9 +18781,9 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">0</Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
<Property name="MaxRetryAttempts" type="Cardinal">0</Property>
|
||||
<Property name="MinorVersion" type="Integer">0</Property>
|
||||
@ -18716,13 +18806,13 @@ Comments=
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=0.0.0.0
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=0.0.0.0
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
@ -18736,17 +18826,14 @@ Comments=
|
||||
<Property name="AssignableConst" type="WordBool">False</Property>
|
||||
<Property name="BoolEval" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="BPLOutputDir" type="WideString">%package_path%</Property>
|
||||
<Property name="CompilerWarnings" type="TStrings"><![CDATA[-w-UNSAFE_TYPE=0
|
||||
-w-UNSAFE_CODE=0
|
||||
-w-UNSAFE_CAST=0
|
||||
]]>
|
||||
<Property name="CompilerWarnings" type="TStrings"><![CDATA[]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="Conditionals" type="WideString"></Property>
|
||||
<Property name="ConsoleApp" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="DCPOutputDir" type="WideString">%modules_dcp_path%</Property>
|
||||
<Property name="DebugInfo" type="WordBool">True</Property>
|
||||
<Property name="DebugInfo" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="DefaultNamespace" type="string"></Property>
|
||||
<Property name="DefinitionsOnly" type="WordBool">True</Property>
|
||||
<Property name="DefinitionsOnly" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="ExeDescription" type="WideString"></Property>
|
||||
<Property name="ExportAllSymbols" type="WordBool">False</Property>
|
||||
<Property name="ExtendedSyntax" type="WordBool">True</Property>
|
||||
@ -18760,8 +18847,8 @@ Comments=
|
||||
<Property name="IOChecking" type="WordBool">True</Property>
|
||||
<Property MultiValue="0" name="LibraryPath" type="WideString">%library_path%</Property>
|
||||
<Property name="LinkerOutput" type="Integer">0</Property>
|
||||
<Property name="LocalSymbols" type="WordBool">True</Property>
|
||||
<Property name="Mapfile" type="Integer">3</Property>
|
||||
<Property name="LocalSymbols" type="WordBool">False</Property>
|
||||
<Property name="Mapfile" type="Integer">0</Property>
|
||||
<Property name="MaxStackSize" type="Cardinal">1048576</Property>
|
||||
<Property name="MinStackSize" type="Cardinal">16384</Property>
|
||||
<Property MultiValue="0" name="NamespacePrefixes" type="string"></Property>
|
||||
@ -18772,7 +18859,7 @@ Comments=
|
||||
<Property MultiValue="0" name="Packages" type="WideString"></Property>
|
||||
<Property name="RangeChecking" type="WordBool">False</Property>
|
||||
<Property name="RecordFieldAlign" type="TFieldAlign">fa8</Property>
|
||||
<Property name="ReferenceInfo" type="WordBool">True</Property>
|
||||
<Property name="ReferenceInfo" type="WordBool">False</Property>
|
||||
<Property name="SafeDivide" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="SearchPath" type="WideString"></Property>
|
||||
<Property name="ShowHints" type="WordBool">True</Property>
|
||||
@ -18811,7 +18898,7 @@ Comments=
|
||||
<Property name="IgnoreFailure" type="WordBool">False</Property>
|
||||
<Property name="IncludeCompileDate" type="WordBool">False</Property>
|
||||
<Property name="IncludeManifest" type="Boolean">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">False</Property>
|
||||
<Property name="IncludeVerInfo" type="WordBool">True</Property>
|
||||
<Property name="IsAction" type="Boolean">True</Property>
|
||||
<Property name="IsBreakPoint" type="WordBool">False</Property>
|
||||
<Property name="IsDebug" type="WordBool">False</Property>
|
||||
@ -18821,9 +18908,9 @@ Comments=
|
||||
<Property name="IsSpecial" type="WordBool">False</Property>
|
||||
<Property name="KeepCFG" type="Boolean">False</Property>
|
||||
<Property name="LinkProductVersionToFileVersion" type="Boolean">False</Property>
|
||||
<Property name="Locale" type="Integer">3081</Property>
|
||||
<Property name="Locale" type="Integer">3082</Property>
|
||||
<Property MultiValue="0" name="LogToVariable" type="string"></Property>
|
||||
<Property name="MajorVersion" type="Integer">0</Property>
|
||||
<Property name="MajorVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
<Property name="MaxRetryAttempts" type="Cardinal">0</Property>
|
||||
<Property name="MinorVersion" type="Integer">0</Property>
|
||||
@ -18846,13 +18933,13 @@ Comments=
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=
|
||||
FileDescription=
|
||||
FileVersion=0.0.0.0
|
||||
FileVersion=1.0.0.0
|
||||
InternalName=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=
|
||||
ProductVersion=0.0.0.0
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
@ -18866,17 +18953,14 @@ Comments=
|
||||
<Property name="AssignableConst" type="WordBool">False</Property>
|
||||
<Property name="BoolEval" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="BPLOutputDir" type="WideString">%package_path%</Property>
|
||||
<Property name="CompilerWarnings" type="TStrings"><![CDATA[-w-UNSAFE_TYPE=0
|
||||
-w-UNSAFE_CODE=0
|
||||
-w-UNSAFE_CAST=0
|
||||
]]>
|
||||
<Property name="CompilerWarnings" type="TStrings"><![CDATA[]]>
|
||||
</Property>
|
||||
<Property MultiValue="0" name="Conditionals" type="WideString"></Property>
|
||||
<Property name="ConsoleApp" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="DCPOutputDir" type="WideString">%modules_dcp_path%</Property>
|
||||
<Property name="DebugInfo" type="WordBool">True</Property>
|
||||
<Property name="DebugInfo" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="DefaultNamespace" type="string"></Property>
|
||||
<Property name="DefinitionsOnly" type="WordBool">True</Property>
|
||||
<Property name="DefinitionsOnly" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="ExeDescription" type="WideString"></Property>
|
||||
<Property name="ExportAllSymbols" type="WordBool">False</Property>
|
||||
<Property name="ExtendedSyntax" type="WordBool">True</Property>
|
||||
@ -18890,8 +18974,8 @@ Comments=
|
||||
<Property name="IOChecking" type="WordBool">True</Property>
|
||||
<Property MultiValue="0" name="LibraryPath" type="WideString">%library_path%</Property>
|
||||
<Property name="LinkerOutput" type="Integer">0</Property>
|
||||
<Property name="LocalSymbols" type="WordBool">True</Property>
|
||||
<Property name="Mapfile" type="Integer">3</Property>
|
||||
<Property name="LocalSymbols" type="WordBool">False</Property>
|
||||
<Property name="Mapfile" type="Integer">0</Property>
|
||||
<Property name="MaxStackSize" type="Cardinal">1048576</Property>
|
||||
<Property name="MinStackSize" type="Cardinal">16384</Property>
|
||||
<Property MultiValue="0" name="NamespacePrefixes" type="string"></Property>
|
||||
@ -18902,7 +18986,7 @@ Comments=
|
||||
<Property MultiValue="0" name="Packages" type="WideString"></Property>
|
||||
<Property name="RangeChecking" type="WordBool">False</Property>
|
||||
<Property name="RecordFieldAlign" type="TFieldAlign">fa8</Property>
|
||||
<Property name="ReferenceInfo" type="WordBool">True</Property>
|
||||
<Property name="ReferenceInfo" type="WordBool">False</Property>
|
||||
<Property name="SafeDivide" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="SearchPath" type="WideString"></Property>
|
||||
<Property name="ShowHints" type="WordBool">True</Property>
|
||||
@ -19486,12 +19570,12 @@ Comments=
|
||||
<Property name="MajorVersion" type="Integer">2</Property>
|
||||
<Property MultiValue="0" name="ManifestFile" type="string"></Property>
|
||||
<Property name="MaxRetryAttempts" type="Cardinal">0</Property>
|
||||
<Property name="MinorVersion" type="Integer">1</Property>
|
||||
<Property name="MinorVersion" type="Integer">3</Property>
|
||||
<Property name="NodeCollapsed" type="Boolean">False</Property>
|
||||
<Property name="PauseInterval" type="Cardinal">0</Property>
|
||||
<Property MultiValue="0" name="ProjectFile" type="WideString">%source_path%\Cliente\FactuGES.dpr</Property>
|
||||
<Property name="RegenerateResource" type="WordBool">True</Property>
|
||||
<Property name="ReleaseVersion" type="Integer">4</Property>
|
||||
<Property name="ReleaseVersion" type="Integer">1</Property>
|
||||
<Property MultiValue="0" name="ResourceCompilerOptions" type="string"></Property>
|
||||
<Property MultiValue="0" name="ResourceCompilerPath" type="string"></Property>
|
||||
<Property name="ResourceCompilerType" type="TFBDelphiResourceCompiler">rcBorland</Property>
|
||||
@ -19506,13 +19590,13 @@ Comments=
|
||||
<Property name="UseVersionFromDOF" type="Boolean">False</Property>
|
||||
<Property MultiValue="1" name="VersionInfoKeys" type="WideString"><![CDATA[CompanyName=Rodax Software S.L.
|
||||
FileDescription=
|
||||
FileVersion=2.1.4.0
|
||||
FileVersion=2.3.1.0
|
||||
InternalName=FactuGES
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
OriginalFilename=
|
||||
ProductName=FactuGES
|
||||
ProductVersion=2.1.4
|
||||
ProductVersion=2.3.1.0
|
||||
Comments=
|
||||
]]>
|
||||
</Property>
|
||||
@ -19556,7 +19640,7 @@ Comments=
|
||||
<Property name="Optimisation" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="OutputDir" type="WideString">%output_path%\Cliente</Property>
|
||||
<Property name="OverflowChecking" type="WordBool">False</Property>
|
||||
<Property MultiValue="0" name="Packages" type="WideString">PluginSDK_D10R;GUISDK_D11;Base;GUIBase;ApplicationBase;</Property>
|
||||
<Property MultiValue="0" name="Packages" type="WideString">PluginSDK_D11R;GUISDK_D11R;Base;GUIBase;ApplicationBase;</Property>
|
||||
<Property name="RangeChecking" type="WordBool">False</Property>
|
||||
<Property name="RecordFieldAlign" type="TFieldAlign">fa8</Property>
|
||||
<Property name="ReferenceInfo" type="WordBool">True</Property>
|
||||
|
||||
@ -410,7 +410,7 @@ CREATE TABLE COMISIONES_LIQ_VENDEDORES(
|
||||
ID TIPO_ID NOT NULL,
|
||||
ID_COMISION TIPO_ID,
|
||||
ID_VENDEDOR TIPO_ID,
|
||||
NOMBRE VARCHAR(255) COLLATE ES_ES,
|
||||
NOMBRE VARCHAR(255),
|
||||
COMISION TIPO_PORCENTAJE,
|
||||
IMPORTE_TOTAL TIPO_IMPORTE);
|
||||
|
||||
@ -449,7 +449,7 @@ CREATE TABLE ALBARANES_CLIENTE (
|
||||
FECHA_ENVIO DATE,
|
||||
FECHA_RECEPCION DATE,
|
||||
FECHA_PREVISTA_ENVIO DATE,
|
||||
REFERENCIA_CLIENTE VARCHAR(255) COLLATE ES_ES,
|
||||
REFERENCIA_CLIENTE VARCHAR(255),
|
||||
ID_TIENDA TIPO_ID
|
||||
);
|
||||
|
||||
@ -583,7 +583,7 @@ CREATE TABLE CLIENTES_DATOS (
|
||||
CODIGO_ASIGNADO VARCHAR(255),
|
||||
IGNORAR_CONTABILIDAD TIPO_ID,
|
||||
TIENE_SUBCUENTA TIPO_ID,
|
||||
PROCEDENCIA_CLIENTE VARCHAR(255) COLLATE ES_ES,
|
||||
PROCEDENCIA_CLIENTE VARCHAR(255),
|
||||
VENCIMIENTO_FACTURAS_1 INTEGER,
|
||||
VENCIMIENTO_FACTURAS_2 INTEGER,
|
||||
VENCIMIENTO_FACTURAS_3 INTEGER
|
||||
@ -632,7 +632,7 @@ CREATE TABLE CONT_APUNTES (
|
||||
ID_SUBCUENTA TIPO_ID,
|
||||
NUM_ORDEN TIPO_ID,
|
||||
CONCEPTO VARCHAR(255),
|
||||
DOCUMENTO VARCHAR(255) COLLATE ES_ES,
|
||||
DOCUMENTO VARCHAR(255),
|
||||
PUNTEADO SMALLINT,
|
||||
DEBE TIPO_IMPORTE,
|
||||
HABER TIPO_IMPORTE
|
||||
@ -848,7 +848,7 @@ CREATE TABLE EMPRESAS_TIENDAS (
|
||||
NOTAS TIPO_NOTAS,
|
||||
FECHA_ALTA TIMESTAMP,
|
||||
FECHA_MODIFICACION TIMESTAMP,
|
||||
CODIGO_CONTABLE VARCHAR(2) COLLATE ES_ES
|
||||
CODIGO_CONTABLE VARCHAR(2)
|
||||
);
|
||||
|
||||
CREATE TABLE EMPRESAS_USUARIOS (
|
||||
@ -1068,7 +1068,7 @@ CREATE TABLE PEDIDOS_CLIENTE (
|
||||
ID_FORMA_PAGO TIPO_ID,
|
||||
REF_TIENDA_WEB INTEGER,
|
||||
FECHA_PREVISTA_ENVIO DATE,
|
||||
REFERENCIA_CLIENTE VARCHAR(255) COLLATE ES_ES,
|
||||
REFERENCIA_CLIENTE VARCHAR(255),
|
||||
ID_TIENDA TIPO_ID
|
||||
);
|
||||
|
||||
@ -1190,8 +1190,8 @@ CREATE TABLE PRESUPUESTOS_CLIENTE (
|
||||
IMPORTE_IVA TIPO_IMPORTE,
|
||||
IMPORTE_TOTAL TIPO_IMPORTE,
|
||||
ID_FORMA_PAGO TIPO_ID,
|
||||
REFERENCIA_CLIENTE VARCHAR(255) COLLATE ES_ES,
|
||||
CLIENTE_FINAL VARCHAR(255) COLLATE ES_ES,
|
||||
REFERENCIA_CLIENTE VARCHAR(255),
|
||||
CLIENTE_FINAL VARCHAR(255),
|
||||
ID_TIENDA TIPO_ID,
|
||||
ID_VENDEDOR TIPO_ID
|
||||
);
|
||||
@ -1262,12 +1262,12 @@ CREATE TABLE RECIBOS_CLIENTE (
|
||||
ID_REMESA TIPO_ID,
|
||||
ID_RECIBO_COMPENSADO INTEGER,
|
||||
ID_TIENDA TIPO_ID,
|
||||
NIF_CIF VARCHAR(15) COLLATE ES_ES,
|
||||
NOMBRE VARCHAR(255) COLLATE ES_ES,
|
||||
CALLE VARCHAR(255) COLLATE ES_ES,
|
||||
POBLACION VARCHAR(255) COLLATE ES_ES,
|
||||
PROVINCIA VARCHAR(255) COLLATE ES_ES,
|
||||
CODIGO_POSTAL VARCHAR(10) COLLATE ES_ES
|
||||
NIF_CIF VARCHAR(15),
|
||||
NOMBRE VARCHAR(255),
|
||||
CALLE VARCHAR(255),
|
||||
POBLACION VARCHAR(255),
|
||||
PROVINCIA VARCHAR(255),
|
||||
CODIGO_POSTAL VARCHAR(10)
|
||||
);
|
||||
|
||||
|
||||
@ -1290,12 +1290,12 @@ CREATE TABLE RECIBOS_PROVEEDOR (
|
||||
ID_REMESA TIPO_ID,
|
||||
ID_RECIBO_COMPENSADO INTEGER,
|
||||
ID_TIENDA TIPO_ID,
|
||||
NIF_CIF VARCHAR(15) COLLATE ES_ES,
|
||||
NOMBRE VARCHAR(255) COLLATE ES_ES,
|
||||
CALLE VARCHAR(255) COLLATE ES_ES,
|
||||
POBLACION VARCHAR(255) COLLATE ES_ES,
|
||||
PROVINCIA VARCHAR(255) COLLATE ES_ES,
|
||||
CODIGO_POSTAL VARCHAR(10) COLLATE ES_ES
|
||||
NIF_CIF VARCHAR(15),
|
||||
NOMBRE VARCHAR(255),
|
||||
CALLE VARCHAR(255),
|
||||
POBLACION VARCHAR(255),
|
||||
PROVINCIA VARCHAR(255),
|
||||
CODIGO_POSTAL VARCHAR(10)
|
||||
);
|
||||
|
||||
CREATE TABLE REFERENCIAS (
|
||||
@ -1304,7 +1304,7 @@ CREATE TABLE REFERENCIAS (
|
||||
ID_TIENDA TIPO_ID,
|
||||
CODIGO VARCHAR(50) NOT NULL,
|
||||
VALOR VARCHAR(255) NOT NULL,
|
||||
DESCRIPCION VARCHAR(255) COLLATE ES_ES
|
||||
DESCRIPCION VARCHAR(255)
|
||||
);
|
||||
|
||||
CREATE TABLE REMESAS_CLIENTE (
|
||||
@ -1545,7 +1545,7 @@ SELECT
|
||||
ALBARANES_CLIENTE.FECHA_ALBARAN,
|
||||
ALBARANES_CLIENTE.REFERENCIA,
|
||||
ALBARANES_CLIENTE.REFERENCIA_CLIENTE,
|
||||
ALBARANES_CLIENTE.TIPO,
|
||||
ALBARANES_CLIENTE.TIPO,
|
||||
TRIM(V_ALB_CLI_SITUACION.SITUACION),
|
||||
ALBARANES_CLIENTE.ID_ALMACEN,
|
||||
ALMACENES.NOMBRE AS NOMBRE_ALMACEN,
|
||||
@ -1872,10 +1872,10 @@ SELECT
|
||||
CLIENTES_DATOS.IGNORAR_CONTABILIDAD,
|
||||
CLIENTES_DATOS.TIENE_SUBCUENTA,
|
||||
CLIENTES_DATOS.PROCEDENCIA_CLIENTE,
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_1,
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_2,
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_3
|
||||
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_1,
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_2,
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_3
|
||||
|
||||
FROM V_CONTACTOS
|
||||
LEFT OUTER JOIN CLIENTES_DATOS ON (V_CONTACTOS.ID = CLIENTES_DATOS.ID_CLIENTE)
|
||||
WHERE
|
||||
@ -1924,9 +1924,9 @@ CREATE VIEW V_PROVEEDORES(
|
||||
TIENE_SUBCUENTA,
|
||||
NOMBRE_COMERCIAL,
|
||||
ES_ACREEDOR,
|
||||
VENCIMIENTO_FACTURAS_1,
|
||||
VENCIMIENTO_FACTURAS_2,
|
||||
VENCIMIENTO_FACTURAS_3)
|
||||
VENCIMIENTO_FACTURAS_1,
|
||||
VENCIMIENTO_FACTURAS_2,
|
||||
VENCIMIENTO_FACTURAS_3)
|
||||
AS
|
||||
SELECT
|
||||
V_CONTACTOS.ID,
|
||||
|
||||
@ -923,7 +923,7 @@ BEGIN
|
||||
END
|
||||
^
|
||||
|
||||
CREATE TRIGGER CONTACTOS_DAT_PER_DELETE_REPL FOR CONTACTOS_DATOS_PERSONAL
|
||||
CREATE TRIGGER CONTACTOS_DATOS_PER_DEL_REPL FOR CONTACTOS_DATOS_PERSONAL
|
||||
ACTIVE AFTER DELETE POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
@ -936,7 +936,7 @@ BEGIN
|
||||
END
|
||||
^
|
||||
|
||||
CREATE TRIGGER CONTACTOS_DAT_PER_INSERT_REPL FOR CONTACTOS_DATOS_PERSONAL
|
||||
CREATE TRIGGER CONTACTOS_DATOS_PER_INS_REPL FOR CONTACTOS_DATOS_PERSONAL
|
||||
ACTIVE AFTER INSERT POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
@ -949,7 +949,7 @@ BEGIN
|
||||
END
|
||||
^
|
||||
|
||||
CREATE TRIGGER CONTACTOS_DAT_PER_UPDATE_REPL FOR CONTACTOS_DATOS_PERSONAL
|
||||
CREATE TRIGGER CONTACTOS_DATOS_PER_UPD_REPL FOR CONTACTOS_DATOS_PERSONAL
|
||||
ACTIVE AFTER UPDATE POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
@ -1323,51 +1323,6 @@ END
|
||||
^
|
||||
|
||||
|
||||
/* Trigger: VENDEDORES_DATOS_DELETE_REPL */
|
||||
CREATE TRIGGER VENDEDORES_DATOS_DELETE_REPL FOR VENDEDORES_DATOS
|
||||
ACTIVE AFTER DELETE POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
IF( USER <> 'REPL' ) THEN
|
||||
BEGIN
|
||||
INSERT INTO CHANGES(TABLEKEY,TABLENAME,OP,LOC_ID)
|
||||
SELECT OLD.ID_VENDEDOR,'VENDEDORES_DATOS','D',LOC_ID
|
||||
FROM REPL_TABLES WHERE TABLENAME='VENDEDORES_DATOS';
|
||||
END
|
||||
END
|
||||
^
|
||||
|
||||
|
||||
/* Trigger: VENDEDORES_DATOS_INSERT_REPL */
|
||||
CREATE TRIGGER VENDEDORES_DATOS_INSERT_REPL FOR VENDEDORES_DATOS
|
||||
ACTIVE AFTER INSERT POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
IF( USER <> 'REPL' ) THEN
|
||||
BEGIN
|
||||
INSERT INTO CHANGES(TABLEKEY,TABLENAME,OP,LOC_ID)
|
||||
SELECT NEW.ID_VENDEDOR,'VENDEDORES_DATOS','I',LOC_ID
|
||||
FROM REPL_TABLES WHERE TABLENAME='VENDEDORES_DATOS';
|
||||
END
|
||||
END
|
||||
^
|
||||
|
||||
|
||||
/* Trigger: VENDEDORES_DATOS_UPDATE_REPL */
|
||||
CREATE TRIGGER VENDEDORES_DATOS_UPDATE_REPL FOR VENDEDORES_DATOS
|
||||
ACTIVE AFTER UPDATE POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
IF( USER <> 'REPL' ) THEN
|
||||
BEGIN
|
||||
INSERT INTO CHANGES(TABLEKEY,TABLENAME,OP,LOC_ID)
|
||||
SELECT NEW.ID_VENDEDOR,'VENDEDORES_DATOS','U',LOC_ID
|
||||
FROM REPL_TABLES WHERE TABLENAME='VENDEDORES_DATOS';
|
||||
END
|
||||
END
|
||||
^
|
||||
|
||||
|
||||
/* Trigger: EMPRESAS_CONTACTOS_DELETE_REPL */
|
||||
CREATE TRIGGER EMPRESAS_CONTACTOS_DELETE_REPL FOR EMPRESAS_CONTACTOS
|
||||
ACTIVE AFTER DELETE POSITION 0
|
||||
@ -1457,6 +1412,47 @@ BEGIN
|
||||
END
|
||||
^
|
||||
|
||||
/* Trigger: EMPRESAS_TIENDAS_DELETE_REPL */
|
||||
CREATE TRIGGER EMPRESAS_TIENDAS_DELETE_REPL FOR EMPRESAS_TIENDAS
|
||||
ACTIVE AFTER DELETE POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
IF( USER <> 'REPL' ) THEN
|
||||
BEGIN
|
||||
INSERT INTO CHANGES(TABLEKEY,TABLENAME,OP,LOC_ID)
|
||||
SELECT OLD.ID,'EMPRESAS_TIENDAS','D',LOC_ID
|
||||
FROM REPL_TABLES WHERE TABLENAME='EMPRESAS_TIENDAS';
|
||||
END
|
||||
END
|
||||
^
|
||||
|
||||
/* Trigger: EMPRESAS_TIENDAS_INSERT_REPL */
|
||||
CREATE TRIGGER EMPRESAS_TIENDAS_INSERT_REPL FOR EMPRESAS_TIENDAS
|
||||
ACTIVE AFTER INSERT POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
IF( USER <> 'REPL' ) THEN
|
||||
BEGIN
|
||||
INSERT INTO CHANGES(TABLEKEY,TABLENAME,OP,LOC_ID)
|
||||
SELECT NEW.ID,'EMPRESAS_TIENDAS','I',LOC_ID
|
||||
FROM REPL_TABLES WHERE TABLENAME='EMPRESAS_TIENDAS';
|
||||
END
|
||||
END
|
||||
^
|
||||
|
||||
/* Trigger: EMPRESAS_TIENDAS_UPDATE_REPL */
|
||||
CREATE TRIGGER EMPRESAS_TIENDAS_UPDATE_REPL FOR EMPRESAS_TIENDAS
|
||||
ACTIVE AFTER UPDATE POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
IF( USER <> 'REPL' ) THEN
|
||||
BEGIN
|
||||
INSERT INTO CHANGES(TABLEKEY,TABLENAME,OP,LOC_ID)
|
||||
SELECT NEW.ID,'EMPRESAS_TIENDAS','U',LOC_ID
|
||||
FROM REPL_TABLES WHERE TABLENAME='EMPRESAS_TIENDAS';
|
||||
END
|
||||
END
|
||||
^
|
||||
|
||||
/* Trigger: EMPRESAS_DELETE_REPL */
|
||||
CREATE TRIGGER EMPRESAS_DELETE_REPL FOR EMPRESAS
|
||||
@ -2717,6 +2713,48 @@ BEGIN
|
||||
END
|
||||
^
|
||||
|
||||
/* Trigger: VENDEDORES_DATOS_DELETE_REPL */
|
||||
CREATE TRIGGER VENDEDORES_DATOS_DELETE_REPL FOR VENDEDORES_DATOS
|
||||
ACTIVE AFTER DELETE POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
IF( USER <> 'REPL' ) THEN
|
||||
BEGIN
|
||||
INSERT INTO CHANGES(TABLEKEY,TABLENAME,OP,LOC_ID)
|
||||
SELECT OLD.ID_VENDEDOR,'VENDEDORES_DATOS','D',LOC_ID
|
||||
FROM REPL_TABLES WHERE TABLENAME='VENDEDORES_DATOS';
|
||||
END
|
||||
END
|
||||
^
|
||||
|
||||
/* Trigger: VENDEDORES_DATOS_INSERT_REPL */
|
||||
CREATE TRIGGER VENDEDORES_DATOS_INSERT_REPL FOR VENDEDORES_DATOS
|
||||
ACTIVE AFTER INSERT POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
IF( USER <> 'REPL' ) THEN
|
||||
BEGIN
|
||||
INSERT INTO CHANGES(TABLEKEY,TABLENAME,OP,LOC_ID)
|
||||
SELECT NEW.ID_VENDEDOR,'VENDEDORES_DATOS','I',LOC_ID
|
||||
FROM REPL_TABLES WHERE TABLENAME='VENDEDORES_DATOS';
|
||||
END
|
||||
END
|
||||
^
|
||||
|
||||
/* Trigger: VENDEDORES_DATOS_UPDATE_REPL */
|
||||
CREATE TRIGGER VENDEDORES_DATOS_UPDATE_REPL FOR VENDEDORES_DATOS
|
||||
ACTIVE AFTER UPDATE POSITION 0
|
||||
AS
|
||||
BEGIN
|
||||
IF( USER <> 'REPL' ) THEN
|
||||
BEGIN
|
||||
INSERT INTO CHANGES(TABLEKEY,TABLENAME,OP,LOC_ID)
|
||||
SELECT NEW.ID_VENDEDOR,'VENDEDORES_DATOS','U',LOC_ID
|
||||
FROM REPL_TABLES WHERE TABLENAME='VENDEDORES_DATOS';
|
||||
END
|
||||
END
|
||||
^
|
||||
|
||||
|
||||
/* Trigger: UNIDADES_MEDIDA_DELETE_REPL */
|
||||
CREATE TRIGGER UNIDADES_MEDIDA_DELETE_REPL FOR UNIDADES_MEDIDA
|
||||
|
||||
@ -9,11 +9,10 @@ cxIntl6D11.bpl
|
||||
cxIntlPrintSys3D11.bpl
|
||||
cxLibraryD11.bpl
|
||||
cxPageControlD11.bpl
|
||||
cxTreeListD11.bpl
|
||||
cxTreeListD11.bpl
|
||||
DataAbstract_Core_D11.bpl
|
||||
dclcxLibraryD11.bpl
|
||||
dxBarD11.bpl
|
||||
dxNavBarD11.bpl
|
||||
dxBarExtItemsD11.bpl
|
||||
dxComnD11.bpl
|
||||
dxGDIPlusD11.bpl
|
||||
@ -24,12 +23,13 @@ dxPScxGrid6LnkD11.bpl
|
||||
dxPSLnksD11.bpl
|
||||
dxPsPrVwAdvD11.bpl
|
||||
dxThemeD11.bpl
|
||||
dxCored11.bpl
|
||||
frx11.bpl
|
||||
frxe11.bpl
|
||||
frxTee11.bpl
|
||||
fs11.bpl
|
||||
fsTee11.bpl
|
||||
GUISDK_D11.bpl
|
||||
GUISDK_D11R.bpl
|
||||
Jcl110.bpl
|
||||
JclVcl110.bpl
|
||||
JSDialog100.bpl
|
||||
@ -48,7 +48,7 @@ JvSystemD11R.bpl
|
||||
pckMD5.bpl
|
||||
pckUCDataConnector.bpl
|
||||
pckUserControl_RT.bpl
|
||||
PluginSDK_D10R.bpl
|
||||
PluginSDK_D11R.bpl
|
||||
PngComponentsD10.bpl
|
||||
PNG_D10.bpl
|
||||
RemObjects_Core_D11.bpl
|
||||
|
||||
@ -42,7 +42,7 @@ requires
|
||||
dxGDIPlusD11,
|
||||
dxNavBarD11,
|
||||
vcljpg,
|
||||
GUISDK_D11,
|
||||
GUISDK_D11R,
|
||||
xmlrtl,
|
||||
cfpack_d11,
|
||||
vclx,
|
||||
|
||||
@ -49,6 +49,9 @@
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\DataAbstract_SQLiteDriver_D11.bpl">RemObjects Data Abstract - SQLite Driver</Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
|
||||
@ -59,6 +62,29 @@
|
||||
<DelphiCompile Include="ApplicationBase.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\Modulos\Contactos\adortl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Base.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\ccpackD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cfpack_d11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dbrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\designide.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dsnap.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxNavBarD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\GUIBase.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvJansD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\rtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vclactnband.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vcldb.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vcljpg.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vclx.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\xmlrtl.dcp" />
|
||||
<DCCReference Include="Configuracion\Controller\uConfiguracionController.pas" />
|
||||
<DCCReference Include="Configuracion\Controller\Views\uIViewConfiguracionBase.pas" />
|
||||
<DCCReference Include="Configuracion\Views\uEditorConfiguracion.pas">
|
||||
@ -73,32 +99,9 @@
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Ejercicios\Controller\uEjerciciosController.pas" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\adortl.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\Base.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\ccpackD11.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\cfpack_d11.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\dbrtl.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\designide.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\dsnap.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\dxNavBarD11.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\dxThemeD11.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\GUIBase.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\GUISDK_D11.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\JvJansD11R.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\rtl.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\uIEditorEjercicio.pas" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\uIEditorEjercicios.pas" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\uIEditorElegirEjercicios.pas" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\vcl.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\vclactnband.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\vcldb.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\vcljpg.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\vclx.dcp" />
|
||||
<DCCReference Include="Ejercicios\Controller\View\xmlrtl.dcp" />
|
||||
<DCCReference Include="Ejercicios\Data\uDataModuleEjercicios.pas">
|
||||
<Form>DataModuleEjercicios</Form>
|
||||
</DCCReference>
|
||||
|
||||
@ -219,8 +219,7 @@ end;
|
||||
|
||||
function TEjerciciosController.ValidarEjercicio(AEjercicio: IBizEjercicio): Boolean;
|
||||
begin
|
||||
Result := False;
|
||||
|
||||
|
||||
if not Assigned(AEjercicio) then
|
||||
raise Exception.Create ('Ejercicio no asignado');
|
||||
|
||||
|
||||
Binary file not shown.
@ -86,7 +86,7 @@
|
||||
<DCCReference Include="ApplicationBase.dcp" />
|
||||
<DCCReference Include="Base.dcp" />
|
||||
<DCCReference Include="GUIBase.dcp" />
|
||||
<DCCReference Include="PluginSDK_D10R.dcp" />
|
||||
<DCCReference Include="PluginSDK_D11R.dcp" />
|
||||
<DCCReference Include="PngComponentsD10.dcp" />
|
||||
<DCCReference Include="PNG_D10.dcp" />
|
||||
<DCCReference Include="rtl.dcp" />
|
||||
|
||||
@ -91,7 +91,7 @@ end;
|
||||
|
||||
procedure TsrvEjercicios.DARemoteServiceCreate(Sender: TObject);
|
||||
begin
|
||||
SessionManager := dmServer.SessionManager;
|
||||
//SessionManager := dmServer.SessionManager;
|
||||
bpEjercicios.BusinessRulesID := BIZ_SERVER_EJERCICIOS;
|
||||
end;
|
||||
|
||||
|
||||
@ -1,44 +1,17 @@
|
||||
inherited fEditorElegirEjercicios: TfEditorElegirEjercicios
|
||||
Caption = 'fEditorElegirEjercicios'
|
||||
ClientHeight = 533
|
||||
ExplicitWidth = 551
|
||||
ExplicitHeight = 567
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object JvgWizardHeader1: TJvgWizardHeader [0]
|
||||
Left = 0
|
||||
Top = 27
|
||||
Width = 543
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Seleccione la subcuenta')
|
||||
Comments.Strings = (
|
||||
' ')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitLeft = -113
|
||||
ExplicitWidth = 656
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Top = 64
|
||||
ExplicitTop = 64
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Top = 87
|
||||
ExplicitTop = 87
|
||||
Top = 91
|
||||
ExplicitTop = 91
|
||||
inherited tbxMain: TTBXToolbar
|
||||
ExplicitWidth = 269
|
||||
inherited TBXItem36: TTBXItem
|
||||
@ -56,13 +29,13 @@ inherited fEditorElegirEjercicios: TfEditorElegirEjercicios
|
||||
ExplicitTop = 514
|
||||
end
|
||||
inherited frViewEjercicios1: TfrViewEjercicios
|
||||
Top = 162
|
||||
Height = 303
|
||||
ExplicitTop = 162
|
||||
ExplicitHeight = 303
|
||||
Top = 166
|
||||
Height = 299
|
||||
ExplicitTop = 166
|
||||
ExplicitHeight = 299
|
||||
inherited cxGrid: TcxGrid
|
||||
Height = 175
|
||||
ExplicitHeight = 175
|
||||
Height = 171
|
||||
ExplicitHeight = 171
|
||||
inherited cxGridView: TcxGridDBTableView
|
||||
DataController.Summary.FooterSummaryItems = <
|
||||
item
|
||||
@ -79,29 +52,23 @@ inherited fEditorElegirEjercicios: TfEditorElegirEjercicios
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
inherited dxLayoutControl1: TdxLayoutControl
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 273
|
||||
Width = 273
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited pnlAgrupaciones: TTBXDockablePanel
|
||||
Top = 277
|
||||
ExplicitTop = 277
|
||||
Top = 273
|
||||
ExplicitTop = 273
|
||||
end
|
||||
inherited dxComponentPrinter: TdxComponentPrinter
|
||||
inherited dxComponentPrinterLink: TdxGridReportLink
|
||||
@ -117,7 +84,7 @@ inherited fEditorElegirEjercicios: TfEditorElegirEjercicios
|
||||
end>
|
||||
end
|
||||
end
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [5]
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
|
||||
Left = 0
|
||||
Top = 465
|
||||
Width = 543
|
||||
@ -155,6 +122,54 @@ inherited fEditorElegirEjercicios: TfEditorElegirEjercicios
|
||||
end
|
||||
end
|
||||
end
|
||||
object pnlHeader: TPanel [5]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 543
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 5
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 493
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Seleccione la subcuenta'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 135
|
||||
end
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 468
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
ExplicitWidth = 3
|
||||
ExplicitHeight = 13
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList [6]
|
||||
inherited actNuevo: TAction
|
||||
Enabled = False
|
||||
|
||||
@ -10,16 +10,18 @@ uses
|
||||
uViewGrid, uViewEjercicios, ComCtrls, JvExComCtrls, JvStatusBar, TBX,
|
||||
TB2ExtItems, TBXExtItems, TB2Item, TB2Dock, TB2Toolbar, dxGDIPlusClasses,
|
||||
ExtCtrls, JvExControls, JvNavigationPane, uViewBarraSeleccion, uIEditorElegirEjercicios,
|
||||
UBizEjercicios, JvgWizardHeader;
|
||||
UBizEjercicios, StdCtrls;
|
||||
|
||||
type
|
||||
TfEditorElegirEjercicios = class(TfEditorEjercicios, IEditorElegirEjercicios)
|
||||
frViewBarraSeleccion1: TfrViewBarraSeleccion;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
EditorSeleccionActionList: TActionList;
|
||||
actBuscar2: TAction;
|
||||
actQuitarFiltro2: TAction;
|
||||
actAnchoAuto2: TAction;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject);
|
||||
@ -97,7 +99,7 @@ end;
|
||||
|
||||
function TfEditorElegirEjercicios.GetMensaje: String;
|
||||
begin
|
||||
Result := JvgWizardHeader1.Comments.Text;
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
function TfEditorElegirEjercicios.GetMultiSelect: Boolean;
|
||||
@ -107,7 +109,7 @@ end;
|
||||
|
||||
procedure TfEditorElegirEjercicios.SetMensaje(const AValue: String);
|
||||
begin
|
||||
JvgWizardHeader1.Comments.Text := AValue;
|
||||
lblComments.Caption := AValue;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirEjercicios.SetMultiSelect(AValue: Boolean);
|
||||
|
||||
@ -300,8 +300,6 @@ end;
|
||||
|
||||
function TEmpresasController.ValidarEmpresa(AEmpresa: IBizEmpresa): Boolean;
|
||||
begin
|
||||
Result := False;
|
||||
|
||||
if not Assigned(AEmpresa) then
|
||||
raise Exception.Create ('Empresa no asignada (ValidarEmpresa)');
|
||||
|
||||
|
||||
@ -1,7 +1,6 @@
|
||||
object srvEmpresas: TsrvEmpresas
|
||||
OldCreateOrder = True
|
||||
OnCreate = DARemoteServiceCreate
|
||||
RequiresSession = True
|
||||
ConnectionName = 'IBX'
|
||||
ServiceSchema = schEmpresas
|
||||
ServiceDataStreamer = DABin2DataStreamer
|
||||
|
||||
@ -54,7 +54,7 @@ end;
|
||||
{ srvEmpresas }
|
||||
procedure TsrvEmpresas.DARemoteServiceCreate(Sender: TObject);
|
||||
begin
|
||||
SessionManager := dmServer.SessionManager;
|
||||
//SessionManager := dmServer.SessionManager;
|
||||
end;
|
||||
|
||||
function TsrvEmpresas.DarListaFormasPago: Binary;
|
||||
|
||||
@ -29,6 +29,7 @@ type
|
||||
procedure DataAbstractServiceBeforeAcquireConnection(aSender: TObject;
|
||||
var aConnectionName: string);
|
||||
procedure DataAbstractServiceCreate(Sender: TObject);
|
||||
procedure Dummy;
|
||||
end;
|
||||
|
||||
implementation
|
||||
@ -52,7 +53,12 @@ end;
|
||||
|
||||
procedure TsrvUsuarios.DataAbstractServiceCreate(Sender: TObject);
|
||||
begin
|
||||
SessionManager := dmServer.SessionManager;
|
||||
//SessionManager := dmServer.SessionManager;
|
||||
end;
|
||||
|
||||
procedure TsrvUsuarios.Dummy;
|
||||
begin
|
||||
//
|
||||
end;
|
||||
|
||||
initialization
|
||||
|
||||
@ -8,8 +8,7 @@ uses
|
||||
uBizEmpresasTiendas;
|
||||
|
||||
type
|
||||
TDoLoadModulesEvent = procedure;
|
||||
TDoMainFormEvent = procedure;
|
||||
TAppFactuGES_Event = procedure;
|
||||
|
||||
IAppSplashForm = interface
|
||||
['{9905DF57-4476-42E6-A7CD-B1479A84E220}']
|
||||
@ -37,11 +36,14 @@ type
|
||||
function GetTerminated: Boolean;
|
||||
function GetConfiguracionController : IConfiguracionController;
|
||||
|
||||
function GetLoadModulesEvent : TDoLoadModulesEvent;
|
||||
procedure SetLoadModulesEvent (ALoadModulesEvent : TDoLoadModulesEvent);
|
||||
function GetLoadModulesEvent : TAppFactuGES_Event;
|
||||
procedure SetLoadModulesEvent (ALoadModulesEvent : TAppFactuGES_Event);
|
||||
|
||||
function GetDoMainFormEvent : TDoMainFormEvent;
|
||||
procedure SetDoMainFormEvent (AMainFormEvent : TDoMainFormEvent);
|
||||
function GetDoMainFormEvent : TAppFactuGES_Event;
|
||||
procedure SetDoMainFormEvent (AMainFormEvent : TAppFactuGES_Event);
|
||||
|
||||
function GetDoRefreshMainFormEvent : TAppFactuGES_Event;
|
||||
procedure SetDoRefreshMainFormEvent (ARefreshMainFormEvent : TAppFactuGES_Event);
|
||||
|
||||
function GetAppSplashForm : IAppSplashForm;
|
||||
procedure SetAppSplashForm (AAppSplashForm : IAppSplashForm);
|
||||
@ -71,12 +73,11 @@ type
|
||||
property UsuariosController : IUsuariosController read GetUsuariosController;
|
||||
property AppSplashForm : IAppSplashForm read GetAppSplashForm write SetAppSplashForm;
|
||||
property ModuleManager : THostManager read GetModuleManager;
|
||||
property DoMainFormEvent : TDoMainFormEvent read GetDoMainFormEvent write SetDoMainFormEvent;
|
||||
property DoLoadModulesEvent : TDoLoadModulesEvent read GetLoadModulesEvent write SetLoadModulesEvent;
|
||||
property DoMainFormEvent : TAppFactuGES_Event read GetDoMainFormEvent write SetDoMainFormEvent;
|
||||
property DoLoadModulesEvent : TAppFactuGES_Event read GetLoadModulesEvent write SetLoadModulesEvent;
|
||||
property DoRefreshMainFormEvent : TAppFactuGES_Event read GetDoRefreshMainFormEvent write SetDoRefreshMainFormEvent;
|
||||
property Terminated : Boolean read GetTerminated;
|
||||
property Configuracion : IConfiguracionController read GetConfiguracionController;
|
||||
|
||||
procedure ShowCapado;
|
||||
end;
|
||||
|
||||
|
||||
@ -93,8 +94,9 @@ type
|
||||
FHostManager : THostManager;
|
||||
FTerminated : Boolean;
|
||||
|
||||
FDoMainFormEvent: TDoMainFormEvent;
|
||||
FDoLoadModulesEvent: TDoMainFormEvent;
|
||||
FDoMainFormEvent: TAppFactuGES_Event;
|
||||
FDoLoadModulesEvent: TAppFactuGES_Event;
|
||||
FDoRefreshMainFormEvent: TAppFactuGES_Event;
|
||||
|
||||
function GetMainForm: TCustomForm;
|
||||
function GetEmpresasController: IEmpresasController;
|
||||
@ -110,11 +112,14 @@ type
|
||||
function GetTerminated: Boolean;
|
||||
function GetConfiguracionController : IConfiguracionController;
|
||||
|
||||
function GetLoadModulesEvent : TDoLoadModulesEvent;
|
||||
procedure SetLoadModulesEvent (ALoadModulesEvent : TDoLoadModulesEvent);
|
||||
function GetLoadModulesEvent : TAppFactuGES_Event;
|
||||
procedure SetLoadModulesEvent (ALoadModulesEvent : TAppFactuGES_Event);
|
||||
|
||||
function GetDoMainFormEvent : TDoMainFormEvent;
|
||||
procedure SetDoMainFormEvent (AMainFormEvent : TDoMainFormEvent);
|
||||
function GetDoMainFormEvent : TAppFactuGES_Event;
|
||||
procedure SetDoMainFormEvent (AMainFormEvent : TAppFactuGES_Event);
|
||||
|
||||
function GetDoRefreshMainFormEvent : TAppFactuGES_Event;
|
||||
procedure SetDoRefreshMainFormEvent (ARefreshMainFormEvent : TAppFactuGES_Event);
|
||||
|
||||
function GetAppSplashForm : IAppSplashForm;
|
||||
procedure SetAppSplashForm (AAppSplashForm : IAppSplashForm);
|
||||
@ -124,7 +129,8 @@ type
|
||||
procedure BuscarTiendaPorDefecto;
|
||||
protected
|
||||
procedure DoMainForm;
|
||||
|
||||
procedure DoRefreshMainForm;
|
||||
|
||||
procedure CargarModulos;
|
||||
procedure ShowSplashForm;
|
||||
procedure HideSplashForm;
|
||||
@ -156,12 +162,11 @@ type
|
||||
property EmpresasController : IEmpresasController read GetEmpresasController;
|
||||
property UsuariosController : IUsuariosController read GetUsuariosController;
|
||||
property ModuleManager : THostManager read GetModuleManager;
|
||||
property DoMainFormEvent : TDoMainFormEvent read GetDoMainFormEvent write SetDoMainFormEvent;
|
||||
property DoLoadModulesEvent : TDoLoadModulesEvent read GetLoadModulesEvent write SetLoadModulesEvent;
|
||||
property DoMainFormEvent : TAppFactuGES_Event read GetDoMainFormEvent write SetDoMainFormEvent;
|
||||
property DoLoadModulesEvent : TAppFactuGES_Event read GetLoadModulesEvent write SetLoadModulesEvent;
|
||||
property DoRefreshMainFormEvent : TAppFactuGES_Event read GetDoRefreshMainFormEvent write SetDoRefreshMainFormEvent;
|
||||
property Terminated : Boolean read GetTerminated;
|
||||
property Configuracion : IConfiguracionController read GetConfiguracionController;
|
||||
|
||||
procedure ShowCapado;
|
||||
end;
|
||||
|
||||
var
|
||||
@ -302,16 +307,29 @@ begin
|
||||
FDoMainFormEvent();
|
||||
end;
|
||||
|
||||
procedure TAppFactuGES.DoRefreshMainForm;
|
||||
begin
|
||||
if not Assigned(FDoRefreshMainFormEvent) then
|
||||
raise Exception.Create('Evento para el refresco del formulario principal no asignado (DoRefreshMainForm)');
|
||||
|
||||
DoRefreshMainFormEvent();
|
||||
end;
|
||||
|
||||
function TAppFactuGES.GetMainForm: TCustomForm;
|
||||
begin
|
||||
Result := Application.MainForm;
|
||||
end;
|
||||
|
||||
function TAppFactuGES.GetDoMainFormEvent: TDoMainFormEvent;
|
||||
function TAppFactuGES.GetDoMainFormEvent: TAppFactuGES_Event;
|
||||
begin
|
||||
Result := FDoMainFormEvent;
|
||||
end;
|
||||
|
||||
function TAppFactuGES.GetDoRefreshMainFormEvent: TAppFactuGES_Event;
|
||||
begin
|
||||
Result := FDoRefreshMainFormEvent;
|
||||
end;
|
||||
|
||||
function TAppFactuGES.GetAppFullName: String;
|
||||
begin
|
||||
Result := uAppInfoUtils.GetAppFullName;
|
||||
@ -355,7 +373,7 @@ begin
|
||||
Result := FEmpresasController;
|
||||
end;
|
||||
|
||||
function TAppFactuGES.GetLoadModulesEvent: TDoLoadModulesEvent;
|
||||
function TAppFactuGES.GetLoadModulesEvent: TAppFactuGES_Event;
|
||||
begin
|
||||
Result := FDoLoadModulesEvent;
|
||||
end;
|
||||
@ -416,6 +434,8 @@ begin
|
||||
ShowSplashForm;
|
||||
CargarModulos;
|
||||
DoMainForm;
|
||||
SeleccionarEmpresa;
|
||||
DoRefreshMainForm;
|
||||
finally
|
||||
HideHourglassCursor;
|
||||
HideSplashForm;
|
||||
@ -426,11 +446,17 @@ begin
|
||||
end;
|
||||
|
||||
procedure TAppFactuGES.SetDoMainFormEvent(
|
||||
AMainFormEvent: TDoMainFormEvent);
|
||||
AMainFormEvent: TAppFactuGES_Event);
|
||||
begin
|
||||
FDoMainFormEvent := AMainFormEvent;
|
||||
end;
|
||||
|
||||
procedure TAppFactuGES.SetDoRefreshMainFormEvent(
|
||||
ARefreshMainFormEvent: TAppFactuGES_Event);
|
||||
begin
|
||||
FDoRefreshMainFormEvent := ARefreshMainFormEvent;
|
||||
end;
|
||||
|
||||
procedure TAppFactuGES.SeleccionarEmpresa;
|
||||
var
|
||||
JsDialog: TJSDialog;
|
||||
@ -480,7 +506,7 @@ begin
|
||||
end;
|
||||
|
||||
procedure TAppFactuGES.SetLoadModulesEvent(
|
||||
ALoadModulesEvent: TDoLoadModulesEvent);
|
||||
ALoadModulesEvent: TAppFactuGES_Event);
|
||||
begin
|
||||
FDoLoadModulesEvent := ALoadModulesEvent;
|
||||
end;
|
||||
@ -495,11 +521,6 @@ begin
|
||||
FVAR_TIENDA := Avalue;
|
||||
end;}
|
||||
|
||||
procedure TAppFactuGES.ShowCapado;
|
||||
begin
|
||||
ShowInfoMessage('Sin Acceso', 'Funcionalidad en desarrollo, disculpen las molestias');
|
||||
end;
|
||||
|
||||
procedure TAppFactuGES.ShowSplashForm;
|
||||
begin
|
||||
if Assigned(FAppSplashForm) then
|
||||
|
||||
@ -30,8 +30,8 @@ requires
|
||||
rtl,
|
||||
vcl,
|
||||
TB2k_D10,
|
||||
GUISDK_D11,
|
||||
PluginSDK_D10R,
|
||||
GUISDK_D11R,
|
||||
PluginSDK_D11R,
|
||||
RemObjects_Core_D11,
|
||||
DataAbstract_Core_D11,
|
||||
vcljpg,
|
||||
@ -71,7 +71,7 @@ requires
|
||||
cxLibraryD11,
|
||||
dxThemeD11,
|
||||
dxGDIPlusD11,
|
||||
dxNavBarD11;
|
||||
dxNavBarD11;
|
||||
|
||||
contains
|
||||
uDataTableUtils in 'Utiles\uDataTableUtils.pas',
|
||||
|
||||
@ -44,6 +44,13 @@
|
||||
<Borland.ProjectType>Package</Borland.ProjectType>
|
||||
<BorlandProject>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">Libreria base de FactuGES</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Excluded_Packages Name="$(BDS)\Bin\dclintraweb_90_100.bpl">VCL for the Web Design Package for CodeGear RAD Studio</Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDS)\bin\dclwebsnap100.bpl">CodeGear WebSnap Components</Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDS)\bin\dclsoap100.bpl">CodeGear SOAP Components</Excluded_Packages>
|
||||
@ -58,52 +65,51 @@
|
||||
<DelphiCompile Include="Base.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\adortl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\cxIntl6D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\cxIntlPrintSys3D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\dbrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\dclIndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\designide.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\dsnap.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\dxNavBarD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\GUISDK_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\IndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\IndyProtocols.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\IndySystem.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Jcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JclVcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JSDialog100.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JvCmpD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JvDlgsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JvMMD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JvNetD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\pckMD5.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\pckUCDataConnector.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\pckUserControl_RT.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\PluginSDK_D10R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\PNG_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\rtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\TB2k_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\vcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\vclactnband.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\vcldb.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\vcljpg.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\VclSmp.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\vclx.dcp" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\xmlrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\dxDockingD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\adortl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\cxIntl6D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\cxIntlPrintSys3D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\dbrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\dclIndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\designide.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\dsnap.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\dxNavBarD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\IndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\IndyProtocols.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\IndySystem.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Jcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JclVcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JSDialog100.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JvCmpD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JvDlgsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JvMMD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JvNetD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\pckMD5.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\pckUCDataConnector.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\pckUserControl_RT.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\PluginSDK_D11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\PNG_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\rtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\TB2k_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\vcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\vclactnband.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\vcldb.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\vcljpg.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\VclSmp.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\vclx.dcp" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\xmlrtl.dcp" />
|
||||
<DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
|
||||
<DCCReference Include="Conexion\uConfigurarConexion.pas">
|
||||
<Form>fConfigurarConexion</Form>
|
||||
|
||||
Binary file not shown.
@ -5,7 +5,7 @@
|
||||
<MainSource>FactuGES.dpr</MainSource>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<DCC_UsePackage>PluginSDK_D10R;GUISDK_D11;Base;GUIBase;ApplicationBase;vclx;vcl;rtl;vclactnband;xmlrtl;JSDialog100</DCC_UsePackage>
|
||||
<DCC_UsePackage>PluginSDK_D11R;GUISDK_D11R;Base;GUIBase;ApplicationBase;vclx;vcl;rtl;vclactnband;xmlrtl;JSDialog100</DCC_UsePackage>
|
||||
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
|
||||
<DCC_DependencyCheckOutputName>..\..\Output\Debug\Cliente\FactuGES.exe</DCC_DependencyCheckOutputName>
|
||||
<DCC_EnabledPackages>true</DCC_EnabledPackages>
|
||||
@ -57,9 +57,6 @@
|
||||
|
||||
|
||||
|
||||
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\DataAbstract_SQLiteDriver_D11.bpl">RemObjects Data Abstract - SQLite Driver</Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
|
||||
</Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||
|
||||
2830
Source/Cliente/VCLFixPack.pas
Normal file
2830
Source/Cliente/VCLFixPack.pas
Normal file
File diff suppressed because it is too large
Load Diff
@ -66,6 +66,11 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure DoRefreshMainForm;
|
||||
begin
|
||||
fPantallaPrincipal.RefrescarUI;
|
||||
end;
|
||||
|
||||
procedure DoAppMainForm;
|
||||
begin
|
||||
Application.CreateForm(TfPantallaPrincipal, fPantallaPrincipal);
|
||||
@ -83,6 +88,7 @@ begin
|
||||
AppSplashForm := TAppSplashForm.Create;
|
||||
DoMainFormEvent := DoAppMainForm;
|
||||
DoLoadModulesEvent := DoAppLoadModules;
|
||||
DoRefreshMainFormEvent := DoRefreshMainForm;
|
||||
end;
|
||||
|
||||
NavPaneController := TNavPaneController.Create;
|
||||
|
||||
@ -14,6 +14,7 @@ object fPantallaPrincipal: TfPantallaPrincipal
|
||||
OldCreateOrder = False
|
||||
Position = poScreenCenter
|
||||
Visible = True
|
||||
WindowState = wsMaximized
|
||||
OnClose = FormClose
|
||||
OnCloseQuery = FormCloseQuery
|
||||
OnCreate = FormCreate
|
||||
|
||||
@ -130,15 +130,15 @@ type
|
||||
procedure ShowEmbedded(AEditor : ICustomEditor);
|
||||
procedure ReleaseEmbedded;
|
||||
procedure AplicarPerfil;
|
||||
procedure RefrescarUI;
|
||||
procedure InicializarUI;
|
||||
procedure OnThemeChange(Sender: TObject);
|
||||
procedure ExecuteActionMenu(Sender : TObject);
|
||||
//procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;
|
||||
protected
|
||||
function GetWorkPanel : TWinControl;
|
||||
public
|
||||
procedure CreateParams(var Params: TCreateParams);
|
||||
public
|
||||
procedure RefrescarUI;
|
||||
function IsShortcut(var Message: TWMKey): Boolean; override;
|
||||
procedure OnWorkPanelChanged(AEditor : ICustomEditor);
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
@ -194,16 +194,6 @@ end;
|
||||
procedure TfPantallaPrincipal.FormShow(Sender: TObject);
|
||||
begin
|
||||
InicializarUI;
|
||||
|
||||
{ Go full screen }
|
||||
WindowState := wsMaximized;
|
||||
{ClientWidth := Screen.Width ;
|
||||
ClientHeight := Screen.Height;}
|
||||
Refresh;
|
||||
|
||||
//Sacamos la lista de empresas para que el usuario elija con la que va a trabajar
|
||||
AppFactuGES.SeleccionarEmpresa;
|
||||
RefrescarUI;
|
||||
end;
|
||||
|
||||
procedure TfPantallaPrincipal.RefrescarUI;
|
||||
|
||||
Binary file not shown.
@ -58,41 +58,45 @@
|
||||
<DelphiCompile Include="GUIBase.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxDataD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxExportD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxTreeListD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxBarD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxBarExtItemsD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPScxCommonD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPScxGrid6LnkD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPsPrVwAdvD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\frx11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\frxe11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\fs11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvAppFrmD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvGlobusD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PNG_D10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\tb2k_d10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\tbx_d10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\Base.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\ccpackD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\cxDataD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\cxExportD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\cxTreeListD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\dbrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\dxBarD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\dxBarExtItemsD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\dxPScxCommonD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\dxPScxGrid6LnkD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\dxPsPrVwAdvD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\frx11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\frxe11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\fs11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\JvAppFrmD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\JvGlobusD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\PNG_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\rtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\tb2k_d10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\vcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\vclactnband.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\vcldb.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\vcljpg.dcp" />
|
||||
<DCCReference Include="..\Modulos\Articulos\vclx.dcp" />
|
||||
<DCCReference Include="uDialogBase.pas">
|
||||
<Form>fDialogBase</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uDialogElegirEMail.pas" />
|
||||
<DCCReference Include="uDialogElegirEMail.pas">
|
||||
<Form>fDialogElegirEMail</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorBase.pas">
|
||||
<Form>fEditorBase</Form>
|
||||
<DesignClass>TCustomEditor</DesignClass>
|
||||
|
||||
@ -3,9 +3,9 @@ object fDialogBase: TfDialogBase
|
||||
Top = 0
|
||||
BorderStyle = bsDialog
|
||||
Caption = 'fDialogBase'
|
||||
ClientHeight = 430
|
||||
ClientWidth = 623
|
||||
Color = clWindow
|
||||
ClientHeight = 442
|
||||
ClientWidth = 625
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
@ -16,34 +16,37 @@ object fDialogBase: TfDialogBase
|
||||
OnShow = FormShow
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object pnlBotones: TFlowPanel
|
||||
object Bevel2: TBevel
|
||||
Left = 0
|
||||
Top = 374
|
||||
Width = 623
|
||||
Height = 56
|
||||
Top = 64
|
||||
Width = 625
|
||||
Height = 2
|
||||
Align = alTop
|
||||
Shape = bsTopLine
|
||||
ExplicitWidth = 500
|
||||
end
|
||||
object Bevel3: TBevel
|
||||
Left = 0
|
||||
Top = 398
|
||||
Width = 625
|
||||
Height = 2
|
||||
Align = alBottom
|
||||
FlowStyle = fsBottomTopRightLeft
|
||||
Padding.Left = 20
|
||||
Padding.Top = 20
|
||||
Padding.Right = 20
|
||||
Padding.Bottom = 15
|
||||
ParentBackground = False
|
||||
Shape = bsTopLine
|
||||
ExplicitTop = 369
|
||||
ExplicitWidth = 500
|
||||
end
|
||||
object pnlBotones: TPanel
|
||||
Left = 0
|
||||
Top = 400
|
||||
Width = 625
|
||||
Height = 42
|
||||
Align = alBottom
|
||||
BevelOuter = bvNone
|
||||
TabOrder = 0
|
||||
VerticalAlignment = taAlignTop
|
||||
object Button1: TButton
|
||||
Left = 527
|
||||
Top = 15
|
||||
Width = 75
|
||||
Height = 25
|
||||
Action = actCancelar
|
||||
Cancel = True
|
||||
ModalResult = 2
|
||||
TabOrder = 1
|
||||
end
|
||||
object Button2: TButton
|
||||
object btnAceptar: TButton
|
||||
AlignWithMargins = True
|
||||
Left = 437
|
||||
Top = 15
|
||||
Left = 464
|
||||
Top = 8
|
||||
Width = 75
|
||||
Height = 25
|
||||
Margins.Left = 0
|
||||
@ -54,51 +57,82 @@ object fDialogBase: TfDialogBase
|
||||
ModalResult = 1
|
||||
TabOrder = 0
|
||||
end
|
||||
object btnCancelar: TButton
|
||||
Left = 543
|
||||
Top = 8
|
||||
Width = 75
|
||||
Height = 25
|
||||
Action = actCancelar
|
||||
Cancel = True
|
||||
ModalResult = 2
|
||||
TabOrder = 1
|
||||
end
|
||||
end
|
||||
object FlowPanel1: TFlowPanel
|
||||
object pnlHeader: TPanel
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 623
|
||||
Height = 374
|
||||
Align = alClient
|
||||
Padding.Left = 30
|
||||
Padding.Top = 30
|
||||
Padding.Right = 30
|
||||
Padding.Bottom = 30
|
||||
ParentColor = True
|
||||
Width = 625
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 1
|
||||
object lblInstruccion: TLabel
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 31
|
||||
Top = 31
|
||||
Width = 78
|
||||
Height = 19
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 575
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 20
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Instrucci'#243'n'
|
||||
Caption = 'T'#237'tulo'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -16
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 32
|
||||
end
|
||||
object Label2: TLabel
|
||||
Left = 31
|
||||
Top = 70
|
||||
Width = 571
|
||||
Height = 81
|
||||
Align = alTop
|
||||
AutoSize = False
|
||||
Caption = 'Comentarios'
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 550
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
Caption = 'Bla Bla Bla'
|
||||
ExplicitWidth = 48
|
||||
ExplicitHeight = 13
|
||||
end
|
||||
end
|
||||
object ActionList1: TActionList
|
||||
object pnlCuerpo: TPanel
|
||||
Left = 0
|
||||
Top = 66
|
||||
Width = 625
|
||||
Height = 332
|
||||
Align = alClient
|
||||
BevelOuter = bvNone
|
||||
Padding.Left = 50
|
||||
Padding.Top = 15
|
||||
Padding.Right = 50
|
||||
Padding.Bottom = 15
|
||||
TabOrder = 2
|
||||
end
|
||||
object ActionListDialog: TActionList
|
||||
Left = 16
|
||||
Top = 384
|
||||
Top = 72
|
||||
object actAceptar: TAction
|
||||
Caption = '&Aceptar'
|
||||
end
|
||||
|
||||
@ -8,20 +8,28 @@ uses
|
||||
|
||||
type
|
||||
TfDialogBase = class(TForm)
|
||||
pnlBotones: TFlowPanel;
|
||||
Button1: TButton;
|
||||
Button2: TButton;
|
||||
ActionList1: TActionList;
|
||||
ActionListDialog: TActionList;
|
||||
actAceptar: TAction;
|
||||
actCancelar: TAction;
|
||||
FlowPanel1: TFlowPanel;
|
||||
lblInstruccion: TLabel;
|
||||
Label2: TLabel;
|
||||
pnlBotones: TPanel;
|
||||
btnAceptar: TButton;
|
||||
btnCancelar: TButton;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
Bevel3: TBevel;
|
||||
Bevel2: TBevel;
|
||||
pnlCuerpo: TPanel;
|
||||
procedure FormShow(Sender: TObject);
|
||||
private
|
||||
protected
|
||||
function GetTextoComentarios: String;
|
||||
function GetTextoTitulo: String;
|
||||
procedure SetTextoComentarios(const Value: String);
|
||||
procedure SetTextoTitulo(const Value: String);
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
property TextoComentarios : String read GetTextoComentarios write SetTextoComentarios;
|
||||
property TextoTitulo : String read GetTextoTitulo write SetTextoTitulo;
|
||||
end;
|
||||
|
||||
implementation
|
||||
@ -29,11 +37,31 @@ implementation
|
||||
{$R *.dfm}
|
||||
|
||||
uses
|
||||
uDMBase, JvNavigationPane;
|
||||
uDMBase;
|
||||
|
||||
procedure TfDialogBase.FormShow(Sender: TObject);
|
||||
begin
|
||||
lblInstruccion.Font.Color := dmBase.StyleManager.Colors.HeaderColorTo;
|
||||
lblTitle.Font.Color := dmBase.StyleManager.Colors.HeaderColorTo;
|
||||
end;
|
||||
|
||||
function TfDialogBase.GetTextoComentarios: String;
|
||||
begin
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
function TfDialogBase.GetTextoTitulo: String;
|
||||
begin
|
||||
Result := lblTitle.Caption;
|
||||
end;
|
||||
|
||||
procedure TfDialogBase.SetTextoComentarios(const Value: String);
|
||||
begin
|
||||
lblComments.Caption := Value;
|
||||
end;
|
||||
|
||||
procedure TfDialogBase.SetTextoTitulo(const Value: String);
|
||||
begin
|
||||
lblTitle.Caption := Value;
|
||||
end;
|
||||
|
||||
end.
|
||||
|
||||
@ -1,56 +1,73 @@
|
||||
inherited fDialogElegirEMail: TfDialogElegirEMail
|
||||
Caption = 'Elegir direcci'#243'n de correo electr'#243'nico'
|
||||
ClientHeight = 220
|
||||
ClientWidth = 533
|
||||
ClientHeight = 267
|
||||
ClientWidth = 531
|
||||
OnCloseQuery = FormCloseQuery
|
||||
OnCreate = FormCreate
|
||||
OnDestroy = FormDestroy
|
||||
ExplicitWidth = 539
|
||||
ExplicitHeight = 252
|
||||
ExplicitWidth = 537
|
||||
ExplicitHeight = 299
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited pnlBotones: TFlowPanel
|
||||
Top = 164
|
||||
Width = 533
|
||||
ExplicitTop = 164
|
||||
ExplicitWidth = 533
|
||||
inherited Button1: TButton
|
||||
Left = 437
|
||||
ExplicitLeft = 437
|
||||
inherited Bevel2: TBevel
|
||||
Width = 531
|
||||
ExplicitWidth = 531
|
||||
end
|
||||
inherited Bevel3: TBevel
|
||||
Top = 223
|
||||
Width = 531
|
||||
ExplicitTop = 206
|
||||
ExplicitWidth = 628
|
||||
end
|
||||
inherited pnlBotones: TPanel
|
||||
Top = 225
|
||||
Width = 531
|
||||
ExplicitTop = 225
|
||||
ExplicitWidth = 531
|
||||
inherited btnAceptar: TButton
|
||||
Left = 369
|
||||
Top = 6
|
||||
ExplicitLeft = 369
|
||||
ExplicitTop = 6
|
||||
end
|
||||
inherited Button2: TButton
|
||||
Left = 347
|
||||
ExplicitLeft = 347
|
||||
inherited btnCancelar: TButton
|
||||
Left = 448
|
||||
Top = 6
|
||||
ExplicitLeft = 448
|
||||
ExplicitTop = 6
|
||||
end
|
||||
end
|
||||
inherited FlowPanel1: TFlowPanel
|
||||
Width = 533
|
||||
Height = 164
|
||||
ExplicitWidth = 533
|
||||
ExplicitHeight = 164
|
||||
inherited lblInstruccion: TLabel
|
||||
Width = 411
|
||||
inherited pnlHeader: TPanel
|
||||
Width = 531
|
||||
ExplicitWidth = 531
|
||||
inherited lblTitle: TLabel
|
||||
Width = 481
|
||||
Caption = 'Indique la direcci'#243'n de correo electr'#243'nico del destinatario:'
|
||||
ExplicitWidth = 411
|
||||
ExplicitWidth = 328
|
||||
end
|
||||
inherited Label2: TLabel
|
||||
Height = 3
|
||||
inherited lblComments: TLabel
|
||||
Width = 456
|
||||
Visible = False
|
||||
ExplicitHeight = 3
|
||||
end
|
||||
end
|
||||
inherited pnlCuerpo: TPanel
|
||||
Width = 531
|
||||
Height = 157
|
||||
ExplicitWidth = 531
|
||||
ExplicitHeight = 157
|
||||
object Panel1: TPanel
|
||||
Left = 31
|
||||
Top = 73
|
||||
Width = 482
|
||||
Height = 80
|
||||
Left = 50
|
||||
Top = 15
|
||||
Width = 431
|
||||
Height = 127
|
||||
Align = alClient
|
||||
BevelOuter = bvNone
|
||||
ParentColor = True
|
||||
TabOrder = 0
|
||||
object rbCombo: TRadioButton
|
||||
Tag = 1
|
||||
Left = 10
|
||||
Top = 6
|
||||
Left = -1
|
||||
Top = 17
|
||||
Width = 170
|
||||
Height = 17
|
||||
Caption = 'Usar esta direcci'#243'n de correo:'
|
||||
@ -58,18 +75,18 @@ inherited fDialogElegirEMail: TfDialogElegirEMail
|
||||
OnClick = rbComboClick
|
||||
end
|
||||
object cbEMail: TComboBox
|
||||
Left = 211
|
||||
Top = 6
|
||||
Width = 262
|
||||
Left = 200
|
||||
Top = 17
|
||||
Width = 225
|
||||
Height = 21
|
||||
Style = csDropDownList
|
||||
ItemHeight = 0
|
||||
ItemHeight = 13
|
||||
TabOrder = 1
|
||||
end
|
||||
object rbEdit: TRadioButton
|
||||
Tag = 2
|
||||
Left = 10
|
||||
Top = 41
|
||||
Left = -1
|
||||
Top = 52
|
||||
Width = 202
|
||||
Height = 17
|
||||
Caption = 'Usar la siguiente direcci'#243'n de correo:'
|
||||
@ -77,8 +94,8 @@ inherited fDialogElegirEMail: TfDialogElegirEMail
|
||||
OnClick = rbEditClick
|
||||
end
|
||||
object edtEMail: TcxHyperLinkEdit
|
||||
Left = 211
|
||||
Top = 39
|
||||
Left = 200
|
||||
Top = 50
|
||||
Properties.UsePrefix = upNever
|
||||
Properties.ValidateOnEnter = True
|
||||
Properties.Prefix = ''
|
||||
@ -91,12 +108,11 @@ inherited fDialogElegirEMail: TfDialogElegirEMail
|
||||
StyleHot.LookAndFeel.Kind = lfStandard
|
||||
StyleHot.LookAndFeel.NativeStyle = True
|
||||
TabOrder = 3
|
||||
Width = 262
|
||||
Width = 225
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited ActionList1: TActionList
|
||||
Left = 8
|
||||
inherited ActionListDialog: TActionList
|
||||
Top = 8
|
||||
inherited actAceptar: TAction
|
||||
OnExecute = actAceptarExecute
|
||||
|
||||
@ -8,9 +8,8 @@ uses
|
||||
TB2Item, TB2Dock, TB2Toolbar, ComCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, DB, uDADataTable, uEditorBase, JvFormAutoSize,
|
||||
uDAScriptingProvider, uDACDSDataTable, AppEvnts, uCustomView, uViewBase,
|
||||
JvAppStorage, JvAppRegistryStorage, JvFormPlacement,
|
||||
pngimage, ExtCtrls, dxLayoutLookAndFeels, JvComponentBase, TBXStatusBars,
|
||||
JvExComCtrls, JvStatusBar, uDAInterfaces, JvgWizardHeader;
|
||||
JvAppStorage, JvAppRegistryStorage, uDAInterfaces, JvComponentBase,
|
||||
JvFormPlacement, JvExComCtrls, JvStatusBar, pngimage, ExtCtrls;
|
||||
|
||||
type
|
||||
IEditorDBBase = interface(IEditorBase)
|
||||
|
||||
@ -8,9 +8,8 @@ uses
|
||||
TB2Item, TB2Dock, TB2Toolbar, ComCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, DB, uDADataTable, uEditorDBBase, JvFormAutoSize,
|
||||
StdCtrls, uDAScriptingProvider, uDACDSDataTable, AppEvnts, uCustomView,
|
||||
uViewBase, JvAppStorage, JvAppRegistryStorage,
|
||||
JvFormPlacement, pngimage, ExtCtrls, JvComponentBase, dxLayoutLookAndFeels,
|
||||
JvExComCtrls, JvStatusBar, uDAInterfaces, JvgWizardHeader;
|
||||
uViewBase, JvAppStorage, JvAppRegistryStorage, ExtCtrls, uDAInterfaces,
|
||||
JvComponentBase, JvFormPlacement, JvExComCtrls, JvStatusBar, pngimage;
|
||||
|
||||
type
|
||||
IEditorDBItem = interface(IEditorDBBase)
|
||||
|
||||
@ -166,14 +166,14 @@ procedure Register;
|
||||
implementation
|
||||
|
||||
uses
|
||||
CCReg, uDMBase, uDBSelectionListUtils, uSistemaFunc, SHFolder,
|
||||
uDMBase, uDBSelectionListUtils, uSistemaFunc, SHFolder,
|
||||
uAppInfoUtils, cxGridExportLink;
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
procedure Register;
|
||||
begin
|
||||
RegisterCustomContainer(TfrViewGridBase);
|
||||
//RegisterCustomContainer(TfrViewGridBase);
|
||||
end;
|
||||
|
||||
{ TfrViewGrid }
|
||||
|
||||
@ -1,8 +1,6 @@
|
||||
object srvAlbaranesCliente: TsrvAlbaranesCliente
|
||||
OldCreateOrder = True
|
||||
OnCreate = DARemoteServiceCreate
|
||||
RequiresSession = True
|
||||
SessionManager = dmServer.SessionManager
|
||||
ConnectionName = 'IBX'
|
||||
ServiceSchema = schAlbaranesCliente
|
||||
ServiceDataStreamer = Bin2DataStreamer
|
||||
|
||||
@ -71,7 +71,7 @@ end;
|
||||
|
||||
procedure TsrvAlbaranesCliente.DARemoteServiceCreate(Sender: TObject);
|
||||
begin
|
||||
SessionManager := dmServer.SessionManager;
|
||||
//SessionManager := dmServer.SessionManager;
|
||||
bpAlbaranesCliente.BusinessRulesID := BIZ_SERVER_ALBARAN_CLIENTE;
|
||||
end;
|
||||
|
||||
|
||||
@ -2,6 +2,7 @@ inherited fEditorAlbaranesCliente: TfEditorAlbaranesCliente
|
||||
Caption = 'Lista de albaranes de cliente'
|
||||
ClientWidth = 583
|
||||
ExplicitWidth = 591
|
||||
ExplicitHeight = 240
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
|
||||
@ -100,7 +100,6 @@ uses
|
||||
}
|
||||
procedure TfEditorAlbaranesCliente.actCancelarEnvioExecute(Sender: TObject);
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
|
||||
@ -128,7 +127,6 @@ end;
|
||||
|
||||
procedure TfEditorAlbaranesCliente.actConfirmarRecepcionExecute(Sender: TObject);
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
|
||||
@ -196,7 +194,6 @@ procedure TfEditorAlbaranesCliente.actEnviarExecute(Sender: TObject);
|
||||
// AFacturasController : IFacturasClienteController;
|
||||
// AAlbaran : IBizAlbaranCliente;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
bCambiarEstado := False;
|
||||
|
||||
@ -1,43 +1,12 @@
|
||||
inherited fEditorElegirAlbaranesCliente: TfEditorElegirAlbaranesCliente
|
||||
Caption = 'Seleccionar albar'#195#161'n de cliente'
|
||||
Caption = 'Seleccionar albar'#225'n de cliente'
|
||||
ClientWidth = 790
|
||||
ExplicitWidth = 798
|
||||
ExplicitHeight = 478
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object JvgWizardHeader1: TJvgWizardHeader [0]
|
||||
Left = 0
|
||||
Top = 27
|
||||
Width = 790
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Seleccione el albar'#225'n de cliente')
|
||||
Comments.Strings = (
|
||||
' ')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitLeft = -8
|
||||
ExplicitTop = 8
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Top = 64
|
||||
Width = 790
|
||||
Visible = False
|
||||
ExplicitWidth = 790
|
||||
@ -47,12 +16,11 @@ inherited fEditorElegirAlbaranesCliente: TfEditorElegirAlbaranesCliente
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Top = 87
|
||||
Top = 91
|
||||
Width = 790
|
||||
ExplicitTop = 87
|
||||
ExplicitWidth = 790
|
||||
inherited tbxMain: TTBXToolbar
|
||||
ExplicitWidth = 126
|
||||
ExplicitWidth = 263
|
||||
inherited TBXItem2: TTBXItem
|
||||
Visible = False
|
||||
end
|
||||
@ -97,13 +65,13 @@ inherited fEditorElegirAlbaranesCliente: TfEditorElegirAlbaranesCliente
|
||||
end
|
||||
end
|
||||
inherited tbxFiltro: TTBXToolbar
|
||||
Left = 126
|
||||
Left = 263
|
||||
Top = 23
|
||||
DockPos = 104
|
||||
DockRow = 1
|
||||
ExplicitLeft = 126
|
||||
ExplicitLeft = 263
|
||||
ExplicitTop = 23
|
||||
ExplicitWidth = 269
|
||||
ExplicitWidth = 363
|
||||
inherited TBXItem34: TTBXItem
|
||||
Action = actQuitarFiltro2
|
||||
end
|
||||
@ -125,7 +93,7 @@ inherited fEditorElegirAlbaranesCliente: TfEditorElegirAlbaranesCliente
|
||||
Width = 790
|
||||
ExplicitWidth = 790
|
||||
end
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [3]
|
||||
Left = 0
|
||||
Top = 389
|
||||
Width = 790
|
||||
@ -170,6 +138,55 @@ inherited fEditorElegirAlbaranesCliente: TfEditorElegirAlbaranesCliente
|
||||
end
|
||||
end
|
||||
end
|
||||
object pnlHeader: TPanel [4]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 790
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 4
|
||||
ExplicitLeft = 8
|
||||
ExplicitTop = -37
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 740
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Seleccione el albar'#225'n de cliente'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 177
|
||||
end
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 715
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
ExplicitTop = 0
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList [5]
|
||||
end
|
||||
inherited SmallImages: TPngImageList [6]
|
||||
@ -192,8 +209,6 @@ inherited fEditorElegirAlbaranesCliente: TfEditorElegirAlbaranesCliente
|
||||
end
|
||||
inherited JsNuevoAlbaranDialog: TJSDialog [13]
|
||||
end
|
||||
inherited JsImprimirDialog: TJSDialog [15]
|
||||
end
|
||||
object EditorSeleccionActionList: TActionList
|
||||
Images = SmallImages
|
||||
Left = 152
|
||||
|
||||
@ -9,18 +9,20 @@ uses
|
||||
ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid,
|
||||
uViewAlbaranesCliente, ComCtrls, TB2ExtItems, TBXExtItems, TBX,
|
||||
TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls,
|
||||
JvNavigationPane, uViewBarraSeleccion, StdCtrls,
|
||||
uEditorAlbaranesCliente, uBizAlbaranesCliente, uIEditorElegirAlbaranesCliente,
|
||||
JvExComCtrls, JvStatusBar, JSDialog;
|
||||
JvExComCtrls, JvStatusBar, JSDialog, uDAInterfaces;
|
||||
|
||||
type
|
||||
TfEditorElegirAlbaranesCliente = class(TfEditorAlbaranesCliente, IEditorElegirAlbaranesCliente)
|
||||
frViewBarraSeleccion1: TfrViewBarraSeleccion;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
EditorSeleccionActionList: TActionList;
|
||||
actBuscar2: TAction;
|
||||
actQuitarFiltro2: TAction;
|
||||
actAnchoAuto2: TAction;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject);
|
||||
@ -97,12 +99,12 @@ end;
|
||||
|
||||
function TfEditorElegirAlbaranesCliente.GetMensaje: String;
|
||||
begin
|
||||
Result := JvgWizardHeader1.Comments.Text;
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirAlbaranesCliente.SetMensaje(const AValue: String);
|
||||
begin
|
||||
JvgWizardHeader1.Comments.Text := AValue;
|
||||
lblComments.Caption := AValue;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirAlbaranesCliente.SetViewGrid(const Value: IViewGridBase);
|
||||
|
||||
@ -1,6 +1,14 @@
|
||||
inherited fEditorElegirArticulosAlbaranCliente: TfEditorElegirArticulosAlbaranCliente
|
||||
Caption = 'fEditorElegirArticulosAlbaranCliente'
|
||||
ExplicitHeight = 478
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited pnlHeader: TPanel
|
||||
inherited lblTitle: TLabel
|
||||
Width = 606
|
||||
end
|
||||
inherited lblComments: TLabel
|
||||
Width = 581
|
||||
Height = 27
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
@ -9,7 +9,8 @@ uses
|
||||
StdActns, ActnList, uCustomView, uViewBase, uViewBarraSeleccion, ComCtrls,
|
||||
JvExComCtrls, JvStatusBar, TBX, TB2ExtItems, TBXExtItems, TB2Item, TB2Dock,
|
||||
TB2Toolbar, pngimage, ExtCtrls, JvExControls, JvComponent, JvNavigationPane,
|
||||
JvgWizardHeader, uIEditorElegirArticulosAlbaranesCliente, uDAInterfaces;
|
||||
uIEditorElegirArticulosAlbaranesCliente, uDAInterfaces,
|
||||
StdCtrls;
|
||||
|
||||
type
|
||||
TfEditorElegirArticulosAlbaranCliente = class(TfEditorElegirArticulos, IEditorElegirArticulosAlbaranesCliente)
|
||||
|
||||
@ -1,8 +1,6 @@
|
||||
object srvAlbaranesProveedor: TsrvAlbaranesProveedor
|
||||
OldCreateOrder = True
|
||||
OnCreate = DARemoteServiceCreate
|
||||
RequiresSession = True
|
||||
SessionManager = dmServer.SessionManager
|
||||
ConnectionName = 'IBX'
|
||||
ServiceSchema = schAlbaranesProveedor
|
||||
ServiceDataStreamer = Bin2DataStreamer
|
||||
|
||||
@ -69,7 +69,7 @@ end;
|
||||
|
||||
procedure TsrvAlbaranesProveedor.DARemoteServiceCreate(Sender: TObject);
|
||||
begin
|
||||
SessionManager := dmServer.SessionManager;
|
||||
//SessionManager := dmServer.SessionManager;
|
||||
bpAlbaranesProveedor.BusinessRulesID := BIZ_SERVER_ALBARAN_PROVEEDOR;
|
||||
end;
|
||||
|
||||
|
||||
@ -218,7 +218,6 @@ end;
|
||||
|
||||
procedure TfEditorAlbaranProveedor.ImprimirInterno;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
FController.Print(FAlbaran);
|
||||
@ -272,7 +271,6 @@ end;
|
||||
|
||||
procedure TfEditorAlbaranProveedor.PrevisualizarInterno;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
FController.Preview(FAlbaran);
|
||||
|
||||
@ -78,7 +78,6 @@ end;
|
||||
|
||||
procedure TfEditorAlbaranesProveedor.actGenerarFacturaExecute(Sender: TObject);
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
// GenerarFacturaProv(Albaranes.ID);
|
||||
@ -117,7 +116,6 @@ procedure TfEditorAlbaranesProveedor.DuplicarInterno;
|
||||
var
|
||||
AAlbaran : IBizAlbaranProveedor;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
AAlbaran := FController.Duplicar(Albaranes);
|
||||
@ -200,13 +198,12 @@ begin
|
||||
end;
|
||||
|
||||
procedure TfEditorAlbaranesProveedor.ImprimirInterno;
|
||||
var
|
||||
{var
|
||||
Respuesta : Integer;
|
||||
AAlbaranes: IBizAlbaranProveedor;
|
||||
AllItems: Boolean;
|
||||
|
||||
}
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
AAlbaranes := Nil;
|
||||
AllItems := False;
|
||||
@ -292,12 +289,11 @@ begin
|
||||
end;
|
||||
|
||||
procedure TfEditorAlbaranesProveedor.PrevisualizarInterno;
|
||||
var
|
||||
{var
|
||||
Respuesta : Integer;
|
||||
AAlbaranes: IBizAlbaranProveedor;
|
||||
AllItems: Boolean;
|
||||
AllItems: Boolean;}
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
AAlbaranes := Nil;
|
||||
AllItems := False;
|
||||
|
||||
@ -5,40 +5,8 @@ inherited fEditorElegirAlbaranesProveedor: TfEditorElegirAlbaranesProveedor
|
||||
ExplicitHeight = 478
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object JvgWizardHeader1: TJvgWizardHeader [0]
|
||||
Left = 0
|
||||
Top = 27
|
||||
Width = 790
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Seleccione el albar'#225'n de proveedor')
|
||||
Comments.Strings = (
|
||||
' ')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitLeft = -8
|
||||
ExplicitTop = 8
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Top = 64
|
||||
Width = 790
|
||||
Visible = False
|
||||
ExplicitWidth = 790
|
||||
@ -48,14 +16,11 @@ inherited fEditorElegirAlbaranesProveedor: TfEditorElegirAlbaranesProveedor
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Top = 87
|
||||
Top = 91
|
||||
Width = 790
|
||||
Height = 49
|
||||
ExplicitTop = 87
|
||||
ExplicitWidth = 790
|
||||
ExplicitHeight = 49
|
||||
inherited tbxMain: TTBXToolbar
|
||||
ExplicitWidth = 117
|
||||
ExplicitWidth = 421
|
||||
inherited TBXItem2: TTBXItem
|
||||
Visible = False
|
||||
end
|
||||
@ -91,11 +56,11 @@ inherited fEditorElegirAlbaranesProveedor: TfEditorElegirAlbaranesProveedor
|
||||
end
|
||||
end
|
||||
inherited tbxFiltro: TTBXToolbar
|
||||
Left = 117
|
||||
Left = 421
|
||||
Top = 23
|
||||
DockPos = 104
|
||||
DockRow = 1
|
||||
ExplicitLeft = 117
|
||||
ExplicitLeft = 421
|
||||
ExplicitTop = 23
|
||||
inherited TBXItem34: TTBXItem
|
||||
Action = actQuitarFiltro2
|
||||
@ -104,13 +69,16 @@ inherited fEditorElegirAlbaranesProveedor: TfEditorElegirAlbaranesProveedor
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 790
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Left = 334
|
||||
ExplicitLeft = 334
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Width = 790
|
||||
ExplicitTop = 425
|
||||
ExplicitWidth = 790
|
||||
end
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [3]
|
||||
Left = 0
|
||||
Top = 389
|
||||
Width = 790
|
||||
@ -155,6 +123,56 @@ inherited fEditorElegirAlbaranesProveedor: TfEditorElegirAlbaranesProveedor
|
||||
end
|
||||
end
|
||||
end
|
||||
object pnlHeader: TPanel [4]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 790
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 4
|
||||
ExplicitLeft = -8
|
||||
ExplicitTop = -37
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 740
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Seleccione el albar'#225'n de proveedor'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 198
|
||||
end
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 715
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
ExplicitWidth = 3
|
||||
ExplicitHeight = 13
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList [5]
|
||||
end
|
||||
inherited SmallImages: TPngImageList [6]
|
||||
@ -169,12 +187,18 @@ inherited fEditorElegirAlbaranesProveedor: TfEditorElegirAlbaranesProveedor
|
||||
Left = 16
|
||||
Top = 168
|
||||
end
|
||||
inherited StatusBarImages: TPngImageList [11]
|
||||
end
|
||||
inherited GridPopupMenu: TPopupMenu
|
||||
Left = 56
|
||||
Top = 192
|
||||
end
|
||||
inherited StatusBarImages: TPngImageList [12]
|
||||
end
|
||||
inherited JsNuevoAlbaranDialog: TJSDialog [13]
|
||||
end
|
||||
inherited JsPrevisualizarDialog: TJSDialog [14]
|
||||
end
|
||||
inherited JsImprimirDialog: TJSDialog [15]
|
||||
end
|
||||
object EditorSeleccionActionList: TActionList
|
||||
Images = SmallImages
|
||||
Left = 152
|
||||
|
||||
@ -9,18 +9,20 @@ uses
|
||||
ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid,
|
||||
uViewAlbaranesProveedor, ComCtrls, TB2ExtItems, TBXExtItems, TBX,
|
||||
TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls,
|
||||
JvNavigationPane, uViewBarraSeleccion, StdCtrls,
|
||||
uEditorAlbaranesProveedor, uBizAlbaranesProveedor, uIEditorElegirAlbaranesProveedor,
|
||||
JvExComCtrls, JvStatusBar, JSDialog;
|
||||
JvExComCtrls, JvStatusBar, JSDialog, uDAInterfaces;
|
||||
|
||||
type
|
||||
TfEditorElegirAlbaranesProveedor = class(TfEditorAlbaranesProveedor, IEditorElegirAlbaranesProveedor)
|
||||
frViewBarraSeleccion1: TfrViewBarraSeleccion;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
EditorSeleccionActionList: TActionList;
|
||||
actBuscar2: TAction;
|
||||
actQuitarFiltro2: TAction;
|
||||
actAnchoAuto2: TAction;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject);
|
||||
@ -98,7 +100,7 @@ end;
|
||||
|
||||
function TfEditorElegirAlbaranesProveedor.GetMensaje: String;
|
||||
begin
|
||||
Result := JvgWizardHeader1.Comments.Text;
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
function TfEditorElegirAlbaranesProveedor.GetMultiSelect: Boolean;
|
||||
@ -108,7 +110,7 @@ end;
|
||||
|
||||
procedure TfEditorElegirAlbaranesProveedor.SetMensaje(const AValue: String);
|
||||
begin
|
||||
JvgWizardHeader1.Comments.Text := AValue;
|
||||
lblComments.Caption := AValue;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirAlbaranesProveedor.SetMultiSelect(AValue: Boolean);
|
||||
|
||||
@ -9,7 +9,7 @@ uses
|
||||
StdActns, ActnList, uCustomView, uViewBase, uViewBarraSeleccion, ComCtrls,
|
||||
JvExComCtrls, JvStatusBar, TBX, TB2ExtItems, TBXExtItems, TB2Item, TB2Dock,
|
||||
TB2Toolbar, pngimage, ExtCtrls, JvExControls, JvComponent, JvNavigationPane,
|
||||
JvgWizardHeader, uIEditorElegirArticulosAlbaranesProveedor, uBizContactos;
|
||||
uIEditorElegirArticulosAlbaranesProveedor, uBizContactos;
|
||||
|
||||
type
|
||||
TfEditorElegirArticulosAlbaranProveedor = class(TfEditorElegirArticulos, IEditorElegirArticulosAlbaranesProveedor)
|
||||
|
||||
@ -1,8 +1,6 @@
|
||||
object srvAlmacenes: TsrvAlmacenes
|
||||
OldCreateOrder = True
|
||||
OnCreate = DARemoteServiceCreate
|
||||
RequiresSession = True
|
||||
SessionManager = dmServer.SessionManager
|
||||
ConnectionName = 'IBX'
|
||||
ServiceSchema = schAlmacenes
|
||||
ServiceDataStreamer = Bin2DataStreamer
|
||||
|
||||
@ -60,7 +60,7 @@ end;
|
||||
|
||||
procedure TsrvAlmacenes.DARemoteServiceCreate(Sender: TObject);
|
||||
begin
|
||||
SessionManager := dmServer.SessionManager;
|
||||
//SessionManager := dmServer.SessionManager;
|
||||
end;
|
||||
|
||||
procedure TsrvAlmacenes.DataAbstractServiceBeforeAcquireConnection(
|
||||
|
||||
@ -119,10 +119,9 @@ begin
|
||||
end;
|
||||
|
||||
procedure TfEditorAlmacenes.DuplicarInterno;
|
||||
var
|
||||
AAlmacen : IBizAlmacen;
|
||||
{var
|
||||
AAlmacen : IBizAlmacen;}
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
AAlmacen := FController.Duplicar(Almacenes);
|
||||
|
||||
Binary file not shown.
@ -89,7 +89,7 @@
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="Articulos_controller.dcp" />
|
||||
<DCCReference Include="Articulos_view.dcp" />
|
||||
<DCCReference Include="PluginSDK_D10R.dcp" />
|
||||
<DCCReference Include="PluginSDK_D11R.dcp" />
|
||||
<DCCReference Include="uPluginArticulos.pas" />
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||
|
||||
@ -1,8 +1,6 @@
|
||||
object srvArticulos: TsrvArticulos
|
||||
OldCreateOrder = True
|
||||
OnCreate = DARemoteServiceCreate
|
||||
RequiresSession = True
|
||||
SessionManager = dmServer.SessionManager
|
||||
ConnectionName = 'IBX'
|
||||
ServiceSchema = schArticulos
|
||||
ServiceDataStreamer = Bin2DataStreamer
|
||||
|
||||
@ -61,7 +61,7 @@ end;
|
||||
|
||||
procedure TsrvArticulos.DARemoteServiceCreate(Sender: TObject);
|
||||
begin
|
||||
SessionManager := dmServer.SessionManager;
|
||||
//SessionManager := dmServer.SessionManager;
|
||||
end;
|
||||
|
||||
procedure TsrvArticulos.DataAbstractServiceBeforeAcquireConnection(
|
||||
|
||||
@ -54,11 +54,11 @@
|
||||
<DelphiCompile Include="Articulos_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\..\Presupuestos de cliente\Articulos_controller.dcp" />
|
||||
<DCCReference Include="..\..\Presupuestos de cliente\Articulos_model.dcp" />
|
||||
<DCCReference Include="..\..\Presupuestos de cliente\Contactos_view.dcp" />
|
||||
<DCCReference Include="..\..\Presupuestos de cliente\Familias_controller.dcp" />
|
||||
<DCCReference Include="..\..\Presupuestos de cliente\GUIBase.dcp" />
|
||||
<DCCReference Include="..\Articulos_controller.dcp" />
|
||||
<DCCReference Include="..\Articulos_model.dcp" />
|
||||
<DCCReference Include="..\Contactos_view.dcp" />
|
||||
<DCCReference Include="..\Familias_controller.dcp" />
|
||||
<DCCReference Include="..\GUIBase.dcp" />
|
||||
<DCCReference Include="uArticulosViewRegister.pas" />
|
||||
<DCCReference Include="uEditorArticulo.pas">
|
||||
<Form>fEditorArticulo</Form>
|
||||
|
||||
@ -2,6 +2,7 @@ inherited fEditorArticulos: TfEditorArticulos
|
||||
Left = 489
|
||||
Top = 325
|
||||
Caption = 'Lista de art'#237'culos'
|
||||
ExplicitWidth = 320
|
||||
ExplicitHeight = 471
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
@ -26,9 +27,6 @@ inherited fEditorArticulos: TfEditorArticulos
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
inherited tbxMain: TTBXToolbar
|
||||
ExplicitWidth = 543
|
||||
end
|
||||
inherited tbxFiltro: TTBXToolbar
|
||||
ExplicitWidth = 269
|
||||
inherited tbxEditFiltro: TTBXEditItem
|
||||
|
||||
@ -87,7 +87,6 @@ end;
|
||||
|
||||
procedure TfEditorArticulos.ImprimirInterno;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
}
|
||||
@ -116,7 +115,6 @@ end;
|
||||
|
||||
procedure TfEditorArticulos.PrevisualizarInterno;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
}
|
||||
@ -146,7 +144,6 @@ procedure TfEditorArticulos.DuplicarInterno;
|
||||
{var
|
||||
AArticulo : IBizArticulo;}
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
AArticulo := FController.Duplicar(Articulos);
|
||||
|
||||
@ -2,41 +2,11 @@ inherited fEditorElegirArticulos: TfEditorElegirArticulos
|
||||
Caption = 'Seleccionar art'#237'culos'
|
||||
ClientWidth = 656
|
||||
ExplicitWidth = 664
|
||||
ExplicitHeight = 240
|
||||
ExplicitHeight = 478
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object JvgWizardHeader1: TJvgWizardHeader [0]
|
||||
Left = 0
|
||||
Top = 27
|
||||
Width = 656
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Seleccione los art'#237'culos')
|
||||
Comments.Strings = (
|
||||
' ')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitTop = 87
|
||||
end
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Top = 64
|
||||
Width = 656
|
||||
Caption = 'Lista de art'#237'culos'
|
||||
Visible = False
|
||||
@ -47,10 +17,11 @@ inherited fEditorElegirArticulos: TfEditorElegirArticulos
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Top = 87
|
||||
Top = 91
|
||||
Width = 656
|
||||
ExplicitTop = 87
|
||||
Height = 49
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 49
|
||||
inherited tbxMain: TTBXToolbar
|
||||
Align = alLeft
|
||||
DockPos = -6
|
||||
@ -86,13 +57,21 @@ inherited fEditorElegirArticulos: TfEditorElegirArticulos
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Left = 538
|
||||
Top = 23
|
||||
DockPos = 536
|
||||
DockRow = 1
|
||||
ExplicitLeft = 538
|
||||
ExplicitTop = 23
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Width = 656
|
||||
Visible = False
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [3]
|
||||
Left = 0
|
||||
Top = 376
|
||||
Width = 656
|
||||
@ -132,6 +111,55 @@ inherited fEditorElegirArticulos: TfEditorElegirArticulos
|
||||
end
|
||||
end
|
||||
end
|
||||
object pnlHeader: TPanel [4]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 656
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 4
|
||||
ExplicitTop = -37
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 606
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Seleccione los art'#237'culos'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 131
|
||||
end
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 581
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
ExplicitLeft = 34
|
||||
ExplicitTop = -6
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList [5]
|
||||
Left = 112
|
||||
Top = 192
|
||||
|
||||
@ -9,18 +9,20 @@ uses
|
||||
ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid,
|
||||
uViewArticulos, ComCtrls, TB2ExtItems, TBXExtItems, TBX,
|
||||
TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls,
|
||||
JvNavigationPane, uViewBarraSeleccion, StdCtrls,
|
||||
uEditorArticulos, uBizArticulos, uIEditorElegirArticulos,
|
||||
JvExComCtrls, JvStatusBar, uDAInterfaces;
|
||||
|
||||
type
|
||||
TfEditorElegirArticulos = class(TfEditorArticulos, IEditorElegirArticulos)
|
||||
frViewBarraSeleccion1: TfrViewBarraSeleccion;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
EditorSeleccionActionList: TActionList;
|
||||
actBuscar2: TAction;
|
||||
actQuitarFiltro2: TAction;
|
||||
actAnchoAuto2: TAction;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject);
|
||||
@ -98,7 +100,7 @@ end;
|
||||
|
||||
function TfEditorElegirArticulos.GetMensaje: String;
|
||||
begin
|
||||
Result := JvgWizardHeader1.Comments.Text;
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
function TfEditorElegirArticulos.GetMultiSelect: Boolean;
|
||||
@ -108,7 +110,7 @@ end;
|
||||
|
||||
procedure TfEditorElegirArticulos.SetMensaje(const AValue: String);
|
||||
begin
|
||||
JvgWizardHeader1.Comments.Text := AValue;
|
||||
lblComments.Caption := AValue;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirArticulos.SetMultiSelect(AValue: Boolean);
|
||||
|
||||
@ -172,321 +172,4 @@
|
||||
<VersionInfoKeys Name="Comments"></VersionInfoKeys>
|
||||
</VersionInfoKeys>
|
||||
</Delphi.Personality>
|
||||
<!-- EurekaLog First Line
|
||||
[Exception Log]
|
||||
EurekaLog Version=519
|
||||
Activate=0
|
||||
Activate Handle=1
|
||||
Save Log File=1
|
||||
Foreground Tab=0
|
||||
Freeze Activate=0
|
||||
Freeze Timeout=60
|
||||
Freeze Message=The application seems to be frozen.
|
||||
SMTP From=eurekalog@email.com
|
||||
SMTP Host=
|
||||
SMTP Port=25
|
||||
SMTP UserID=
|
||||
SMTP Password=
|
||||
Append to Log=0
|
||||
Show TerminateBtn=1
|
||||
TerminateBtn Operation=1
|
||||
Errors Number=32
|
||||
Errors Terminate=3
|
||||
Email Address=
|
||||
Email Object=
|
||||
Email Send Options=0
|
||||
Output Path=
|
||||
Encrypt Password=
|
||||
AutoCloseDialogSecs=0
|
||||
WebSendMode=0
|
||||
SupportULR=
|
||||
HTMLLayout Count=15
|
||||
HTMLLine0="%3Chtml%3E"
|
||||
HTMLLine1=" %3Chead%3E"
|
||||
HTMLLine2=" %3C/head%3E"
|
||||
HTMLLine3=" %3Cbody TopMargin=10 LeftMargin=10%3E"
|
||||
HTMLLine4=" %3Ctable width="100%%" border="0"%3E"
|
||||
HTMLLine5=" %3Ctr%3E"
|
||||
HTMLLine6=" %3Ctd nowrap%3E"
|
||||
HTMLLine7=" %3Cfont face="Lucida Console, Courier" size="2"%3E"
|
||||
HTMLLine8=" %3C%%HTML_TAG%%%3E"
|
||||
HTMLLine9=" %3C/font%3E"
|
||||
HTMLLine10=" %3C/td%3E"
|
||||
HTMLLine11=" %3C/tr%3E"
|
||||
HTMLLine12=" %3C/table%3E"
|
||||
HTMLLine13=" %3C/body%3E"
|
||||
HTMLLine14="%3C/html%3E"
|
||||
AutoCrashOperation=1
|
||||
AutoCrashNumber=10
|
||||
AutoCrashMinutes=1
|
||||
WebURL=
|
||||
WebUserID=
|
||||
WebPassword=
|
||||
WebPort=0
|
||||
AttachedFiles=
|
||||
Count=0
|
||||
EMail Message Line Count=0
|
||||
loNoDuplicateErrors=0
|
||||
loAppendReproduceText=0
|
||||
loDeleteLogAtVersionChange=0
|
||||
loAddComputerNameInLogFileName=0
|
||||
loSaveModulesSection=1
|
||||
loSaveCPUSection=1
|
||||
soAppStartDate=1
|
||||
soAppName=1
|
||||
soAppVersionNumber=1
|
||||
soAppParameters=1
|
||||
soAppCompilationDate=1
|
||||
soExcDate=1
|
||||
soExcAddress=1
|
||||
soExcModule=1
|
||||
soExcType=1
|
||||
soExcMessage=1
|
||||
soActCtlsFormClass=1
|
||||
soActCtlsFormText=1
|
||||
soActCtlsControlClass=1
|
||||
soActCtlsControlText=1
|
||||
soCmpName=1
|
||||
soCmpUser=1
|
||||
soCmpTotalMemory=1
|
||||
soCmpFreeMemory=1
|
||||
soCmpTotalDisk=1
|
||||
soCmpFreeDisk=1
|
||||
soCmpSysUpTime=1
|
||||
soCmpProcessor=1
|
||||
soCmpDisplayMode=1
|
||||
soOSType=1
|
||||
soOSBuildN=1
|
||||
soOSUpdate=1
|
||||
soOSLanguage=1
|
||||
soNetIP=1
|
||||
soNetSubmask=1
|
||||
soNetGateway=1
|
||||
soNetDNS1=1
|
||||
soNetDNS2=1
|
||||
soNetDHCP=1
|
||||
sndShowSendDialog=1
|
||||
sndShowSuccessFailureMsg=0
|
||||
sndSendEntireLog=0
|
||||
sndSendXMLLogCopy=0
|
||||
sndSendScreenshot=1
|
||||
sndUseOnlyActiveWindow=0
|
||||
sndSendLastHTMLPage=1
|
||||
sndSendInSeparatedThread=0
|
||||
sndAddDateInFileName=0
|
||||
sndCompressAllFiles=0
|
||||
edoShowExceptionDialog=1
|
||||
edoSendEmailChecked=1
|
||||
edoAttachScreenshotChecked=1
|
||||
edoShowCopyToClipOption=1
|
||||
edoShowDetailsButton=1
|
||||
edoShowInDetailedMode=0
|
||||
edoShowInTopMostMode=0
|
||||
edoUseEurekaLogLookAndFeel=0
|
||||
csoShowDLLs=1
|
||||
csoShowBPLs=1
|
||||
csoShowBorlandThreads=1
|
||||
csoShowWindowsThreads=1
|
||||
csoShowProcedureOffset=0
|
||||
boActivateCrashDetection=0
|
||||
boPauseBorlandThreads=0
|
||||
boDoNotPauseMainThread=0
|
||||
boPauseWindowsThreads=0
|
||||
boUseMainModuleOptions=1
|
||||
boCopyLogInCaseOfError=1
|
||||
boSaveCompressedCopyInCaseOfError=0
|
||||
Count mtInformationMsgCaption=1
|
||||
mtInformationMsgCaption0="Information."
|
||||
Count mtQuestionMsgCaption=1
|
||||
mtQuestionMsgCaption0="Question."
|
||||
Count mtDialog_Caption=1
|
||||
mtDialog_Caption0="Error."
|
||||
Count mtDialog_ErrorMsgCaption=2
|
||||
mtDialog_ErrorMsgCaption0="An error has occurred during program execution."
|
||||
mtDialog_ErrorMsgCaption1="Please read the following information for further details."
|
||||
Count mtDialog_GeneralCaption=1
|
||||
mtDialog_GeneralCaption0="General"
|
||||
Count mtDialog_GeneralHeader=1
|
||||
mtDialog_GeneralHeader0="General Information"
|
||||
Count mtDialog_CallStackCaption=1
|
||||
mtDialog_CallStackCaption0="Call Stack"
|
||||
Count mtDialog_CallStackHeader=1
|
||||
mtDialog_CallStackHeader0="Call Stack Information"
|
||||
Count mtDialog_ModulesCaption=1
|
||||
mtDialog_ModulesCaption0="Modules"
|
||||
Count mtDialog_ModulesHeader=1
|
||||
mtDialog_ModulesHeader0="Modules Information"
|
||||
Count mtDialog_CPUCaption=1
|
||||
mtDialog_CPUCaption0="CPU"
|
||||
Count mtDialog_CPUHeader=1
|
||||
mtDialog_CPUHeader0="CPU Information"
|
||||
Count mtDialog_CustomDataCaption=1
|
||||
mtDialog_CustomDataCaption0="Other"
|
||||
Count mtDialog_CustomDataHeader=1
|
||||
mtDialog_CustomDataHeader0="Other Information"
|
||||
Count mtDialog_OKButtonCaption=1
|
||||
mtDialog_OKButtonCaption0="%26OK"
|
||||
Count mtDialog_TerminateButtonCaption=1
|
||||
mtDialog_TerminateButtonCaption0="%26Terminate"
|
||||
Count mtDialog_RestartButtonCaption=1
|
||||
mtDialog_RestartButtonCaption0="%26Restart"
|
||||
Count mtDialog_DetailsButtonCaption=1
|
||||
mtDialog_DetailsButtonCaption0="%26Details"
|
||||
Count mtDialog_SendMessage=1
|
||||
mtDialog_SendMessage0="%26Send this error via Internet"
|
||||
Count mtDialog_ScreenshotMessage=1
|
||||
mtDialog_ScreenshotMessage0="%26Attach a Screenshot image"
|
||||
Count mtDialog_CopyMessage=1
|
||||
mtDialog_CopyMessage0="%26Copy to Clipboard"
|
||||
Count mtDialog_SupportMessage=1
|
||||
mtDialog_SupportMessage0="Go to the Support Page"
|
||||
Count mtLog_AppHeader=1
|
||||
mtLog_AppHeader0="Application"
|
||||
Count mtLog_AppStartDate=1
|
||||
mtLog_AppStartDate0="Start Date"
|
||||
Count mtLog_AppName=1
|
||||
mtLog_AppName0="Name/Description"
|
||||
Count mtLog_AppVersionNumber=1
|
||||
mtLog_AppVersionNumber0="Version Number"
|
||||
Count mtLog_AppParameters=1
|
||||
mtLog_AppParameters0="Parameters"
|
||||
Count mtLog_AppCompilationDate=1
|
||||
mtLog_AppCompilationDate0="Compilation Date"
|
||||
Count mtLog_ExcHeader=1
|
||||
mtLog_ExcHeader0="Exception"
|
||||
Count mtLog_ExcDate=1
|
||||
mtLog_ExcDate0="Date"
|
||||
Count mtLog_ExcAddress=1
|
||||
mtLog_ExcAddress0="Address"
|
||||
Count mtLog_ExcModule=1
|
||||
mtLog_ExcModule0="Module"
|
||||
Count mtLog_ExcType=1
|
||||
mtLog_ExcType0="Type"
|
||||
Count mtLog_ExcMessage=1
|
||||
mtLog_ExcMessage0="Message"
|
||||
Count mtLog_ActCtrlsHeader=1
|
||||
mtLog_ActCtrlsHeader0="Active Controls"
|
||||
Count mtLog_ActCtrlsFormClass=1
|
||||
mtLog_ActCtrlsFormClass0="Form Class"
|
||||
Count mtLog_ActCtrlsFormText=1
|
||||
mtLog_ActCtrlsFormText0="Form Text"
|
||||
Count mtLog_ActCtrlsControlClass=1
|
||||
mtLog_ActCtrlsControlClass0="Control Class"
|
||||
Count mtLog_ActCtrlsControlText=1
|
||||
mtLog_ActCtrlsControlText0="Control Text"
|
||||
Count mtLog_CmpHeader=1
|
||||
mtLog_CmpHeader0="Computer"
|
||||
Count mtLog_CmpName=1
|
||||
mtLog_CmpName0="Name"
|
||||
Count mtLog_CmpUser=1
|
||||
mtLog_CmpUser0="User"
|
||||
Count mtLog_CmpTotalMemory=1
|
||||
mtLog_CmpTotalMemory0="Total Memory"
|
||||
Count mtLog_CmpFreeMemory=1
|
||||
mtLog_CmpFreeMemory0="Free Memory"
|
||||
Count mtLog_CmpTotalDisk=1
|
||||
mtLog_CmpTotalDisk0="Total Disk"
|
||||
Count mtLog_CmpFreeDisk=1
|
||||
mtLog_CmpFreeDisk0="Free Disk"
|
||||
Count mtLog_CmpSystemUpTime=1
|
||||
mtLog_CmpSystemUpTime0="System Up Time"
|
||||
Count mtLog_CmpProcessor=1
|
||||
mtLog_CmpProcessor0="Processor"
|
||||
Count mtLog_CmpDisplayMode=1
|
||||
mtLog_CmpDisplayMode0="Display Mode"
|
||||
Count mtLog_OSHeader=1
|
||||
mtLog_OSHeader0="Operating System"
|
||||
Count mtLog_OSType=1
|
||||
mtLog_OSType0="Type"
|
||||
Count mtLog_OSBuildN=1
|
||||
mtLog_OSBuildN0="Build #"
|
||||
Count mtLog_OSUpdate=1
|
||||
mtLog_OSUpdate0="Update"
|
||||
Count mtLog_OSLanguage=1
|
||||
mtLog_OSLanguage0="Language"
|
||||
Count mtLog_NetHeader=1
|
||||
mtLog_NetHeader0="Network"
|
||||
Count mtLog_NetIP=1
|
||||
mtLog_NetIP0="IP Address"
|
||||
Count mtLog_NetSubmask=1
|
||||
mtLog_NetSubmask0="Submask"
|
||||
Count mtLog_NetGateway=1
|
||||
mtLog_NetGateway0="Gateway"
|
||||
Count mtLog_NetDNS1=1
|
||||
mtLog_NetDNS10="DNS 1"
|
||||
Count mtLog_NetDNS2=1
|
||||
mtLog_NetDNS20="DNS 2"
|
||||
Count mtLog_NetDHCP=1
|
||||
mtLog_NetDHCP0="DHCP"
|
||||
Count mtLog_CustInfoHeader=1
|
||||
mtLog_CustInfoHeader0="Custom Information"
|
||||
Count mtCallStack_Address=1
|
||||
mtCallStack_Address0="Address"
|
||||
Count mtCallStack_Name=1
|
||||
mtCallStack_Name0="Module"
|
||||
Count mtCallStack_Unit=1
|
||||
mtCallStack_Unit0="Unit"
|
||||
Count mtCallStack_Class=1
|
||||
mtCallStack_Class0="Class"
|
||||
Count mtCallStack_Procedure=1
|
||||
mtCallStack_Procedure0="Procedure/Method"
|
||||
Count mtCallStack_Line=1
|
||||
mtCallStack_Line0="Line"
|
||||
Count mtCallStack_MainThread=1
|
||||
mtCallStack_MainThread0="Main"
|
||||
Count mtCallStack_ExceptionThread=1
|
||||
mtCallStack_ExceptionThread0="Exception Thread"
|
||||
Count mtCallStack_RunningThread=1
|
||||
mtCallStack_RunningThread0="Running Thread"
|
||||
Count mtCallStack_CallingThread=1
|
||||
mtCallStack_CallingThread0="Calling Thread"
|
||||
Count mtCallStack_ThreadID=1
|
||||
mtCallStack_ThreadID0="ID"
|
||||
Count mtCallStack_ThreadPriority=1
|
||||
mtCallStack_ThreadPriority0="Priority"
|
||||
Count mtCallStack_ThreadClass=1
|
||||
mtCallStack_ThreadClass0="Class"
|
||||
Count mtSendDialog_Caption=1
|
||||
mtSendDialog_Caption0="Send."
|
||||
Count mtSendDialog_Message=1
|
||||
mtSendDialog_Message0="Message"
|
||||
Count mtSendDialog_Resolving=1
|
||||
mtSendDialog_Resolving0="Resolving DNS..."
|
||||
Count mtSendDialog_Connecting=1
|
||||
mtSendDialog_Connecting0="Connecting with server..."
|
||||
Count mtSendDialog_Connected=1
|
||||
mtSendDialog_Connected0="Connected with server."
|
||||
Count mtSendDialog_Sending=1
|
||||
mtSendDialog_Sending0="Sending message..."
|
||||
Count mtReproduceDialog_Caption=1
|
||||
mtReproduceDialog_Caption0="Request"
|
||||
Count mtReproduceDialog_Request=1
|
||||
mtReproduceDialog_Request0="Please describe the steps to reproduce the error:"
|
||||
Count mtReproduceDialog_OKButtonCaption=1
|
||||
mtReproduceDialog_OKButtonCaption0="%26OK"
|
||||
Count mtModules_Handle=1
|
||||
mtModules_Handle0="Handle"
|
||||
Count mtModules_Name=1
|
||||
mtModules_Name0="Name"
|
||||
Count mtModules_Description=1
|
||||
mtModules_Description0="Description"
|
||||
Count mtModules_Version=1
|
||||
mtModules_Version0="Version"
|
||||
Count mtModules_Size=1
|
||||
mtModules_Size0="Size"
|
||||
Count mtModules_LastModified=1
|
||||
mtModules_LastModified0="Modified"
|
||||
Count mtModules_Path=1
|
||||
mtModules_Path0="Path"
|
||||
Count mtCPU_Registers=1
|
||||
mtCPU_Registers0="Registers"
|
||||
Count mtCPU_Stack=1
|
||||
mtCPU_Stack0="Stack"
|
||||
Count mtCPU_MemoryDump=1
|
||||
mtCPU_MemoryDump0="Memory Dump"
|
||||
Count mtSend_SuccessMsg=1
|
||||
mtSend_SuccessMsg0="The message was sent successfully."
|
||||
Count mtSend_FailureMsg=1
|
||||
mtSend_FailureMsg0="Sorry, sending the message didn't work."
|
||||
EurekaLog Last Line -->
|
||||
</BorlandProject>
|
||||
|
||||
Binary file not shown.
@ -39,542 +39,7 @@
|
||||
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||
<Borland.ProjectType>Package</Borland.ProjectType>
|
||||
<BorlandProject>
|
||||
<BorlandProject xmlns=""> <Delphi.Personality> <Parameters>
|
||||
<Parameters Name="UseLauncher">False</Parameters>
|
||||
<Parameters Name="LoadAllSymbols">True</Parameters>
|
||||
<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
|
||||
</Parameters>
|
||||
<Package_Options>
|
||||
<Package_Options Name="ImplicitBuild">True</Package_Options>
|
||||
<Package_Options Name="DesigntimeOnly">False</Package_Options>
|
||||
<Package_Options Name="RuntimeOnly">False</Package_Options>
|
||||
</Package_Options>
|
||||
<VersionInfo>
|
||||
<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
|
||||
<VersionInfo Name="AutoIncBuild">False</VersionInfo>
|
||||
<VersionInfo Name="MajorVer">1</VersionInfo>
|
||||
<VersionInfo Name="MinorVer">0</VersionInfo>
|
||||
<VersionInfo Name="Release">0</VersionInfo>
|
||||
<VersionInfo Name="Build">0</VersionInfo>
|
||||
<VersionInfo Name="Debug">False</VersionInfo>
|
||||
<VersionInfo Name="PreRelease">False</VersionInfo>
|
||||
<VersionInfo Name="Special">False</VersionInfo>
|
||||
<VersionInfo Name="Private">False</VersionInfo>
|
||||
<VersionInfo Name="DLL">False</VersionInfo>
|
||||
<VersionInfo Name="Locale">3082</VersionInfo>
|
||||
<VersionInfo Name="CodePage">1252</VersionInfo>
|
||||
</VersionInfo>
|
||||
<VersionInfoKeys>
|
||||
<VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
|
||||
<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="ProductName"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
|
||||
<VersionInfoKeys Name="Comments"></VersionInfoKeys>
|
||||
</VersionInfoKeys>
|
||||
<Source>
|
||||
<Source Name="MainSource">BancaElectronica_view.dpk</Source>
|
||||
</Source>
|
||||
</Delphi.Personality> </BorlandProject></BorlandProject>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">BancaElectronica_view.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||
<ItemGroup>
|
||||
<DelphiCompile Include="BancaElectronica_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="BancaElectronica_controller.dcp" />
|
||||
<DCCReference Include="JvGlobusD11R.dcp" />
|
||||
<DCCReference Include="uBancaElectronicaViewRegister.pas" />
|
||||
<DCCReference Include="uEditorExportacionNorma19.pas">
|
||||
<Form>fEditorExportacionNorma19</Form>
|
||||
</DCCReference>
|
||||
</ItemGroup>
|
||||
</Project>
|
||||
|
||||
<!-- EurekaLog First Line
|
||||
[Exception Log]
|
||||
EurekaLog Version=6006
|
||||
Activate=0
|
||||
Activate Handle=1
|
||||
Save Log File=1
|
||||
Foreground Tab=0
|
||||
Freeze Activate=0
|
||||
Freeze Timeout=60
|
||||
SMTP From=eurekalog@email.com
|
||||
SMTP Host=
|
||||
SMTP Port=25
|
||||
SMTP UserID=
|
||||
SMTP Password=
|
||||
Append to Log=0
|
||||
TerminateBtn Operation=2
|
||||
Errors Number=32
|
||||
Errors Terminate=3
|
||||
Email Address=
|
||||
Email Object=
|
||||
Email Send Options=0
|
||||
Output Path=
|
||||
Encrypt Password=
|
||||
AutoCloseDialogSecs=0
|
||||
WebSendMode=0
|
||||
SupportULR=
|
||||
HTMLLayout Count=15
|
||||
HTMLLine0="%3Chtml%3E"
|
||||
HTMLLine1=" %3Chead%3E"
|
||||
HTMLLine2=" %3C/head%3E"
|
||||
HTMLLine3=" %3Cbody TopMargin=10 LeftMargin=10%3E"
|
||||
HTMLLine4=" %3Ctable width="100%%" border="0"%3E"
|
||||
HTMLLine5=" %3Ctr%3E"
|
||||
HTMLLine6=" %3Ctd nowrap%3E"
|
||||
HTMLLine7=" %3Cfont face="Lucida Console, Courier" size="2"%3E"
|
||||
HTMLLine8=" %3C%%HTML_TAG%%%3E"
|
||||
HTMLLine9=" %3C/font%3E"
|
||||
HTMLLine10=" %3C/td%3E"
|
||||
HTMLLine11=" %3C/tr%3E"
|
||||
HTMLLine12=" %3C/table%3E"
|
||||
HTMLLine13=" %3C/body%3E"
|
||||
HTMLLine14="%3C/html%3E"
|
||||
AutoCrashOperation=2
|
||||
AutoCrashNumber=10
|
||||
AutoCrashMinutes=1
|
||||
WebURL=
|
||||
WebUserID=
|
||||
WebPassword=
|
||||
WebPort=0
|
||||
AttachedFiles=
|
||||
ProxyURL=
|
||||
ProxyUser=
|
||||
ProxyPassword=
|
||||
ProxyPort=8080
|
||||
TrakerUser=
|
||||
TrakerPassword=
|
||||
TrakerAssignTo=
|
||||
TrakerProject=
|
||||
TrakerCategory=
|
||||
TrakerTrialID=
|
||||
ZipPassword=
|
||||
PreBuildEvent=
|
||||
PostSuccessfulBuildEvent=
|
||||
PostFailureBuildEvent=
|
||||
ExceptionDialogType=2
|
||||
Count=0
|
||||
EMail Message Line Count=0
|
||||
loNoDuplicateErrors=0
|
||||
loAppendReproduceText=0
|
||||
loDeleteLogAtVersionChange=0
|
||||
loAddComputerNameInLogFileName=0
|
||||
loSaveModulesAndProcessesSections=1
|
||||
loSaveAssemblerAndCPUSections=1
|
||||
soAppStartDate=1
|
||||
soAppName=1
|
||||
soAppVersionNumber=1
|
||||
soAppParameters=1
|
||||
soAppCompilationDate=1
|
||||
soAppUpTime=1
|
||||
soExcDate=1
|
||||
soExcAddress=1
|
||||
soExcModuleName=1
|
||||
soExcModuleVersion=1
|
||||
soExcType=1
|
||||
soExcMessage=1
|
||||
soExcID=1
|
||||
soExcCount=1
|
||||
soExcStatus=1
|
||||
soExcNote=1
|
||||
soUserID=1
|
||||
soUserName=1
|
||||
soUserEmail=1
|
||||
soUserPrivileges=1
|
||||
soUserCompany=1
|
||||
soActCtlsFormClass=1
|
||||
soActCtlsFormText=1
|
||||
soActCtlsControlClass=1
|
||||
soActCtlsControlText=1
|
||||
soCmpName=1
|
||||
soCmpTotalMemory=1
|
||||
soCmpFreeMemory=1
|
||||
soCmpTotalDisk=1
|
||||
soCmpFreeDisk=1
|
||||
soCmpSysUpTime=1
|
||||
soCmpProcessor=1
|
||||
soCmpDisplayMode=1
|
||||
soCmpDisplayDPI=1
|
||||
soCmpVideoCard=1
|
||||
soCmpPrinter=1
|
||||
soOSType=1
|
||||
soOSBuildN=1
|
||||
soOSUpdate=1
|
||||
soOSLanguage=1
|
||||
soOSCharset=1
|
||||
soNetIP=1
|
||||
soNetSubmask=1
|
||||
soNetGateway=1
|
||||
soNetDNS1=1
|
||||
soNetDNS2=1
|
||||
soNetDHCP=1
|
||||
soCustomData=1
|
||||
sndShowSendDialog=1
|
||||
sndShowSuccessFailureMsg=0
|
||||
sndSendEntireLog=0
|
||||
sndSendXMLLogCopy=0
|
||||
sndSendScreenshot=1
|
||||
sndUseOnlyActiveWindow=0
|
||||
sndSendLastHTMLPage=1
|
||||
sndSendInSeparatedThread=0
|
||||
sndAddDateInFileName=0
|
||||
sndAddComputerNameInFileName=0
|
||||
edoSendErrorReportChecked=1
|
||||
edoAttachScreenshotChecked=1
|
||||
edoShowCopyToClipOption=1
|
||||
edoShowDetailsButton=1
|
||||
edoShowInDetailedMode=0
|
||||
edoShowInTopMostMode=0
|
||||
edoUseEurekaLogLookAndFeel=0
|
||||
edoShowSendErrorReportOption=1
|
||||
edoShowAttachScreenshotOption=1
|
||||
edoShowCustomButton=0
|
||||
csoShowDLLs=1
|
||||
csoShowBPLs=1
|
||||
csoShowBorlandThreads=1
|
||||
csoShowWindowsThreads=1
|
||||
csoDoNotStoreProcNames=0
|
||||
boPauseBorlandThreads=0
|
||||
boDoNotPauseMainThread=0
|
||||
boPauseWindowsThreads=0
|
||||
boUseMainModuleOptions=1
|
||||
boCopyLogInCaseOfError=1
|
||||
boSaveCompressedCopyInCaseOfError=0
|
||||
boHandleSafeCallExceptions=1
|
||||
boCallRTLExceptionEvent=0
|
||||
boCatchHandledExceptions=0
|
||||
loCatchLeaks=0
|
||||
loGroupsSonLeaks=1
|
||||
loHideBorlandLeaks=1
|
||||
loFreeAllLeaks=1
|
||||
loCatchLeaksExceptions=1
|
||||
cfoReduceFileSize=1
|
||||
cfoCheckFileCorruption=0
|
||||
Count mtInformationMsgCaption=1
|
||||
mtInformationMsgCaption0="Information."
|
||||
Count mtQuestionMsgCaption=1
|
||||
mtQuestionMsgCaption0="Question."
|
||||
Count mtErrorMsgCaption=1
|
||||
mtErrorMsgCaption0="Error."
|
||||
Count mtDialog_Caption=1
|
||||
mtDialog_Caption0="Error occurred"
|
||||
Count mtDialog_ErrorMsgCaption=2
|
||||
mtDialog_ErrorMsgCaption0="An error has occurred during program execution."
|
||||
mtDialog_ErrorMsgCaption1="Please read the following information for further details."
|
||||
Count mtDialog_GeneralCaption=1
|
||||
mtDialog_GeneralCaption0="General"
|
||||
Count mtDialog_GeneralHeader=1
|
||||
mtDialog_GeneralHeader0="General Information"
|
||||
Count mtDialog_CallStackCaption=1
|
||||
mtDialog_CallStackCaption0="Call Stack"
|
||||
Count mtDialog_CallStackHeader=1
|
||||
mtDialog_CallStackHeader0="Call Stack Information"
|
||||
Count mtDialog_ModulesCaption=1
|
||||
mtDialog_ModulesCaption0="Modules"
|
||||
Count mtDialog_ModulesHeader=1
|
||||
mtDialog_ModulesHeader0="Modules Information"
|
||||
Count mtDialog_ProcessesCaption=1
|
||||
mtDialog_ProcessesCaption0="Processes"
|
||||
Count mtDialog_ProcessesHeader=1
|
||||
mtDialog_ProcessesHeader0="Processes Information"
|
||||
Count mtDialog_AsmCaption=1
|
||||
mtDialog_AsmCaption0="Assembler"
|
||||
Count mtDialog_AsmHeader=1
|
||||
mtDialog_AsmHeader0="Assembler Information"
|
||||
Count mtDialog_CPUCaption=1
|
||||
mtDialog_CPUCaption0="CPU"
|
||||
Count mtDialog_CPUHeader=1
|
||||
mtDialog_CPUHeader0="CPU Information"
|
||||
Count mtDialog_OKButtonCaption=1
|
||||
mtDialog_OKButtonCaption0="%26OK"
|
||||
Count mtDialog_TerminateButtonCaption=1
|
||||
mtDialog_TerminateButtonCaption0="%26Terminate"
|
||||
Count mtDialog_RestartButtonCaption=1
|
||||
mtDialog_RestartButtonCaption0="%26Restart"
|
||||
Count mtDialog_DetailsButtonCaption=1
|
||||
mtDialog_DetailsButtonCaption0="%26Details"
|
||||
Count mtDialog_CustomButtonCaption=1
|
||||
mtDialog_CustomButtonCaption0="%26Help"
|
||||
Count mtDialog_SendMessage=1
|
||||
mtDialog_SendMessage0="%26Send this error via Internet"
|
||||
Count mtDialog_ScreenshotMessage=1
|
||||
mtDialog_ScreenshotMessage0="%26Attach a Screenshot image"
|
||||
Count mtDialog_CopyMessage=1
|
||||
mtDialog_CopyMessage0="%26Copy to Clipboard"
|
||||
Count mtDialog_SupportMessage=1
|
||||
mtDialog_SupportMessage0="Go to the Support Page"
|
||||
Count mtMSDialog_ErrorMsgCaption=1
|
||||
mtMSDialog_ErrorMsgCaption0="The application has encountered a problem. We are sorry for the inconvenience."
|
||||
Count mtMSDialog_RestartCaption=1
|
||||
mtMSDialog_RestartCaption0="Restart application."
|
||||
Count mtMSDialog_TerminateCaption=1
|
||||
mtMSDialog_TerminateCaption0="Terminate application."
|
||||
Count mtMSDialog_PleaseCaption=1
|
||||
mtMSDialog_PleaseCaption0="Please tell us about this problem."
|
||||
Count mtMSDialog_DescriptionCaption=1
|
||||
mtMSDialog_DescriptionCaption0="We have created an error report that you can send to us. We will treat this report as confidential and anonymous."
|
||||
Count mtMSDialog_SeeDetailsCaption=1
|
||||
mtMSDialog_SeeDetailsCaption0="To see what data the error report contains,"
|
||||
Count mtMSDialog_SeeClickCaption=1
|
||||
mtMSDialog_SeeClickCaption0="click here."
|
||||
Count mtMSDialog_HowToReproduceCaption=1
|
||||
mtMSDialog_HowToReproduceCaption0="What were you doing when the problem happended (optional)?"
|
||||
Count mtMSDialog_EmailCaption=1
|
||||
mtMSDialog_EmailCaption0="Email address (optional):"
|
||||
Count mtMSDialog_SendButtonCaption=1
|
||||
mtMSDialog_SendButtonCaption0="%26Send Error Report"
|
||||
Count mtMSDialog_NoSendButtonCaption=1
|
||||
mtMSDialog_NoSendButtonCaption0="%26Don't Send"
|
||||
Count mtLog_AppHeader=1
|
||||
mtLog_AppHeader0="Application"
|
||||
Count mtLog_AppStartDate=1
|
||||
mtLog_AppStartDate0="Start Date"
|
||||
Count mtLog_AppName=1
|
||||
mtLog_AppName0="Name/Description"
|
||||
Count mtLog_AppVersionNumber=1
|
||||
mtLog_AppVersionNumber0="Version Number"
|
||||
Count mtLog_AppParameters=1
|
||||
mtLog_AppParameters0="Parameters"
|
||||
Count mtLog_AppCompilationDate=1
|
||||
mtLog_AppCompilationDate0="Compilation Date"
|
||||
Count mtLog_AppUpTime=1
|
||||
mtLog_AppUpTime0="Up Time"
|
||||
Count mtLog_ExcHeader=1
|
||||
mtLog_ExcHeader0="Exception"
|
||||
Count mtLog_ExcDate=1
|
||||
mtLog_ExcDate0="Date"
|
||||
Count mtLog_ExcAddress=1
|
||||
mtLog_ExcAddress0="Address"
|
||||
Count mtLog_ExcModuleName=1
|
||||
mtLog_ExcModuleName0="Module Name"
|
||||
Count mtLog_ExcModuleVersion=1
|
||||
mtLog_ExcModuleVersion0="Module Version"
|
||||
Count mtLog_ExcType=1
|
||||
mtLog_ExcType0="Type"
|
||||
Count mtLog_ExcMessage=1
|
||||
mtLog_ExcMessage0="Message"
|
||||
Count mtLog_ExcID=1
|
||||
mtLog_ExcID0="ID"
|
||||
Count mtLog_ExcCount=1
|
||||
mtLog_ExcCount0="Count"
|
||||
Count mtLog_ExcStatus=1
|
||||
mtLog_ExcStatus0="Status"
|
||||
Count mtLog_ExcNote=1
|
||||
mtLog_ExcNote0="Note"
|
||||
Count mtLog_UserHeader=1
|
||||
mtLog_UserHeader0="User"
|
||||
Count mtLog_UserID=1
|
||||
mtLog_UserID0="ID"
|
||||
Count mtLog_UserName=1
|
||||
mtLog_UserName0="Name"
|
||||
Count mtLog_UserEmail=1
|
||||
mtLog_UserEmail0="Email"
|
||||
Count mtLog_UserCompany=1
|
||||
mtLog_UserCompany0="Company"
|
||||
Count mtLog_UserPrivileges=1
|
||||
mtLog_UserPrivileges0="Privileges"
|
||||
Count mtLog_ActCtrlsHeader=1
|
||||
mtLog_ActCtrlsHeader0="Active Controls"
|
||||
Count mtLog_ActCtrlsFormClass=1
|
||||
mtLog_ActCtrlsFormClass0="Form Class"
|
||||
Count mtLog_ActCtrlsFormText=1
|
||||
mtLog_ActCtrlsFormText0="Form Text"
|
||||
Count mtLog_ActCtrlsControlClass=1
|
||||
mtLog_ActCtrlsControlClass0="Control Class"
|
||||
Count mtLog_ActCtrlsControlText=1
|
||||
mtLog_ActCtrlsControlText0="Control Text"
|
||||
Count mtLog_CmpHeader=1
|
||||
mtLog_CmpHeader0="Computer"
|
||||
Count mtLog_CmpName=1
|
||||
mtLog_CmpName0="Name"
|
||||
Count mtLog_CmpTotalMemory=1
|
||||
mtLog_CmpTotalMemory0="Total Memory"
|
||||
Count mtLog_CmpFreeMemory=1
|
||||
mtLog_CmpFreeMemory0="Free Memory"
|
||||
Count mtLog_CmpTotalDisk=1
|
||||
mtLog_CmpTotalDisk0="Total Disk"
|
||||
Count mtLog_CmpFreeDisk=1
|
||||
mtLog_CmpFreeDisk0="Free Disk"
|
||||
Count mtLog_CmpSystemUpTime=1
|
||||
mtLog_CmpSystemUpTime0="System Up Time"
|
||||
Count mtLog_CmpProcessor=1
|
||||
mtLog_CmpProcessor0="Processor"
|
||||
Count mtLog_CmpDisplayMode=1
|
||||
mtLog_CmpDisplayMode0="Display Mode"
|
||||
Count mtLog_CmpDisplayDPI=1
|
||||
mtLog_CmpDisplayDPI0="Display DPI"
|
||||
Count mtLog_CmpVideoCard=1
|
||||
mtLog_CmpVideoCard0="Video Card"
|
||||
Count mtLog_CmpPrinter=1
|
||||
mtLog_CmpPrinter0="Printer"
|
||||
Count mtLog_OSHeader=1
|
||||
mtLog_OSHeader0="Operating System"
|
||||
Count mtLog_OSType=1
|
||||
mtLog_OSType0="Type"
|
||||
Count mtLog_OSBuildN=1
|
||||
mtLog_OSBuildN0="Build #"
|
||||
Count mtLog_OSUpdate=1
|
||||
mtLog_OSUpdate0="Update"
|
||||
Count mtLog_OSLanguage=1
|
||||
mtLog_OSLanguage0="Language"
|
||||
Count mtLog_OSCharset=1
|
||||
mtLog_OSCharset0="Charset"
|
||||
Count mtLog_NetHeader=1
|
||||
mtLog_NetHeader0="Network"
|
||||
Count mtLog_NetIP=1
|
||||
mtLog_NetIP0="IP Address"
|
||||
Count mtLog_NetSubmask=1
|
||||
mtLog_NetSubmask0="Submask"
|
||||
Count mtLog_NetGateway=1
|
||||
mtLog_NetGateway0="Gateway"
|
||||
Count mtLog_NetDNS1=1
|
||||
mtLog_NetDNS10="DNS 1"
|
||||
Count mtLog_NetDNS2=1
|
||||
mtLog_NetDNS20="DNS 2"
|
||||
Count mtLog_NetDHCP=1
|
||||
mtLog_NetDHCP0="DHCP"
|
||||
Count mtLog_CustInfoHeader=1
|
||||
mtLog_CustInfoHeader0="Custom Information"
|
||||
Count mtCallStack_Address=1
|
||||
mtCallStack_Address0="Address"
|
||||
Count mtCallStack_Name=1
|
||||
mtCallStack_Name0="Module"
|
||||
Count mtCallStack_Unit=1
|
||||
mtCallStack_Unit0="Unit"
|
||||
Count mtCallStack_Class=1
|
||||
mtCallStack_Class0="Class"
|
||||
Count mtCallStack_Procedure=1
|
||||
mtCallStack_Procedure0="Procedure/Method"
|
||||
Count mtCallStack_Line=1
|
||||
mtCallStack_Line0="Line"
|
||||
Count mtCallStack_MainThread=1
|
||||
mtCallStack_MainThread0="Main"
|
||||
Count mtCallStack_ExceptionThread=1
|
||||
mtCallStack_ExceptionThread0="Exception Thread"
|
||||
Count mtCallStack_RunningThread=1
|
||||
mtCallStack_RunningThread0="Running Thread"
|
||||
Count mtCallStack_CallingThread=1
|
||||
mtCallStack_CallingThread0="Calling Thread"
|
||||
Count mtCallStack_ThreadID=1
|
||||
mtCallStack_ThreadID0="ID"
|
||||
Count mtCallStack_ThreadPriority=1
|
||||
mtCallStack_ThreadPriority0="Priority"
|
||||
Count mtCallStack_ThreadClass=1
|
||||
mtCallStack_ThreadClass0="Class"
|
||||
Count mtCallStack_LeakCaption=1
|
||||
mtCallStack_LeakCaption0="Memory Leak"
|
||||
Count mtCallStack_LeakData=1
|
||||
mtCallStack_LeakData0="Data"
|
||||
Count mtCallStack_LeakType=1
|
||||
mtCallStack_LeakType0="Type"
|
||||
Count mtCallStack_LeakSize=1
|
||||
mtCallStack_LeakSize0="Total size"
|
||||
Count mtCallStack_LeakCount=1
|
||||
mtCallStack_LeakCount0="Count"
|
||||
Count mtSendDialog_Caption=1
|
||||
mtSendDialog_Caption0="Send."
|
||||
Count mtSendDialog_Message=1
|
||||
mtSendDialog_Message0="Message"
|
||||
Count mtSendDialog_Resolving=1
|
||||
mtSendDialog_Resolving0="Resolving DNS..."
|
||||
Count mtSendDialog_Login=1
|
||||
mtSendDialog_Login0="Login..."
|
||||
Count mtSendDialog_Connecting=1
|
||||
mtSendDialog_Connecting0="Connecting with server..."
|
||||
Count mtSendDialog_Connected=1
|
||||
mtSendDialog_Connected0="Connected with server."
|
||||
Count mtSendDialog_Sending=1
|
||||
mtSendDialog_Sending0="Sending message..."
|
||||
Count mtSendDialog_Sent=1
|
||||
mtSendDialog_Sent0="Message sent."
|
||||
Count mtSendDialog_SelectProject=1
|
||||
mtSendDialog_SelectProject0="Select project..."
|
||||
Count mtSendDialog_Searching=1
|
||||
mtSendDialog_Searching0="Searching..."
|
||||
Count mtSendDialog_Modifying=1
|
||||
mtSendDialog_Modifying0="Modifying..."
|
||||
Count mtSendDialog_Disconnecting=1
|
||||
mtSendDialog_Disconnecting0="Disconnecting..."
|
||||
Count mtSendDialog_Disconnected=1
|
||||
mtSendDialog_Disconnected0="Disconnected."
|
||||
Count mtReproduceDialog_Caption=1
|
||||
mtReproduceDialog_Caption0="Request"
|
||||
Count mtReproduceDialog_Request=1
|
||||
mtReproduceDialog_Request0="Please describe the steps to reproduce the error:"
|
||||
Count mtReproduceDialog_OKButtonCaption=1
|
||||
mtReproduceDialog_OKButtonCaption0="%26OK"
|
||||
Count mtModules_Handle=1
|
||||
mtModules_Handle0="Handle"
|
||||
Count mtModules_Name=1
|
||||
mtModules_Name0="Name"
|
||||
Count mtModules_Description=1
|
||||
mtModules_Description0="Description"
|
||||
Count mtModules_Version=1
|
||||
mtModules_Version0="Version"
|
||||
Count mtModules_Size=1
|
||||
mtModules_Size0="Size"
|
||||
Count mtModules_LastModified=1
|
||||
mtModules_LastModified0="Modified"
|
||||
Count mtModules_Path=1
|
||||
mtModules_Path0="Path"
|
||||
Count mtProcesses_ID=1
|
||||
mtProcesses_ID0="ID"
|
||||
Count mtProcesses_Name=1
|
||||
mtProcesses_Name0="Name"
|
||||
Count mtProcesses_Description=1
|
||||
mtProcesses_Description0="Description"
|
||||
Count mtProcesses_Version=1
|
||||
mtProcesses_Version0="Version"
|
||||
Count mtProcesses_Memory=1
|
||||
mtProcesses_Memory0="Memory"
|
||||
Count mtProcesses_Priority=1
|
||||
mtProcesses_Priority0="Priority"
|
||||
Count mtProcesses_Threads=1
|
||||
mtProcesses_Threads0="Threads"
|
||||
Count mtProcesses_Path=1
|
||||
mtProcesses_Path0="Path"
|
||||
Count mtCPU_Registers=1
|
||||
mtCPU_Registers0="Registers"
|
||||
Count mtCPU_Stack=1
|
||||
mtCPU_Stack0="Stack"
|
||||
Count mtCPU_MemoryDump=1
|
||||
mtCPU_MemoryDump0="Memory Dump"
|
||||
Count mtSend_SuccessMsg=1
|
||||
mtSend_SuccessMsg0="The message was sent successfully."
|
||||
Count mtSend_FailureMsg=1
|
||||
mtSend_FailureMsg0="Sorry, sending the message didn't work."
|
||||
Count mtSend_BugClosedMsg=2
|
||||
mtSend_BugClosedMsg0="These BUG is just closed."
|
||||
mtSend_BugClosedMsg1="Contact the program support to obtain an update."
|
||||
Count mtSend_UnknownErrorMsg=1
|
||||
mtSend_UnknownErrorMsg0="Unknown error."
|
||||
Count mtSend_InvalidLoginMsg=1
|
||||
mtSend_InvalidLoginMsg0="Invalid login request."
|
||||
Count mtSend_InvalidSearchMsg=1
|
||||
mtSend_InvalidSearchMsg0="Invalid search request."
|
||||
Count mtSend_InvalidSelectionMsg=1
|
||||
mtSend_InvalidSelectionMsg0="Invalid selection request."
|
||||
Count mtSend_InvalidInsertMsg=1
|
||||
mtSend_InvalidInsertMsg0="Invalid insert request."
|
||||
Count mtSend_InvalidModifyMsg=1
|
||||
mtSend_InvalidModifyMsg0="Invalid modify request."
|
||||
Count mtFileCrackedMsg=2
|
||||
mtFileCrackedMsg0="This file is cracked."
|
||||
mtFileCrackedMsg1="The application will be closed."
|
||||
Count mtException_LeakMultiFree=1
|
||||
mtException_LeakMultiFree0="Multi Free memory leak."
|
||||
Count mtException_LeakMemoryOverrun=1
|
||||
mtException_LeakMemoryOverrun0="Memory Overrun leak."
|
||||
Count mtException_AntiFreeze=1
|
||||
mtException_AntiFreeze0="The application seems to be frozen."
|
||||
Count mtInvalidEmailMsg=1
|
||||
mtInvalidEmailMsg0="Invalid email."
|
||||
TextsCollection=English
|
||||
EurekaLog Last Line -->
|
||||
|
||||
@ -0,0 +1,22 @@
|
||||
1 VERSIONINFO
|
||||
FILEVERSION 1,0,0,0
|
||||
PRODUCTVERSION 1,0,0,0
|
||||
FILEFLAGSMASK 0x3FL
|
||||
FILEFLAGS 0x00L
|
||||
FILEOS 0x40004L
|
||||
FILETYPE 0x1L
|
||||
FILESUBTYPE 0x0L
|
||||
BEGIN
|
||||
BLOCK "StringFileInfo"
|
||||
BEGIN
|
||||
BLOCK "0C0A04E4"
|
||||
BEGIN
|
||||
VALUE "FileVersion", "1.0.0.0\0"
|
||||
VALUE "ProductVersion", "1.0.0.0\0"
|
||||
END
|
||||
END
|
||||
BLOCK "VarFileInfo"
|
||||
BEGIN
|
||||
VALUE "Translation", 0x0C0A, 1252
|
||||
END
|
||||
END
|
||||
Binary file not shown.
@ -1,236 +1,216 @@
|
||||
object fEditorExportacionNorma19: TfEditorExportacionNorma19
|
||||
Left = 0
|
||||
Top = 0
|
||||
ActiveControl = edtCodEntidad
|
||||
BorderStyle = bsDialog
|
||||
inherited fEditorExportacionNorma19: TfEditorExportacionNorma19
|
||||
Caption = 'Volcado de remesas a disco (Norma 19)'
|
||||
ClientHeight = 313
|
||||
ClientWidth = 389
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poMainFormCenter
|
||||
ClientHeight = 373
|
||||
ClientWidth = 466
|
||||
OnCreate = FormCreate
|
||||
DesignSize = (
|
||||
389
|
||||
313)
|
||||
ExplicitWidth = 472
|
||||
ExplicitHeight = 405
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object Label2: TLabel
|
||||
Left = 24
|
||||
Top = 96
|
||||
Width = 90
|
||||
Height = 13
|
||||
Caption = 'Entidad receptora:'
|
||||
inherited Bevel2: TBevel
|
||||
Width = 466
|
||||
ExplicitWidth = 466
|
||||
end
|
||||
object Label3: TLabel
|
||||
Left = 24
|
||||
Top = 123
|
||||
Width = 42
|
||||
Height = 13
|
||||
Caption = 'Agencia:'
|
||||
inherited Bevel3: TBevel
|
||||
Top = 329
|
||||
Width = 466
|
||||
ExplicitTop = 329
|
||||
ExplicitWidth = 466
|
||||
end
|
||||
object Label4: TLabel
|
||||
Left = 24
|
||||
Top = 153
|
||||
Width = 78
|
||||
Height = 13
|
||||
Caption = 'Fecha de cargo:'
|
||||
inherited pnlBotones: TPanel
|
||||
Top = 331
|
||||
Width = 466
|
||||
ExplicitTop = 331
|
||||
ExplicitWidth = 466
|
||||
inherited btnAceptar: TButton
|
||||
Left = 280
|
||||
Top = 6
|
||||
Width = 98
|
||||
ExplicitLeft = 280
|
||||
ExplicitTop = 6
|
||||
ExplicitWidth = 98
|
||||
end
|
||||
inherited btnCancelar: TButton
|
||||
Left = 382
|
||||
Top = 6
|
||||
ExplicitLeft = 382
|
||||
ExplicitTop = 6
|
||||
end
|
||||
end
|
||||
object JvgWizardHeader1: TJvgWizardHeader
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 389
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Volcado de remesas a disco')
|
||||
Comments.Strings = (
|
||||
'Introduzca los siguientes datos para realizar el volcado')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitLeft = -8
|
||||
ExplicitTop = 76
|
||||
inherited pnlHeader: TPanel
|
||||
Width = 466
|
||||
ExplicitWidth = 466
|
||||
inherited lblTitle: TLabel
|
||||
Width = 416
|
||||
Caption = 'Volcado de remesas a disco - Norma 19'
|
||||
ExplicitWidth = 220
|
||||
end
|
||||
inherited lblComments: TLabel
|
||||
Width = 391
|
||||
Height = 27
|
||||
Visible = False
|
||||
end
|
||||
object Image1: TImage
|
||||
Left = 429
|
||||
Top = 15
|
||||
Width = 28
|
||||
Height = 28
|
||||
AutoSize = True
|
||||
Picture.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000002CA4944415478DAADD55F4853
|
||||
511C07F0DF25C49012DA8B1085A14581E46EAD19A3D05885CA8CA251D04325BD
|
||||
D89342BEF5B087E8CD0C7AA90916E5F0A558C8989935872C866C63EE4F5BB9A8
|
||||
508CB27AB01552F3EE4F3BBFED1E76B7BBED8E7B7F2078CFBDDCCF39BF73EE77
|
||||
8CF575280312CA785ACD4879AE5A31043C7FAABDE243CF1D61B87DC70C81D907
|
||||
B2D1AA603A9D86296704548D0D70C3745780AAAFD833A189BE9A265111241897
|
||||
4CC3B4EB1DE8D816887D5EA32862E12F00C1EBCA80630C03FD090E382E05AF16
|
||||
62D8523A91260318BB59308DD89501138718A81FBE07639787E0E2AF8DEC2A53
|
||||
F0F4851BEF8D3B5288C5FFFC8551F35CAEB5EDBB406A6B4B401E4B8C0EE1F5E3
|
||||
2040DFDA3AB6F6DCCD058A91499031D201DFDB1590DA5E01588CF14550FDF20F
|
||||
B860F2E27557C75E8AE5E014FEFFCCB65815A520D9B3014B295688721333D852
|
||||
52DA83CD303EE9A6F7CFF6AA21B199849773D18A2882674EB4E10C2D0DF5D0CF
|
||||
8A631DD15570FB23F068D286878694A08DAC39A3EFDC8FE8269704DFC35EA62C
|
||||
D873EC00DD13AB6A9B00E53172DF1B7A8F60D9CF228B6A35CDE0F3AF945D2582
|
||||
278FEECBED497E3F6676AA102DC4C85F20FA8182783A8B3EFC9EE137996F3FE3
|
||||
150F10829D9A56FAD2647EA5F32D4D028C8C45621F05A0580EDFB2AC22681DD1
|
||||
D1B1C21C4650A7DE23C004A72F3F464A0C2CFE86D9ABD308660203785D9CC308
|
||||
1E69DB0D368707A4542DA0580E2358185B52AA1A187C62289BC3B27E6E447338
|
||||
BE08E9ED2CDD9AE21C5616CC62B034082EA71B0E0FFEA36780CF61B21DCA829E
|
||||
E3008DB997C7B2B9BEE3D26F7AE8EC4EAFC2607E753CE89A0268BDB64EBFEF59
|
||||
975F3990BCB0CEDF4531BEC82AC1F01DF772DE13520624395CB71112AC8E2FB2
|
||||
4A95F12B4E88CF61D920C9E186B0BE042B44B71A96690ECB6FA93609AEFB9A8A
|
||||
CF6DE9FE447358362896C362D1C8C7A26CB0D61C960DD69AC3B2C15A73F83F42
|
||||
0A9D9B19DC72610000000049454E44AE426082}
|
||||
end
|
||||
end
|
||||
object Image1: TImage
|
||||
Left = 345
|
||||
Top = 15
|
||||
Width = 28
|
||||
Height = 28
|
||||
AutoSize = True
|
||||
Picture.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000002CA4944415478DAADD55F4853
|
||||
511C07F0DF25C49012DA8B1085A14581E46EAD19A3D05885CA8CA251D04325BD
|
||||
D89342BEF5B087E8CD0C7AA90916E5F0A558C8989935872C866C63EE4F5BB9A8
|
||||
508CB27AB01552F3EE4F3BBFED1E76B7BBED8E7B7F2078CFBDDCCF39BF73EE77
|
||||
8CF575280312CA785ACD4879AE5A31043C7FAABDE243CF1D61B87DC70C81D907
|
||||
B2D1AA603A9D86296704548D0D70C3745780AAAFD833A189BE9A265111241897
|
||||
4CC3B4EB1DE8D816887D5EA32862E12F00C1EBCA80630C03FD090E382E05AF16
|
||||
62D8523A91260318BB59308DD89501138718A81FBE07639787E0E2AF8DEC2A53
|
||||
F0F4851BEF8D3B5288C5FFFC8551F35CAEB5EDBB406A6B4B401E4B8C0EE1F5E3
|
||||
2040DFDA3AB6F6DCCD058A91499031D201DFDB1590DA5E01588CF14550FDF20F
|
||||
B860F2E27557C75E8AE5E014FEFFCCB65815A520D9B3014B295688721333D852
|
||||
52DA83CD303EE9A6F7CFF6AA21B199849773D18A2882674EB4E10C2D0DF5D0CF
|
||||
8A631DD15570FB23F068D286878694A08DAC39A3EFDC8FE8269704DFC35EA62C
|
||||
D873EC00DD13AB6A9B00E53172DF1B7A8F60D9CF228B6A35CDE0F3AF945D2582
|
||||
278FEECBED497E3F6676AA102DC4C85F20FA8182783A8B3EFC9EE137996F3FE3
|
||||
150F10829D9A56FAD2647EA5F32D4D028C8C45621F05A0580EDFB2AC22681DD1
|
||||
D1B1C21C4650A7DE23C004A72F3F464A0C2CFE86D9ABD308660203785D9CC308
|
||||
1E69DB0D368707A4542DA0580E2358185B52AA1A187C62289BC3B27E6E447338
|
||||
BE08E9ED2CDD9AE21C5616CC62B034082EA71B0E0FFEA36780CF61B21DCA829E
|
||||
E3008DB997C7B2B9BEE3D26F7AE8EC4EAFC2607E753CE89A0268BDB64EBFEF59
|
||||
975F3990BCB0CEDF4531BEC82AC1F01DF772DE13520624395CB71112AC8E2FB2
|
||||
4A95F12B4E88CF61D920C9E186B0BE042B44B71A96690ECB6FA93609AEFB9A8A
|
||||
CF6DE9FE447358362896C362D1C8C7A26CB0D61C960DD69AC3B2C15A73F83F42
|
||||
0A9D9B19DC72610000000049454E44AE426082}
|
||||
inherited pnlCuerpo: TPanel
|
||||
Width = 466
|
||||
Height = 263
|
||||
ExplicitWidth = 466
|
||||
ExplicitHeight = 263
|
||||
object Bevel12: TBevel
|
||||
Left = 50
|
||||
Top = 132
|
||||
Width = 349
|
||||
Height = 5
|
||||
Shape = bsBottomLine
|
||||
end
|
||||
object Label1: TLabel
|
||||
Left = 50
|
||||
Top = 152
|
||||
Width = 71
|
||||
Height = 13
|
||||
Caption = 'Guardar como:'
|
||||
end
|
||||
object Label2: TLabel
|
||||
Left = 50
|
||||
Top = 40
|
||||
Width = 90
|
||||
Height = 13
|
||||
Caption = 'Entidad receptora:'
|
||||
end
|
||||
object Label3: TLabel
|
||||
Left = 50
|
||||
Top = 67
|
||||
Width = 42
|
||||
Height = 13
|
||||
Caption = 'Agencia:'
|
||||
end
|
||||
object Label4: TLabel
|
||||
Left = 50
|
||||
Top = 97
|
||||
Width = 78
|
||||
Height = 13
|
||||
Caption = 'Fecha de cargo:'
|
||||
end
|
||||
object Label5: TLabel
|
||||
Left = 228
|
||||
Top = 40
|
||||
Width = 48
|
||||
Height = 13
|
||||
Caption = '(4 d'#237'gitos)'
|
||||
end
|
||||
object Label6: TLabel
|
||||
Left = 228
|
||||
Top = 67
|
||||
Width = 48
|
||||
Height = 13
|
||||
Caption = '(4 d'#237'gitos)'
|
||||
end
|
||||
object edtCodAgencia: TcxMaskEdit
|
||||
Left = 146
|
||||
Top = 64
|
||||
Properties.BeepOnError = True
|
||||
Properties.MaxLength = 4
|
||||
Style.LookAndFeel.Kind = lfStandard
|
||||
Style.LookAndFeel.NativeStyle = True
|
||||
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||||
StyleDisabled.LookAndFeel.NativeStyle = True
|
||||
StyleFocused.LookAndFeel.Kind = lfStandard
|
||||
StyleFocused.LookAndFeel.NativeStyle = True
|
||||
StyleHot.LookAndFeel.Kind = lfStandard
|
||||
StyleHot.LookAndFeel.NativeStyle = True
|
||||
TabOrder = 0
|
||||
Text = ' '
|
||||
Width = 73
|
||||
end
|
||||
object edtCodEntidad: TcxMaskEdit
|
||||
Left = 146
|
||||
Top = 37
|
||||
Properties.BeepOnError = True
|
||||
Properties.MaxLength = 4
|
||||
Style.LookAndFeel.Kind = lfStandard
|
||||
Style.LookAndFeel.NativeStyle = True
|
||||
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||||
StyleDisabled.LookAndFeel.NativeStyle = True
|
||||
StyleFocused.LookAndFeel.Kind = lfStandard
|
||||
StyleFocused.LookAndFeel.NativeStyle = True
|
||||
StyleHot.LookAndFeel.Kind = lfStandard
|
||||
StyleHot.LookAndFeel.NativeStyle = True
|
||||
TabOrder = 1
|
||||
Text = ' '
|
||||
Width = 73
|
||||
end
|
||||
object edtFechaCargo: TcxDateEdit
|
||||
Left = 146
|
||||
Top = 94
|
||||
Properties.DateButtons = [btnToday]
|
||||
Properties.ImmediatePost = True
|
||||
Properties.SaveTime = False
|
||||
Properties.ShowTime = False
|
||||
Style.LookAndFeel.Kind = lfStandard
|
||||
Style.LookAndFeel.NativeStyle = True
|
||||
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||||
StyleDisabled.LookAndFeel.NativeStyle = True
|
||||
StyleFocused.LookAndFeel.Kind = lfStandard
|
||||
StyleFocused.LookAndFeel.NativeStyle = True
|
||||
StyleHot.LookAndFeel.Kind = lfStandard
|
||||
StyleHot.LookAndFeel.NativeStyle = True
|
||||
TabOrder = 2
|
||||
Width = 167
|
||||
end
|
||||
object JvFilenameEdit1: TJvFilenameEdit
|
||||
Left = 50
|
||||
Top = 170
|
||||
Width = 349
|
||||
Height = 21
|
||||
Flat = False
|
||||
ParentFlat = False
|
||||
Filter = 'Ficheros de norma 19 (*.C19)|*.C19'
|
||||
DialogOptions = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist]
|
||||
DialogTitle = 'Volcar a disco la remesa'
|
||||
TabOrder = 3
|
||||
end
|
||||
end
|
||||
object Bevel1: TBevel
|
||||
Left = 8
|
||||
Top = 268
|
||||
Width = 373
|
||||
Height = 3
|
||||
Anchors = [akLeft, akRight, akBottom]
|
||||
Shape = bsBottomLine
|
||||
ExplicitTop = 328
|
||||
end
|
||||
object Label1: TLabel
|
||||
Left = 24
|
||||
Top = 208
|
||||
Width = 71
|
||||
Height = 13
|
||||
Caption = 'Guardar como:'
|
||||
end
|
||||
object Bevel2: TBevel
|
||||
Left = 24
|
||||
Top = 188
|
||||
Width = 349
|
||||
Height = 3
|
||||
Anchors = [akLeft, akTop, akRight]
|
||||
Shape = bsBottomLine
|
||||
end
|
||||
object Label5: TLabel
|
||||
Left = 202
|
||||
Top = 96
|
||||
Width = 48
|
||||
Height = 13
|
||||
Caption = '(4 d'#237'gitos)'
|
||||
end
|
||||
object Label6: TLabel
|
||||
Left = 202
|
||||
Top = 123
|
||||
Width = 48
|
||||
Height = 13
|
||||
Caption = '(4 d'#237'gitos)'
|
||||
end
|
||||
object edtFechaCargo: TcxDateEdit
|
||||
Left = 120
|
||||
Top = 150
|
||||
Properties.DateButtons = [btnToday]
|
||||
Properties.ImmediatePost = True
|
||||
Properties.SaveTime = False
|
||||
Properties.ShowTime = False
|
||||
Style.LookAndFeel.Kind = lfStandard
|
||||
Style.LookAndFeel.NativeStyle = True
|
||||
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||||
StyleDisabled.LookAndFeel.NativeStyle = True
|
||||
StyleFocused.LookAndFeel.Kind = lfStandard
|
||||
StyleFocused.LookAndFeel.NativeStyle = True
|
||||
StyleHot.LookAndFeel.Kind = lfStandard
|
||||
StyleHot.LookAndFeel.NativeStyle = True
|
||||
TabOrder = 2
|
||||
Width = 167
|
||||
end
|
||||
object edtCodEntidad: TcxMaskEdit
|
||||
Left = 120
|
||||
Top = 93
|
||||
Properties.BeepOnError = True
|
||||
Properties.MaxLength = 4
|
||||
Style.LookAndFeel.Kind = lfStandard
|
||||
Style.LookAndFeel.NativeStyle = True
|
||||
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||||
StyleDisabled.LookAndFeel.NativeStyle = True
|
||||
StyleFocused.LookAndFeel.Kind = lfStandard
|
||||
StyleFocused.LookAndFeel.NativeStyle = True
|
||||
StyleHot.LookAndFeel.Kind = lfStandard
|
||||
StyleHot.LookAndFeel.NativeStyle = True
|
||||
TabOrder = 0
|
||||
Text = ' '
|
||||
Width = 73
|
||||
end
|
||||
object edtCodAgencia: TcxMaskEdit
|
||||
Left = 120
|
||||
Top = 120
|
||||
Properties.BeepOnError = True
|
||||
Properties.MaxLength = 4
|
||||
Style.LookAndFeel.Kind = lfStandard
|
||||
Style.LookAndFeel.NativeStyle = True
|
||||
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||||
StyleDisabled.LookAndFeel.NativeStyle = True
|
||||
StyleFocused.LookAndFeel.Kind = lfStandard
|
||||
StyleFocused.LookAndFeel.NativeStyle = True
|
||||
StyleHot.LookAndFeel.Kind = lfStandard
|
||||
StyleHot.LookAndFeel.NativeStyle = True
|
||||
TabOrder = 1
|
||||
Text = ' '
|
||||
Width = 73
|
||||
end
|
||||
object CancelBtn: TButton
|
||||
Left = 301
|
||||
Top = 277
|
||||
Width = 75
|
||||
Height = 25
|
||||
Anchors = [akLeft, akRight, akBottom]
|
||||
Cancel = True
|
||||
Caption = '&Cancelar'
|
||||
ModalResult = 2
|
||||
TabOrder = 4
|
||||
OnClick = CancelBtnClick
|
||||
ExplicitTop = 265
|
||||
end
|
||||
object OKBtn: TButton
|
||||
Left = 202
|
||||
Top = 277
|
||||
Width = 85
|
||||
Height = 25
|
||||
Action = actVolcar
|
||||
Anchors = [akLeft, akRight, akBottom]
|
||||
TabOrder = 3
|
||||
ExplicitTop = 265
|
||||
end
|
||||
object JvFilenameEdit1: TJvFilenameEdit
|
||||
Left = 24
|
||||
Top = 227
|
||||
Width = 349
|
||||
Height = 21
|
||||
Flat = False
|
||||
ParentCtl3D = False
|
||||
Filter = 'Ficheros de norma 19 (*.C19)|*.C19'
|
||||
DialogOptions = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist]
|
||||
DialogTitle = 'Volcar a disco la remesa'
|
||||
TabOrder = 5
|
||||
inherited ActionListDialog: TActionList
|
||||
Top = 64
|
||||
inherited actAceptar: TAction
|
||||
Caption = '&Volcar a disco'
|
||||
OnExecute = actAceptarExecute
|
||||
OnUpdate = actAceptarUpdate
|
||||
end
|
||||
end
|
||||
object JvFormStorage: TJvFormStorage
|
||||
AppStorage = JvAppRegistryStorage
|
||||
@ -251,13 +231,4 @@ object fEditorExportacionNorma19: TfEditorExportacionNorma19
|
||||
Left = 112
|
||||
Top = 64
|
||||
end
|
||||
object ActionList1: TActionList
|
||||
Left = 272
|
||||
Top = 72
|
||||
object actVolcar: TAction
|
||||
Caption = 'Volcar a disco'
|
||||
OnExecute = actVolcarExecute
|
||||
OnUpdate = actVolcarUpdate
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
@ -5,15 +5,13 @@ interface
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, ExtCtrls, StdCtrls, pngimage, cxControls, cxContainer, cxEdit,
|
||||
cxTextEdit, cxMaskEdit, cxDropDownEdit, cxCalendar,
|
||||
uIEditorExportacionNorma19, JvExControls, JvComponent, JvgWizardHeader,
|
||||
cxTextEdit, cxMaskEdit, cxDropDownEdit, cxCalendar, uDialogBase,
|
||||
uIEditorExportacionNorma19, JvExControls, JvComponent,
|
||||
JvAppStorage, JvAppRegistryStorage, JvComponentBase, JvFormPlacement,
|
||||
JvDialogs, Mask, JvExMask, JvToolEdit, ActnList;
|
||||
|
||||
type
|
||||
TfEditorExportacionNorma19 = class(TForm, IEditorExportacionNorma19)
|
||||
OKBtn: TButton;
|
||||
CancelBtn: TButton;
|
||||
TfEditorExportacionNorma19 = class(TfDialogBase, IEditorExportacionNorma19)
|
||||
Image1: TImage;
|
||||
edtFechaCargo: TcxDateEdit;
|
||||
Label2: TLabel;
|
||||
@ -21,22 +19,18 @@ type
|
||||
Label4: TLabel;
|
||||
edtCodEntidad: TcxMaskEdit;
|
||||
edtCodAgencia: TcxMaskEdit;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
Bevel1: TBevel;
|
||||
JvFormStorage: TJvFormStorage;
|
||||
JvAppRegistryStorage: TJvAppRegistryStorage;
|
||||
Label1: TLabel;
|
||||
Bevel2: TBevel;
|
||||
Bevel12: TBevel;
|
||||
JvFilenameEdit1: TJvFilenameEdit;
|
||||
ActionList1: TActionList;
|
||||
actVolcar: TAction;
|
||||
Label5: TLabel;
|
||||
Label6: TLabel;
|
||||
procedure OKBtnClick(Sender: TObject);
|
||||
procedure FormCreate(Sender: TObject);
|
||||
procedure CancelBtnClick(Sender: TObject);
|
||||
procedure actVolcarUpdate(Sender: TObject);
|
||||
procedure actVolcarExecute(Sender: TObject);
|
||||
procedure actAceptarExecute(Sender: TObject);
|
||||
procedure actAceptarUpdate(Sender: TObject);
|
||||
private
|
||||
FFichero : String;
|
||||
protected
|
||||
@ -68,14 +62,16 @@ uses
|
||||
|
||||
{ TfEditorExportacionNorma19 }
|
||||
|
||||
procedure TfEditorExportacionNorma19.actVolcarExecute(Sender: TObject);
|
||||
procedure TfEditorExportacionNorma19.actAceptarExecute(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
FFichero := JvFilenameEdit1.FileName;
|
||||
ModalResult := mrOk;
|
||||
end;
|
||||
|
||||
procedure TfEditorExportacionNorma19.actVolcarUpdate(Sender: TObject);
|
||||
procedure TfEditorExportacionNorma19.actAceptarUpdate(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
(Sender as TAction).Enabled :=
|
||||
(Length(edtCodEntidad.Text) = 4) and
|
||||
(Length(edtCodAgencia.Text) = 4) and
|
||||
@ -125,7 +121,6 @@ end;
|
||||
|
||||
procedure TfEditorExportacionNorma19.OKBtnClick(Sender: TObject);
|
||||
var
|
||||
ASaveDialog : TSaveDialog; // Save dialog variable
|
||||
AArchivo : string;
|
||||
ARuta : String;
|
||||
begin
|
||||
|
||||
@ -1,8 +1,6 @@
|
||||
object srvComisiones: TsrvComisiones
|
||||
OldCreateOrder = True
|
||||
OnCreate = DARemoteServiceCreate
|
||||
RequiresSession = True
|
||||
SessionManager = dmServer.SessionManager
|
||||
ConnectionName = 'IBX'
|
||||
ServiceSchema = schComisiones
|
||||
ServiceDataStreamer = Bin2DataStreamer
|
||||
|
||||
@ -52,7 +52,7 @@ end;
|
||||
{ srvComisiones }
|
||||
procedure TsrvComisiones.DARemoteServiceCreate(Sender: TObject);
|
||||
begin
|
||||
SessionManager := dmServer.SessionManager;
|
||||
//SessionManager := dmServer.SessionManager;
|
||||
bpComisiones.BusinessRulesID := BIZ_SERVER_COMISIONES;
|
||||
end;
|
||||
|
||||
|
||||
@ -25,56 +25,13 @@ package Comisiones_view;
|
||||
{$IMPLICITBUILD OFF}
|
||||
|
||||
requires
|
||||
Comisiones_controller,
|
||||
Comisiones_model,
|
||||
Base,
|
||||
GUIBase,
|
||||
ApplicationBase,
|
||||
Contactos_model,
|
||||
Contactos_controller,
|
||||
teeUI,
|
||||
tee,
|
||||
fsTee11,
|
||||
frxTee11,
|
||||
vcl,
|
||||
rtl,
|
||||
dbrtl,
|
||||
vcldb,
|
||||
DataAbstract_Core_D11,
|
||||
dsnap,
|
||||
adortl,
|
||||
RemObjects_Core_D11,
|
||||
PngComponentsD10,
|
||||
PNG_D10,
|
||||
vclactnband,
|
||||
vclx,
|
||||
GUISDK_D11,
|
||||
xmlrtl,
|
||||
cfpack_d11,
|
||||
designide,
|
||||
ccpackD11,
|
||||
cxLibraryD11,
|
||||
dxThemeD11,
|
||||
dxGDIPlusD11,
|
||||
cxEditorsD11,
|
||||
cxDataD11,
|
||||
vcljpg,
|
||||
cxGridD11,
|
||||
cxPageControlD11,
|
||||
cxExtEditorsD11,
|
||||
cxExportD11,
|
||||
dxLayoutControlD11,
|
||||
dxComnD11,
|
||||
tb2k_d10,
|
||||
tbx_d10,
|
||||
JvCoreD11R,
|
||||
Jcl,
|
||||
JclVcl,
|
||||
JvSystemD11R,
|
||||
JvStdCtrlsD11R,
|
||||
JvPageCompsD11R,
|
||||
frx11,
|
||||
fs11,
|
||||
frxe11;
|
||||
Comisiones_controller,
|
||||
Comisiones_model;
|
||||
|
||||
contains
|
||||
uComisionesViewRegister in 'uComisionesViewRegister.pas',
|
||||
|
||||
@ -49,10 +49,12 @@
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\adortl.dcp" />
|
||||
<DCCReference Include="..\ApplicationBase.dcp" />
|
||||
<DCCReference Include="..\Base.dcp" />
|
||||
<DCCReference Include="..\ccpackD11.dcp" />
|
||||
<DCCReference Include="..\cfpack_d11.dcp" />
|
||||
<DCCReference Include="..\Comisiones_controller.dcp" />
|
||||
<DCCReference Include="..\Comisiones_model.dcp" />
|
||||
<DCCReference Include="..\Comisiones_modelteeUI.dcp" />
|
||||
<DCCReference Include="..\Contactos_controller.dcp" />
|
||||
<DCCReference Include="..\Contactos_model.dcp" />
|
||||
<DCCReference Include="..\cxDataD11.dcp" />
|
||||
@ -90,7 +92,6 @@
|
||||
<DCCReference Include="..\tb2k_d10.dcp" />
|
||||
<DCCReference Include="..\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\tee.dcp" />
|
||||
<DCCReference Include="..\teeUI.dcp" />
|
||||
<DCCReference Include="..\vcl.dcp" />
|
||||
<DCCReference Include="..\vclactnband.dcp" />
|
||||
<DCCReference Include="..\vcldb.dcp" />
|
||||
@ -99,32 +100,32 @@
|
||||
<DCCReference Include="..\xmlrtl.dcp" />
|
||||
<DCCReference Include="uComisionesViewRegister.pas" />
|
||||
<DCCReference Include="uEditorComision.pas">
|
||||
<Form>fEditorComision</Form>
|
||||
<DesignClass>TfEditorComision</DesignClass>
|
||||
<Form>fEditorComision</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorComisiones.pas">
|
||||
<Form>fEditorComisiones</Form>
|
||||
<DesignClass>TfEditorComisiones</DesignClass>
|
||||
<Form>fEditorComisiones</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorComisionesReport.pas">
|
||||
<Form>fEditorComisionesPreview</Form>
|
||||
<DesignClass>TfEditorComision</DesignClass>
|
||||
<Form>fEditorComisionesPreview</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uViewComision.pas">
|
||||
<Form>frViewComision</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
<Form>frViewComision</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uViewComisiones.pas">
|
||||
<Form>frViewComisiones</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
<Form>frViewComisiones</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uViewFacturasComision.pas">
|
||||
<Form>frViewFacturasComision</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
<Form>frViewFacturasComision</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uViewVendedoresComision.pas">
|
||||
<Form>frViewVendedoresComision</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
<Form>frViewVendedoresComision</Form>
|
||||
</DCCReference>
|
||||
</ItemGroup>
|
||||
</Project>
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@ -54,7 +54,7 @@
|
||||
<DCCReference Include="Contabilidad_model.dcp" />
|
||||
<DCCReference Include="Contabilidad_view.dcp" />
|
||||
<DCCReference Include="GUIBase.dcp" />
|
||||
<DCCReference Include="PluginSDK_D10R.dcp" />
|
||||
<DCCReference Include="PluginSDK_D11R.dcp" />
|
||||
<DCCReference Include="PngComponentsD10.dcp" />
|
||||
<DCCReference Include="PNG_D10.dcp" />
|
||||
<DCCReference Include="rtl.dcp" />
|
||||
|
||||
@ -243,7 +243,7 @@ end;
|
||||
|
||||
procedure TsrvContabilidad.DARemoteServiceCreate(Sender: TObject);
|
||||
begin
|
||||
SessionManager := dmServer.SessionManager;
|
||||
//SessionManager := dmServer.SessionManager;
|
||||
bpAsientos.BusinessRulesID := BIZ_SERVER_ASIENTOS;
|
||||
end;
|
||||
|
||||
|
||||
@ -26,56 +26,11 @@ package Contabilidad_view;
|
||||
{$DEFINE DEBUG}
|
||||
|
||||
requires
|
||||
Base,
|
||||
GUIBase,
|
||||
ApplicationBase,
|
||||
Contabilidad_model,
|
||||
Contabilidad_controller,
|
||||
vcl,
|
||||
rtl,
|
||||
dbrtl,
|
||||
DataAbstract_Core_D11,
|
||||
vcldb,
|
||||
dsnap,
|
||||
adortl,
|
||||
RemObjects_Core_D11,
|
||||
cxLibraryD11,
|
||||
dxThemeD11,
|
||||
dxGDIPlusD11,
|
||||
cxEditorsD11,
|
||||
cxDataD11,
|
||||
vcljpg,
|
||||
dxLayoutControlD11,
|
||||
dxComnD11,
|
||||
PngComponentsD10,
|
||||
PNG_D10,
|
||||
vclactnband,
|
||||
vclx,
|
||||
tb2k_d10,
|
||||
tbx_d10,
|
||||
JvCoreD11R,
|
||||
Jcl,
|
||||
JclVcl,
|
||||
JvAppFrmD11R,
|
||||
JvCtrlsD11R,
|
||||
JvSystemD11R,
|
||||
JvStdCtrlsD11R,
|
||||
cxGridD11,
|
||||
cxPageControlD11,
|
||||
cxExtEditorsD11,
|
||||
cxExportD11,
|
||||
dxPSCoreD11,
|
||||
cxIntlPrintSys3D11,
|
||||
designide,
|
||||
xmlrtl,
|
||||
dxPScxCommonD11,
|
||||
dxPSLnksD11,
|
||||
vclshlctrls,
|
||||
dxPScxGrid6LnkD11,
|
||||
dclcxLibraryD11,
|
||||
JvPageCompsD11R,
|
||||
GUISDK_D11,
|
||||
cfpack_d11,
|
||||
ccpackD11;
|
||||
Contabilidad_controller;
|
||||
|
||||
contains
|
||||
uEditorBalance in 'uEditorBalance.pas' {fEditorBalance: TfEditorBalances},
|
||||
|
||||
@ -48,49 +48,11 @@
|
||||
<DelphiCompile Include="Contabilidad_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="adortl.dcp" />
|
||||
<DCCReference Include="ApplicationBase.dcp" />
|
||||
<DCCReference Include="ccpackD11.dcp" />
|
||||
<DCCReference Include="cfpack_d11.dcp" />
|
||||
<DCCReference Include="Contabilidad_controller.dcp" />
|
||||
<DCCReference Include="Contabilidad_model.dcp" />
|
||||
<DCCReference Include="cxDataD11.dcp" />
|
||||
<DCCReference Include="cxEditorsD11.dcp" />
|
||||
<DCCReference Include="cxExportD11.dcp" />
|
||||
<DCCReference Include="cxExtEditorsD11.dcp" />
|
||||
<DCCReference Include="cxGridD11.dcp" />
|
||||
<DCCReference Include="cxIntlPrintSys3D11.dcp" />
|
||||
<DCCReference Include="cxLibraryD11.dcp" />
|
||||
<DCCReference Include="cxPageControlD11.dcp" />
|
||||
<DCCReference Include="DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="dbrtl.dcp" />
|
||||
<DCCReference Include="dclcxLibraryD11.dcp" />
|
||||
<DCCReference Include="designide.dcp" />
|
||||
<DCCReference Include="dsnap.dcp" />
|
||||
<DCCReference Include="dxComnD11.dcp" />
|
||||
<DCCReference Include="dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="dxPSCoreD11.dcp" />
|
||||
<DCCReference Include="dxPScxCommonD11.dcp" />
|
||||
<DCCReference Include="dxPScxGrid6LnkD11.dcp" />
|
||||
<DCCReference Include="dxPSLnksD11.dcp" />
|
||||
<DCCReference Include="dxThemeD11.dcp" />
|
||||
<DCCReference Include="GUIBase.dcp" />
|
||||
<DCCReference Include="GUISDK_D11.dcp" />
|
||||
<DCCReference Include="Jcl.dcp" />
|
||||
<DCCReference Include="JclVcl.dcp" />
|
||||
<DCCReference Include="JvAppFrmD11R.dcp" />
|
||||
<DCCReference Include="JvCoreD11R.dcp" />
|
||||
<DCCReference Include="JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="JvSystemD11R.dcp" />
|
||||
<DCCReference Include="PngComponentsD10.dcp" />
|
||||
<DCCReference Include="PNG_D10.dcp" />
|
||||
<DCCReference Include="RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="rtl.dcp" />
|
||||
<DCCReference Include="tb2k_d10.dcp" />
|
||||
<DCCReference Include="tbx_d10.dcp" />
|
||||
<DCCReference Include="..\ApplicationBase.dcp" />
|
||||
<DCCReference Include="..\Base.dcp" />
|
||||
<DCCReference Include="..\Contabilidad_controller.dcp" />
|
||||
<DCCReference Include="..\Contabilidad_model.dcp" />
|
||||
<DCCReference Include="..\GUIBase.dcp" />
|
||||
<DCCReference Include="uContabilidadViewRegister.pas">
|
||||
<Form>frViewEpigrafes</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
@ -161,7 +123,7 @@
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorExtractoMovimientos.pas">
|
||||
<Form>fEditorExtractoMovimientos</Form>
|
||||
<DesignClass>TfEditorEjercicios</DesignClass>
|
||||
<DesignClass>TfEditorExtractoMovimientos</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorSubCuenta.pas">
|
||||
<Form>fEditorSubCuenta</Form>
|
||||
@ -223,13 +185,6 @@
|
||||
<Form>frViewSubCuentas</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="vcl.dcp" />
|
||||
<DCCReference Include="vclactnband.dcp" />
|
||||
<DCCReference Include="vcldb.dcp" />
|
||||
<DCCReference Include="vcljpg.dcp" />
|
||||
<DCCReference Include="vclshlctrls.dcp" />
|
||||
<DCCReference Include="vclx.dcp" />
|
||||
<DCCReference Include="xmlrtl.dcp" />
|
||||
</ItemGroup>
|
||||
</Project>
|
||||
<!-- EurekaLog First Line
|
||||
|
||||
@ -2,7 +2,6 @@ inherited fEditorBalances: TfEditorBalances
|
||||
Left = 489
|
||||
Top = 325
|
||||
Caption = 'Lista de balances'
|
||||
ExplicitHeight = 471
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
@ -13,7 +12,7 @@ inherited fEditorBalances: TfEditorBalances
|
||||
000000180806000000E0773DF8000000017352474200AECE1CE9000000046741
|
||||
4D410000B18F0BFC6105000000206348524D00007A26000080840000FA000000
|
||||
80E8000075300000EA6000003A98000017709CBA513C00000009704859730000
|
||||
17110000171101CA26F33F000002C149444154484BB5954D48545114C76D17D4
|
||||
17100000171001186111DB000002C149444154484BB5954D48545114C76D17D4
|
||||
A25D9B5C460B3308AC4D41EE8C32B05412A9A6C51028A1696A144AB970FA945A
|
||||
98B52988C4928C0269B42F48481D92B4C4D486D1E77CBD99E7F8E6CB512747F9
|
||||
37E7D6DCE6CE3C782A79E1F0DE8337BFDF39E7CE3B7713808C0D5D5A822BCD6D
|
||||
@ -40,9 +39,6 @@ inherited fEditorBalances: TfEditorBalances
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
inherited tbxMain: TTBXToolbar
|
||||
ExplicitWidth = 474
|
||||
end
|
||||
inherited tbxFiltro: TTBXToolbar
|
||||
ExplicitWidth = 269
|
||||
inherited tbxEditFiltro: TTBXEditItem
|
||||
|
||||
@ -120,10 +120,7 @@ begin
|
||||
end;
|
||||
|
||||
procedure TfEditorBalances.DuplicarInterno;
|
||||
var
|
||||
ABalance : IBizBalance;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
ABalance := FController.Duplicar(Balances);
|
||||
|
||||
@ -124,27 +124,15 @@ inherited fEditorCuentas: TfEditorCuentas
|
||||
Width = 543
|
||||
ExplicitWidth = 543
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 273
|
||||
Width = 273
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Left = 337
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitLeft = 337
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
|
||||
@ -126,7 +126,6 @@ procedure TfEditorCuentas.DuplicarInterno;
|
||||
{var
|
||||
ACuenta : IBizCuenta;}
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
ACuenta := FController.Duplicar(Cuentas);
|
||||
|
||||
@ -66,9 +66,6 @@ inherited fEditorCuentasEspeciales: TfEditorCuentasEspeciales
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
inherited tbxMain: TTBXToolbar
|
||||
ExplicitWidth = 474
|
||||
end
|
||||
inherited tbxFiltro: TTBXToolbar
|
||||
ExplicitWidth = 269
|
||||
inherited tbxEditFiltro: TTBXEditItem
|
||||
|
||||
@ -123,7 +123,6 @@ procedure TfEditorCuentasEspeciales.DuplicarInterno;
|
||||
{var
|
||||
ACuentaEspecial : IBizCuentaEspecial;}
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
ACuentaEspecial := FController.Duplicar(CuentasEspeciales);
|
||||
|
||||
@ -110,24 +110,18 @@ inherited fEditorDiario: TfEditorDiario
|
||||
Width = 543
|
||||
ExplicitWidth = 543
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 273
|
||||
Width = 273
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Left = 337
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitLeft = 337
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
|
||||
@ -148,7 +148,6 @@ procedure TfEditorDiario.DuplicarInterno;
|
||||
{var
|
||||
AEpigrafe : IBizAsiento;}
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
AEpigrafe := FController.Duplicar(Asientos);
|
||||
|
||||
@ -1,45 +1,14 @@
|
||||
inherited fEditorElegirBalances: TfEditorElegirBalances
|
||||
Caption = 'Seleccionar pedido de cliente'
|
||||
ClientWidth = 656
|
||||
ExplicitWidth = 664
|
||||
ExplicitHeight = 240
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object JvgWizardHeader1: TJvgWizardHeader [0]
|
||||
Left = 0
|
||||
Top = 27
|
||||
Width = 656
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Seleccione el pedido de proveedor')
|
||||
Comments.Strings = (
|
||||
' ')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitTop = 16
|
||||
end
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Top = 64
|
||||
Width = 656
|
||||
Caption = 'Lista de pedidos de proveedor'
|
||||
Visible = False
|
||||
ExplicitLeft = -8
|
||||
ExplicitTop = -6
|
||||
ExplicitWidth = 656
|
||||
inherited Image1: TImage
|
||||
Left = 629
|
||||
@ -47,13 +16,15 @@ inherited fEditorElegirBalances: TfEditorElegirBalances
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Top = 87
|
||||
Top = 91
|
||||
Width = 656
|
||||
ExplicitTop = 87
|
||||
Height = 49
|
||||
ExplicitTop = 91
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 49
|
||||
inherited tbxMain: TTBXToolbar
|
||||
Align = alRight
|
||||
ExplicitWidth = 126
|
||||
ExplicitWidth = 269
|
||||
inherited TBXItem2: TTBXItem
|
||||
Visible = False
|
||||
end
|
||||
@ -71,11 +42,11 @@ inherited fEditorElegirBalances: TfEditorElegirBalances
|
||||
end
|
||||
end
|
||||
inherited tbxFiltro: TTBXToolbar
|
||||
Left = 126
|
||||
Left = 269
|
||||
Top = 23
|
||||
DockPos = 115
|
||||
DockRow = 1
|
||||
ExplicitLeft = 126
|
||||
ExplicitLeft = 269
|
||||
ExplicitTop = 23
|
||||
inherited TBXItem34: TTBXItem
|
||||
Action = actQuitarFiltro2
|
||||
@ -84,13 +55,21 @@ inherited fEditorElegirBalances: TfEditorElegirBalances
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Left = 538
|
||||
Top = 23
|
||||
DockPos = 536
|
||||
DockRow = 1
|
||||
ExplicitLeft = 538
|
||||
ExplicitTop = 23
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Width = 656
|
||||
Visible = False
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [3]
|
||||
Left = 0
|
||||
Top = 376
|
||||
Width = 656
|
||||
@ -128,18 +107,18 @@ inherited fEditorElegirBalances: TfEditorElegirBalances
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited frViewBalances1: TfrViewBalances [5]
|
||||
Top = 162
|
||||
inherited frViewBalances1: TfrViewBalances [4]
|
||||
Top = 140
|
||||
Width = 656
|
||||
Height = 214
|
||||
ExplicitTop = 162
|
||||
Height = 236
|
||||
ExplicitTop = 140
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 214
|
||||
ExplicitHeight = 236
|
||||
inherited cxGrid: TcxGrid
|
||||
Width = 656
|
||||
Height = 86
|
||||
Height = 108
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 86
|
||||
ExplicitHeight = 108
|
||||
inherited cxGridView: TcxGridDBTableView
|
||||
DataController.Summary.DefaultGroupSummaryItems = <
|
||||
item
|
||||
@ -165,9 +144,17 @@ inherited fEditorElegirBalances: TfEditorElegirBalances
|
||||
inherited dxLayoutControl1: TdxLayoutControl
|
||||
Width = 656
|
||||
ExplicitWidth = 656
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
ExplicitWidth = 273
|
||||
Width = 273
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Left = 290
|
||||
ExplicitLeft = 290
|
||||
Left = 225
|
||||
ExplicitLeft = 225
|
||||
ExplicitWidth = 421
|
||||
Width = 421
|
||||
end
|
||||
@ -183,8 +170,8 @@ inherited fEditorElegirBalances: TfEditorElegirBalances
|
||||
end
|
||||
end
|
||||
inherited pnlAgrupaciones: TTBXDockablePanel
|
||||
Top = 188
|
||||
ExplicitTop = 188
|
||||
Top = 210
|
||||
ExplicitTop = 210
|
||||
ExplicitWidth = 656
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 656
|
||||
@ -209,6 +196,55 @@ inherited fEditorElegirBalances: TfEditorElegirBalances
|
||||
end>
|
||||
end
|
||||
end
|
||||
object pnlHeader: TPanel [5]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 656
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 5
|
||||
ExplicitTop = -37
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 606
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Seleccione el balance'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 120
|
||||
end
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 581
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
ExplicitWidth = 3
|
||||
ExplicitHeight = 13
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList [8]
|
||||
Left = 112
|
||||
Top = 192
|
||||
@ -216,12 +252,16 @@ inherited fEditorElegirBalances: TfEditorElegirBalances
|
||||
Visible = False
|
||||
end
|
||||
end
|
||||
inherited dsDataTable: TDADataSource
|
||||
inherited JvFormStorage: TJvFormStorage [9]
|
||||
end
|
||||
inherited JvAppRegistryStorage: TJvAppRegistryStorage [10]
|
||||
end
|
||||
inherited StatusBarImages: TPngImageList [11]
|
||||
end
|
||||
inherited dsDataTable: TDADataSource [12]
|
||||
Left = 8
|
||||
Top = 192
|
||||
end
|
||||
inherited JvFormStorage: TJvFormStorage [12]
|
||||
end
|
||||
inherited GridPopupMenu: TPopupMenu
|
||||
Left = 80
|
||||
Top = 192
|
||||
|
||||
@ -9,19 +9,21 @@ uses
|
||||
ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid,
|
||||
ComCtrls, TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar,
|
||||
pngimage, ExtCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls,
|
||||
JvNavigationPane, uViewBarraSeleccion, StdCtrls,
|
||||
uBizBalances, uIEditorElegirBalances,
|
||||
JvExComCtrls, JvStatusBar, uEditorBalances, uViewBalances,
|
||||
JSDialog, uDAInterfaces;
|
||||
JSDialog, uDAInterfaces, dxGDIPlusClasses;
|
||||
|
||||
type
|
||||
TfEditorElegirBalances = class(TfEditorBalances, IEditorElegirBalances)
|
||||
frViewBarraSeleccion1: TfrViewBarraSeleccion;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
EditorSeleccionActionList: TActionList;
|
||||
actBuscar2: TAction;
|
||||
actQuitarFiltro2: TAction;
|
||||
actAnchoAuto2: TAction;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject);
|
||||
@ -99,7 +101,7 @@ end;
|
||||
|
||||
function TfEditorElegirBalances.GetMensaje: String;
|
||||
begin
|
||||
Result := JvgWizardHeader1.Comments.Text;
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
function TfEditorElegirBalances.GetMultiSelect: Boolean;
|
||||
@ -109,7 +111,7 @@ end;
|
||||
|
||||
procedure TfEditorElegirBalances.SetMensaje(const AValue: String);
|
||||
begin
|
||||
JvgWizardHeader1.Comments.Text := AValue;
|
||||
lblComments.Caption := AValue;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirBalances.SetMultiSelect(AValue: Boolean);
|
||||
|
||||
@ -5,41 +5,10 @@ inherited fEditorElegirCuentas: TfEditorElegirCuentas
|
||||
ExplicitHeight = 478
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object JvgWizardHeader1: TJvgWizardHeader [0]
|
||||
Left = 0
|
||||
Top = 27
|
||||
Width = 656
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Seleccione una cuenta')
|
||||
Comments.Strings = (
|
||||
' ')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitTop = 16
|
||||
end
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Top = 64
|
||||
Width = 656
|
||||
Visible = False
|
||||
ExplicitTop = -6
|
||||
ExplicitWidth = 656
|
||||
inherited Image1: TImage
|
||||
Left = 629
|
||||
@ -47,13 +16,12 @@ inherited fEditorElegirCuentas: TfEditorElegirCuentas
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Top = 87
|
||||
Top = 91
|
||||
Width = 656
|
||||
ExplicitTop = 87
|
||||
ExplicitWidth = 656
|
||||
inherited tbxMain: TTBXToolbar
|
||||
Align = alRight
|
||||
ExplicitWidth = 126
|
||||
ExplicitWidth = 269
|
||||
inherited TBXItem2: TTBXItem
|
||||
Visible = False
|
||||
end
|
||||
@ -71,11 +39,11 @@ inherited fEditorElegirCuentas: TfEditorElegirCuentas
|
||||
end
|
||||
end
|
||||
inherited tbxFiltro: TTBXToolbar
|
||||
Left = 126
|
||||
Left = 269
|
||||
Top = 23
|
||||
DockPos = 115
|
||||
DockRow = 1
|
||||
ExplicitLeft = 126
|
||||
ExplicitLeft = 269
|
||||
ExplicitTop = 23
|
||||
inherited TBXItem34: TTBXItem
|
||||
Action = actQuitarFiltro2
|
||||
@ -90,7 +58,7 @@ inherited fEditorElegirCuentas: TfEditorElegirCuentas
|
||||
Visible = False
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [3]
|
||||
Left = 0
|
||||
Top = 376
|
||||
Width = 656
|
||||
@ -128,18 +96,17 @@ inherited fEditorElegirCuentas: TfEditorElegirCuentas
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited frViewCuentas1: TfrViewCuentas [5]
|
||||
Top = 162
|
||||
inherited frViewCuentas1: TfrViewCuentas [4]
|
||||
Top = 166
|
||||
Width = 656
|
||||
Height = 214
|
||||
ExplicitTop = 162
|
||||
Height = 210
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 214
|
||||
ExplicitHeight = 274
|
||||
inherited cxGrid: TcxGrid
|
||||
Width = 656
|
||||
Height = 86
|
||||
Height = 82
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 86
|
||||
ExplicitHeight = 146
|
||||
inherited cxGridView: TcxGridDBTableView
|
||||
DataController.Summary.DefaultGroupSummaryItems = <
|
||||
item
|
||||
@ -191,8 +158,8 @@ inherited fEditorElegirCuentas: TfEditorElegirCuentas
|
||||
end
|
||||
end
|
||||
inherited pnlAgrupaciones: TTBXDockablePanel
|
||||
Top = 188
|
||||
ExplicitTop = 188
|
||||
Top = 184
|
||||
ExplicitTop = 248
|
||||
ExplicitWidth = 656
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 656
|
||||
@ -217,19 +184,64 @@ inherited fEditorElegirCuentas: TfEditorElegirCuentas
|
||||
end>
|
||||
end
|
||||
end
|
||||
object pnlHeader: TPanel [5]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 656
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 5
|
||||
ExplicitLeft = 8
|
||||
ExplicitTop = -21
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 606
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Seleccione una cuenta'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 126
|
||||
end
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 581
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
ExplicitWidth = 3
|
||||
ExplicitHeight = 13
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList [8]
|
||||
Left = 112
|
||||
Top = 192
|
||||
inherited actDuplicar: TAction
|
||||
Visible = False
|
||||
end
|
||||
end
|
||||
inherited dsDataTable: TDADataSource
|
||||
Left = 8
|
||||
Top = 192
|
||||
end
|
||||
inherited JvFormStorage: TJvFormStorage [12]
|
||||
end
|
||||
inherited GridPopupMenu: TPopupMenu
|
||||
Left = 80
|
||||
Top = 192
|
||||
|
||||
@ -9,7 +9,7 @@ uses
|
||||
ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid,
|
||||
ComCtrls, TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar,
|
||||
pngimage, ExtCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls,
|
||||
JvNavigationPane, uViewBarraSeleccion, StdCtrls,
|
||||
uBizCuentas, uIEditorElegirCuentas,
|
||||
JvExComCtrls, JvStatusBar, uEditorCuentas, uViewCuentas,
|
||||
JSDialog, uDAInterfaces, dxGDIPlusClasses;
|
||||
@ -17,11 +17,13 @@ uses
|
||||
type
|
||||
TfEditorElegirCuentas = class(TfEditorCuentas, IEditorElegirCuentas)
|
||||
frViewBarraSeleccion1: TfrViewBarraSeleccion;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
EditorSeleccionActionList: TActionList;
|
||||
actBuscar2: TAction;
|
||||
actQuitarFiltro2: TAction;
|
||||
actAnchoAuto2: TAction;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject);
|
||||
@ -99,7 +101,7 @@ end;
|
||||
|
||||
function TfEditorElegirCuentas.GetMensaje: String;
|
||||
begin
|
||||
Result := JvgWizardHeader1.Comments.Text;
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
function TfEditorElegirCuentas.GetMultiSelect: Boolean;
|
||||
@ -109,7 +111,7 @@ end;
|
||||
|
||||
procedure TfEditorElegirCuentas.SetMensaje(const AValue: String);
|
||||
begin
|
||||
JvgWizardHeader1.Comments.Text := AValue;
|
||||
lblComments.Caption := AValue;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirCuentas.SetMultiSelect(AValue: Boolean);
|
||||
|
||||
@ -1,43 +1,12 @@
|
||||
inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales
|
||||
Caption = 'Seleccionar pedido de cliente'
|
||||
ClientWidth = 656
|
||||
ExplicitWidth = 664
|
||||
ExplicitHeight = 478
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object JvgWizardHeader1: TJvgWizardHeader [0]
|
||||
Left = 0
|
||||
Top = 27
|
||||
Width = 656
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Seleccione el pedido de proveedor')
|
||||
Comments.Strings = (
|
||||
' ')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitTop = 16
|
||||
end
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Top = 64
|
||||
Width = 656
|
||||
Caption = 'Lista de pedidos de proveedor'
|
||||
Visible = False
|
||||
ExplicitWidth = 656
|
||||
inherited Image1: TImage
|
||||
@ -46,13 +15,12 @@ inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Top = 87
|
||||
Top = 91
|
||||
Width = 656
|
||||
ExplicitTop = 87
|
||||
ExplicitWidth = 656
|
||||
inherited tbxMain: TTBXToolbar
|
||||
Align = alRight
|
||||
ExplicitWidth = 126
|
||||
ExplicitWidth = 269
|
||||
inherited TBXItem2: TTBXItem
|
||||
Visible = False
|
||||
end
|
||||
@ -70,11 +38,11 @@ inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales
|
||||
end
|
||||
end
|
||||
inherited tbxFiltro: TTBXToolbar
|
||||
Left = 126
|
||||
Left = 269
|
||||
Top = 23
|
||||
DockPos = 115
|
||||
DockRow = 1
|
||||
ExplicitLeft = 126
|
||||
ExplicitLeft = 269
|
||||
ExplicitTop = 23
|
||||
inherited TBXItem34: TTBXItem
|
||||
Action = actQuitarFiltro2
|
||||
@ -89,7 +57,7 @@ inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales
|
||||
Visible = False
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [3]
|
||||
Left = 0
|
||||
Top = 376
|
||||
Width = 656
|
||||
@ -127,18 +95,17 @@ inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited frViewCuentasEspeciales1: TfrViewCuentasEspeciales [5]
|
||||
Top = 162
|
||||
inherited frViewCuentasEspeciales1: TfrViewCuentasEspeciales [4]
|
||||
Top = 166
|
||||
Width = 656
|
||||
Height = 214
|
||||
ExplicitTop = 162
|
||||
Height = 210
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 214
|
||||
ExplicitHeight = 274
|
||||
inherited cxGrid: TcxGrid
|
||||
Width = 656
|
||||
Height = 86
|
||||
Height = 82
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 86
|
||||
ExplicitHeight = 146
|
||||
inherited cxGridView: TcxGridDBTableView
|
||||
DataController.Summary.DefaultGroupSummaryItems = <
|
||||
item
|
||||
@ -164,9 +131,17 @@ inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales
|
||||
inherited dxLayoutControl1: TdxLayoutControl
|
||||
Width = 656
|
||||
ExplicitWidth = 656
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
ExplicitWidth = 273
|
||||
Width = 273
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Left = 294
|
||||
ExplicitLeft = 294
|
||||
Left = 225
|
||||
ExplicitLeft = 225
|
||||
ExplicitWidth = 421
|
||||
Width = 421
|
||||
end
|
||||
@ -182,8 +157,8 @@ inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales
|
||||
end
|
||||
end
|
||||
inherited pnlAgrupaciones: TTBXDockablePanel
|
||||
Top = 188
|
||||
ExplicitTop = 188
|
||||
Top = 184
|
||||
ExplicitTop = 248
|
||||
ExplicitWidth = 656
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 656
|
||||
@ -208,6 +183,56 @@ inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales
|
||||
end>
|
||||
end
|
||||
end
|
||||
object pnlHeader: TPanel [5]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 656
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 5
|
||||
ExplicitLeft = -8
|
||||
ExplicitTop = -21
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 606
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Seleccione una cuenta'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 126
|
||||
end
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 581
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
ExplicitWidth = 3
|
||||
ExplicitHeight = 13
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList [8]
|
||||
Left = 112
|
||||
Top = 192
|
||||
@ -215,12 +240,16 @@ inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales
|
||||
Visible = False
|
||||
end
|
||||
end
|
||||
inherited dsDataTable: TDADataSource
|
||||
inherited JvFormStorage: TJvFormStorage [9]
|
||||
end
|
||||
inherited JvAppRegistryStorage: TJvAppRegistryStorage [10]
|
||||
end
|
||||
inherited StatusBarImages: TPngImageList [11]
|
||||
end
|
||||
inherited dsDataTable: TDADataSource [12]
|
||||
Left = 8
|
||||
Top = 192
|
||||
end
|
||||
inherited JvFormStorage: TJvFormStorage [12]
|
||||
end
|
||||
inherited GridPopupMenu: TPopupMenu
|
||||
Left = 80
|
||||
Top = 192
|
||||
|
||||
@ -9,19 +9,21 @@ uses
|
||||
ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid,
|
||||
ComCtrls, TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar,
|
||||
pngimage, ExtCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls,
|
||||
JvNavigationPane, uViewBarraSeleccion, StdCtrls,
|
||||
uBizCuentasEspeciales, uIEditorElegirCuentasEspeciales,
|
||||
JvExComCtrls, JvStatusBar, uEditorCuentasEspeciales, uViewCuentasEspeciales,
|
||||
JSDialog, uDAInterfaces;
|
||||
JSDialog, uDAInterfaces, dxGDIPlusClasses;
|
||||
|
||||
type
|
||||
TfEditorElegirCuentasEspeciales = class(TfEditorCuentasEspeciales, IEditorElegirCuentasEspeciales)
|
||||
frViewBarraSeleccion1: TfrViewBarraSeleccion;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
EditorSeleccionActionList: TActionList;
|
||||
actBuscar2: TAction;
|
||||
actQuitarFiltro2: TAction;
|
||||
actAnchoAuto2: TAction;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject);
|
||||
@ -99,7 +101,7 @@ end;
|
||||
|
||||
function TfEditorElegirCuentasEspeciales.GetMensaje: String;
|
||||
begin
|
||||
Result := JvgWizardHeader1.Comments.Text;
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
function TfEditorElegirCuentasEspeciales.GetMultiSelect: Boolean;
|
||||
@ -109,7 +111,7 @@ end;
|
||||
|
||||
procedure TfEditorElegirCuentasEspeciales.SetMensaje(const AValue: String);
|
||||
begin
|
||||
JvgWizardHeader1.Comments.Text := AValue;
|
||||
lblComments.Caption := AValue;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirCuentasEspeciales.SetMultiSelect(AValue: Boolean);
|
||||
|
||||
@ -1,44 +1,13 @@
|
||||
inherited fEditorElegirEpigrafes: TfEditorElegirEpigrafes
|
||||
Caption = 'Seleccionar pedido de cliente'
|
||||
ClientWidth = 656
|
||||
ExplicitWidth = 664
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object JvgWizardHeader1: TJvgWizardHeader [0]
|
||||
Left = 0
|
||||
Top = 27
|
||||
Width = 656
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Seleccione el epigrafe')
|
||||
Comments.Strings = (
|
||||
' ')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitTop = 16
|
||||
end
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Top = 64
|
||||
Width = 656
|
||||
Caption = 'Lista de pedidos de proveedor'
|
||||
Visible = False
|
||||
ExplicitTop = 64
|
||||
ExplicitWidth = 656
|
||||
inherited Image1: TImage
|
||||
Left = 629
|
||||
@ -46,13 +15,13 @@ inherited fEditorElegirEpigrafes: TfEditorElegirEpigrafes
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Top = 87
|
||||
Top = 91
|
||||
Width = 656
|
||||
ExplicitTop = 87
|
||||
ExplicitTop = 91
|
||||
ExplicitWidth = 656
|
||||
inherited tbxMain: TTBXToolbar
|
||||
Align = alRight
|
||||
ExplicitWidth = 126
|
||||
ExplicitWidth = 269
|
||||
inherited TBXItem2: TTBXItem
|
||||
Visible = False
|
||||
end
|
||||
@ -70,11 +39,11 @@ inherited fEditorElegirEpigrafes: TfEditorElegirEpigrafes
|
||||
end
|
||||
end
|
||||
inherited tbxFiltro: TTBXToolbar
|
||||
Left = 126
|
||||
Left = 269
|
||||
Top = 23
|
||||
DockPos = 115
|
||||
DockRow = 1
|
||||
ExplicitLeft = 126
|
||||
ExplicitLeft = 269
|
||||
ExplicitTop = 23
|
||||
inherited TBXItem34: TTBXItem
|
||||
Action = actQuitarFiltro2
|
||||
@ -89,7 +58,7 @@ inherited fEditorElegirEpigrafes: TfEditorElegirEpigrafes
|
||||
Visible = False
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [3]
|
||||
Left = 0
|
||||
Top = 376
|
||||
Width = 656
|
||||
@ -127,18 +96,18 @@ inherited fEditorElegirEpigrafes: TfEditorElegirEpigrafes
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited frViewEpigrafes1: TfrViewEpigrafes [5]
|
||||
Top = 162
|
||||
inherited frViewEpigrafes1: TfrViewEpigrafes [4]
|
||||
Top = 166
|
||||
Width = 656
|
||||
Height = 214
|
||||
ExplicitTop = 162
|
||||
Height = 210
|
||||
ExplicitTop = 166
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 214
|
||||
ExplicitHeight = 210
|
||||
inherited cxGrid: TcxGrid
|
||||
Width = 656
|
||||
Height = 86
|
||||
Height = 82
|
||||
ExplicitWidth = 656
|
||||
ExplicitHeight = 86
|
||||
ExplicitHeight = 82
|
||||
inherited cxGridView: TcxGridDBTableView
|
||||
DataController.Summary.DefaultGroupSummaryItems = <
|
||||
item
|
||||
@ -164,17 +133,9 @@ inherited fEditorElegirEpigrafes: TfEditorElegirEpigrafes
|
||||
inherited dxLayoutControl1: TdxLayoutControl
|
||||
Width = 656
|
||||
ExplicitWidth = 656
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
ExplicitWidth = 273
|
||||
Width = 273
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Left = 225
|
||||
ExplicitLeft = 225
|
||||
Left = 290
|
||||
ExplicitLeft = 290
|
||||
ExplicitWidth = 421
|
||||
Width = 421
|
||||
end
|
||||
@ -190,8 +151,8 @@ inherited fEditorElegirEpigrafes: TfEditorElegirEpigrafes
|
||||
end
|
||||
end
|
||||
inherited pnlAgrupaciones: TTBXDockablePanel
|
||||
Top = 188
|
||||
ExplicitTop = 188
|
||||
Top = 184
|
||||
ExplicitTop = 184
|
||||
ExplicitWidth = 656
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 656
|
||||
@ -216,19 +177,68 @@ inherited fEditorElegirEpigrafes: TfEditorElegirEpigrafes
|
||||
end>
|
||||
end
|
||||
end
|
||||
object pnlHeader: TPanel [5]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 656
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 5
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 606
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Seleccione el ep'#237'grafe'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 123
|
||||
end
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 581
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
ExplicitWidth = 3
|
||||
ExplicitHeight = 13
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList [8]
|
||||
Left = 112
|
||||
Top = 192
|
||||
inherited actDuplicar: TAction
|
||||
Visible = False
|
||||
end
|
||||
end
|
||||
inherited dsDataTable: TDADataSource
|
||||
inherited JvFormStorage: TJvFormStorage [9]
|
||||
end
|
||||
inherited JvAppRegistryStorage: TJvAppRegistryStorage [10]
|
||||
end
|
||||
inherited StatusBarImages: TPngImageList [11]
|
||||
end
|
||||
inherited dsDataTable: TDADataSource [12]
|
||||
Left = 8
|
||||
Top = 192
|
||||
end
|
||||
inherited JvFormStorage: TJvFormStorage [12]
|
||||
end
|
||||
inherited GridPopupMenu: TPopupMenu
|
||||
Left = 80
|
||||
Top = 192
|
||||
|
||||
@ -9,7 +9,7 @@ uses
|
||||
ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid,
|
||||
ComCtrls, TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar,
|
||||
pngimage, ExtCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls,
|
||||
JvNavigationPane, uViewBarraSeleccion, StdCtrls,
|
||||
uBizEpigrafes, uIEditorElegirEpigrafes,
|
||||
JvExComCtrls, JvStatusBar, uEditorEpigrafes, uViewEpigrafes,
|
||||
JSDialog, uDAInterfaces, dxGDIPlusClasses;
|
||||
@ -17,11 +17,13 @@ uses
|
||||
type
|
||||
TfEditorElegirEpigrafes = class(TfEditorEpigrafes, IEditorElegirEpigrafes)
|
||||
frViewBarraSeleccion1: TfrViewBarraSeleccion;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
EditorSeleccionActionList: TActionList;
|
||||
actBuscar2: TAction;
|
||||
actQuitarFiltro2: TAction;
|
||||
actAnchoAuto2: TAction;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject);
|
||||
@ -99,7 +101,7 @@ end;
|
||||
|
||||
function TfEditorElegirEpigrafes.GetMensaje: String;
|
||||
begin
|
||||
Result := JvgWizardHeader1.Comments.Text;
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
function TfEditorElegirEpigrafes.GetMultiSelect: Boolean;
|
||||
@ -109,7 +111,7 @@ end;
|
||||
|
||||
procedure TfEditorElegirEpigrafes.SetMensaje(const AValue: String);
|
||||
begin
|
||||
JvgWizardHeader1.Comments.Text := AValue;
|
||||
lblComments.Caption := AValue;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirEpigrafes.SetMultiSelect(AValue: Boolean);
|
||||
|
||||
@ -5,42 +5,13 @@ inherited fEditorElegirSubCuentas: TfEditorElegirSubCuentas
|
||||
ExplicitHeight = 478
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object JvgWizardHeader1: TJvgWizardHeader [0]
|
||||
Left = 0
|
||||
Top = 27
|
||||
Width = 851
|
||||
Height = 60
|
||||
CaptionFont.Charset = DEFAULT_CHARSET
|
||||
CaptionFont.Color = clWindowText
|
||||
CaptionFont.Height = -11
|
||||
CaptionFont.Name = 'Tahoma'
|
||||
CaptionFont.Style = [fsBold]
|
||||
CommentFont.Charset = DEFAULT_CHARSET
|
||||
CommentFont.Color = clWindowText
|
||||
CommentFont.Height = -11
|
||||
CommentFont.Name = 'Tahoma'
|
||||
CommentFont.Style = []
|
||||
SymbolFont.Charset = DEFAULT_CHARSET
|
||||
SymbolFont.Color = clHighlightText
|
||||
SymbolFont.Height = -35
|
||||
SymbolFont.Name = 'Wingdings'
|
||||
SymbolFont.Style = [fsBold]
|
||||
Captions.Strings = (
|
||||
'Seleccione la subcuenta')
|
||||
Comments.Strings = (
|
||||
' ')
|
||||
Gradient.FromColor = clHighlight
|
||||
Gradient.ToColor = clWindow
|
||||
Gradient.Active = False
|
||||
Gradient.Orientation = fgdVertical
|
||||
BufferedDraw = False
|
||||
ExplicitTop = 16
|
||||
ExplicitWidth = 656
|
||||
end
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Top = 64
|
||||
Width = 851
|
||||
Caption = 'Lista de subcuentas'
|
||||
Visible = False
|
||||
ExplicitLeft = -8
|
||||
ExplicitTop = -10
|
||||
ExplicitWidth = 851
|
||||
inherited Image1: TImage
|
||||
Left = 824
|
||||
@ -48,10 +19,11 @@ inherited fEditorElegirSubCuentas: TfEditorElegirSubCuentas
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Top = 87
|
||||
Top = 91
|
||||
Width = 851
|
||||
ExplicitTop = 87
|
||||
Height = 49
|
||||
ExplicitWidth = 851
|
||||
ExplicitHeight = 49
|
||||
inherited tbxMain: TTBXToolbar
|
||||
Align = alRight
|
||||
ExplicitWidth = 269
|
||||
@ -85,13 +57,21 @@ inherited fEditorElegirSubCuentas: TfEditorElegirSubCuentas
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 851
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Left = 539
|
||||
Top = 23
|
||||
DockPos = 539
|
||||
DockRow = 1
|
||||
ExplicitLeft = 539
|
||||
ExplicitTop = 23
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Width = 851
|
||||
Visible = False
|
||||
ExplicitWidth = 851
|
||||
end
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
|
||||
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [3]
|
||||
Left = 0
|
||||
Top = 376
|
||||
Width = 851
|
||||
@ -129,18 +109,17 @@ inherited fEditorElegirSubCuentas: TfEditorElegirSubCuentas
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited frViewSubCuentas1: TfrViewSubCuentas [5]
|
||||
Top = 162
|
||||
inherited frViewSubCuentas1: TfrViewSubCuentas [4]
|
||||
Top = 140
|
||||
Width = 851
|
||||
Height = 214
|
||||
ExplicitTop = 162
|
||||
Height = 236
|
||||
ExplicitWidth = 851
|
||||
ExplicitHeight = 214
|
||||
ExplicitHeight = 274
|
||||
inherited cxGrid: TcxGrid
|
||||
Width = 851
|
||||
Height = 86
|
||||
Height = 108
|
||||
ExplicitWidth = 851
|
||||
ExplicitHeight = 86
|
||||
ExplicitHeight = 146
|
||||
inherited cxGridView: TcxGridDBTableView
|
||||
DataController.Summary.DefaultGroupSummaryItems = <
|
||||
item
|
||||
@ -167,24 +146,16 @@ inherited fEditorElegirSubCuentas: TfEditorElegirSubCuentas
|
||||
Width = 851
|
||||
ExplicitWidth = 851
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 273
|
||||
Width = 273
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Left = 372
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitLeft = 372
|
||||
Left = 286
|
||||
ExplicitLeft = 286
|
||||
ExplicitWidth = 421
|
||||
Width = 421
|
||||
end
|
||||
@ -200,8 +171,8 @@ inherited fEditorElegirSubCuentas: TfEditorElegirSubCuentas
|
||||
end
|
||||
end
|
||||
inherited pnlAgrupaciones: TTBXDockablePanel
|
||||
Top = 188
|
||||
ExplicitTop = 188
|
||||
Top = 210
|
||||
ExplicitTop = 248
|
||||
ExplicitWidth = 851
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 851
|
||||
@ -226,19 +197,64 @@ inherited fEditorElegirSubCuentas: TfEditorElegirSubCuentas
|
||||
end>
|
||||
end
|
||||
end
|
||||
object pnlHeader: TPanel [5]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 851
|
||||
Height = 64
|
||||
Align = alTop
|
||||
BevelOuter = bvNone
|
||||
Color = clWhite
|
||||
Padding.Left = 25
|
||||
Padding.Top = 8
|
||||
Padding.Right = 25
|
||||
Padding.Bottom = 8
|
||||
ParentBackground = False
|
||||
TabOrder = 5
|
||||
ExplicitLeft = -8
|
||||
ExplicitTop = -21
|
||||
object lblTitle: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 25
|
||||
Top = 8
|
||||
Width = 801
|
||||
Height = 13
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
Caption = 'Seleccione la subcuenta'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
ExplicitWidth = 135
|
||||
end
|
||||
object lblComments: TLabel
|
||||
AlignWithMargins = True
|
||||
Left = 50
|
||||
Top = 29
|
||||
Width = 776
|
||||
Height = 27
|
||||
Margins.Left = 25
|
||||
Margins.Top = 0
|
||||
Margins.Right = 0
|
||||
Align = alClient
|
||||
ExplicitWidth = 3
|
||||
ExplicitHeight = 13
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList [8]
|
||||
Left = 112
|
||||
Top = 192
|
||||
inherited actDuplicar: TAction
|
||||
Visible = False
|
||||
end
|
||||
end
|
||||
inherited dsDataTable: TDADataSource
|
||||
Left = 8
|
||||
Top = 192
|
||||
end
|
||||
inherited JvFormStorage: TJvFormStorage [12]
|
||||
end
|
||||
inherited GridPopupMenu: TPopupMenu
|
||||
Left = 80
|
||||
Top = 192
|
||||
|
||||
@ -9,7 +9,7 @@ uses
|
||||
ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid,
|
||||
ComCtrls, TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar,
|
||||
pngimage, ExtCtrls, JvExControls, JvComponent,
|
||||
JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls,
|
||||
JvNavigationPane, uViewBarraSeleccion, StdCtrls,
|
||||
uBizSubCuentas, uIEditorElegirSubCuentas,
|
||||
JvExComCtrls, JvStatusBar, uEditorSubCuentas, uViewSubCuentas,
|
||||
JSDialog, uDAInterfaces, dxGDIPlusClasses;
|
||||
@ -17,11 +17,13 @@ uses
|
||||
type
|
||||
TfEditorElegirSubCuentas = class(TfEditorSubCuentas, IEditorElegirSubCuentas)
|
||||
frViewBarraSeleccion1: TfrViewBarraSeleccion;
|
||||
JvgWizardHeader1: TJvgWizardHeader;
|
||||
EditorSeleccionActionList: TActionList;
|
||||
actBuscar2: TAction;
|
||||
actQuitarFiltro2: TAction;
|
||||
actAnchoAuto2: TAction;
|
||||
pnlHeader: TPanel;
|
||||
lblTitle: TLabel;
|
||||
lblComments: TLabel;
|
||||
procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject);
|
||||
procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject);
|
||||
@ -99,7 +101,7 @@ end;
|
||||
|
||||
function TfEditorElegirSubCuentas.GetMensaje: String;
|
||||
begin
|
||||
Result := JvgWizardHeader1.Comments.Text;
|
||||
Result := lblComments.Caption;
|
||||
end;
|
||||
|
||||
function TfEditorElegirSubCuentas.GetMultiSelect: Boolean;
|
||||
@ -109,7 +111,7 @@ end;
|
||||
|
||||
procedure TfEditorElegirSubCuentas.SetMensaje(const AValue: String);
|
||||
begin
|
||||
JvgWizardHeader1.Comments.Text := AValue;
|
||||
lblComments.Caption := AValue;
|
||||
end;
|
||||
|
||||
procedure TfEditorElegirSubCuentas.SetMultiSelect(AValue: Boolean);
|
||||
|
||||
@ -3,17 +3,16 @@ inherited fEditorEpigrafe: TfEditorEpigrafe
|
||||
Top = 273
|
||||
HorzScrollBar.Visible = False
|
||||
VertScrollBar.Visible = False
|
||||
Caption = 'Ficha de epigrafe'
|
||||
Caption = 'Ficha de ep'#237'grafe'
|
||||
ClientWidth = 632
|
||||
Scaled = False
|
||||
OnClose = CustomEditorClose
|
||||
ExplicitWidth = 640
|
||||
ExplicitHeight = 240
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Width = 632
|
||||
Caption = 'Epigrafe'
|
||||
Caption = 'Ep'#237'grafe'
|
||||
ExplicitWidth = 632
|
||||
inherited Image1: TImage
|
||||
Left = 605
|
||||
@ -128,19 +127,6 @@ inherited fEditorEpigrafe: TfEditorEpigrafe
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited pgPaginas: TPageControl
|
||||
Width = 626
|
||||
ExplicitLeft = 3
|
||||
ExplicitTop = 79
|
||||
ExplicitWidth = 626
|
||||
ExplicitHeight = 358
|
||||
inherited pagGeneral: TTabSheet
|
||||
ExplicitLeft = 4
|
||||
ExplicitTop = 24
|
||||
ExplicitWidth = 618
|
||||
ExplicitHeight = 330
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Width = 632
|
||||
Panels = <
|
||||
@ -149,20 +135,38 @@ inherited fEditorEpigrafe: TfEditorEpigrafe
|
||||
end>
|
||||
ExplicitWidth = 632
|
||||
end
|
||||
inherited pgPaginas: TPageControl
|
||||
Width = 626
|
||||
ExplicitTop = 109
|
||||
ExplicitWidth = 626
|
||||
ExplicitHeight = 328
|
||||
inherited pagGeneral: TTabSheet
|
||||
ExplicitLeft = 4
|
||||
ExplicitTop = 24
|
||||
ExplicitWidth = 618
|
||||
ExplicitHeight = 300
|
||||
end
|
||||
end
|
||||
inherited PnlComentario: TPanel
|
||||
Width = 632
|
||||
ExplicitWidth = 632
|
||||
inherited lbComentario: TLabel
|
||||
Width = 622
|
||||
Height = 25
|
||||
end
|
||||
end
|
||||
inherited EditorActionList: TActionList
|
||||
Top = 128
|
||||
end
|
||||
inherited SmallImages: TPngImageList
|
||||
Top = 112
|
||||
end
|
||||
inherited dsDataTable: TDADataSource [6]
|
||||
Left = 168
|
||||
Top = 120
|
||||
end
|
||||
inherited LargeImages: TPngImageList [7]
|
||||
inherited LargeImages: TPngImageList
|
||||
Top = 112
|
||||
end
|
||||
inherited JvFormStorage: TJvFormStorage [8]
|
||||
inherited SmallImages: TPngImageList [9]
|
||||
Top = 112
|
||||
end
|
||||
object dxLayoutLookAndFeelList1: TdxLayoutLookAndFeelList
|
||||
Left = 320
|
||||
|
||||
@ -1,13 +1,11 @@
|
||||
inherited fEditorEpigrafes: TfEditorEpigrafes
|
||||
Left = 489
|
||||
Top = 325
|
||||
Caption = 'Lista de epigrafes'
|
||||
ExplicitWidth = 320
|
||||
ExplicitHeight = 240
|
||||
Caption = 'Lista de ep'#237'grafes'
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Caption = 'Lista de epigrafes'
|
||||
Caption = 'Lista de ep'#237'grafes'
|
||||
inherited Image1: TImage
|
||||
Picture.Data = {
|
||||
0B546478504E47496D61676589504E470D0A1A0A0000000D4948445200000018
|
||||
@ -124,27 +122,15 @@ inherited fEditorEpigrafes: TfEditorEpigrafes
|
||||
Width = 543
|
||||
ExplicitWidth = 543
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 273
|
||||
Width = 273
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Left = 337
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitLeft = 337
|
||||
ExplicitWidth = 121
|
||||
Width = 121
|
||||
|
||||
@ -126,7 +126,6 @@ procedure TfEditorEpigrafes.DuplicarInterno;
|
||||
{var
|
||||
AEpigrafe : IBizEpigrafe;}
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
AEpigrafe := FController.Duplicar(Epigrafes);
|
||||
|
||||
@ -127,27 +127,15 @@ inherited frViewExtractoMovimientos: TfrViewExtractoMovimientos
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
inherited dxLayoutControl1: TdxLayoutControl
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 273
|
||||
Width = 273
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 242
|
||||
Width = 242
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Left = 346
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitLeft = 346
|
||||
ExplicitWidth = 198
|
||||
Width = 198
|
||||
|
||||
@ -221,8 +221,6 @@ begin
|
||||
end;
|
||||
|
||||
procedure TfrViewExtractoMovimientos.CustomViewShow(Sender: TObject);
|
||||
var
|
||||
ASubcuentasController: ISubCuentasController;
|
||||
begin
|
||||
inherited;
|
||||
with TSubCuentasController.Create do
|
||||
|
||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user