Limpieza de unidades en el módulo de pedidos a proveedor.
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@26 c93665c3-c93d-084d-9b98-7d5f4a9c3376
This commit is contained in:
parent
307d935bf5
commit
a0778bea2f
@ -0,0 +1,26 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<BorlandProject>
|
||||
<PersonalityInfo>
|
||||
<Option>
|
||||
<Option Name="Personality">Default.Personality</Option>
|
||||
<Option Name="ProjectType"></Option>
|
||||
<Option Name="Version">1.0</Option>
|
||||
<Option Name="GUID">{C142AFFD-27DC-4024-8A66-63F391E33373}</Option>
|
||||
</Option>
|
||||
</PersonalityInfo>
|
||||
<Default.Personality> <Projects>
|
||||
<Projects Name="DataAbstract_D10.bpl">..\..\DataAbstract_D10\DataAbstract_D10.bdsproj</Projects>
|
||||
<Projects Name="Base.bpl">..\..\Base\Base.bdsproj</Projects>
|
||||
<Projects Name="ControllerBase.bpl">..\..\Base\ControllerBase\ControllerBase.bdsproj</Projects>
|
||||
<Projects Name="GUIBase.bpl">..\..\Base\GUIBase\GUIBase.bdsproj</Projects>
|
||||
<Projects Name="Contactos_view.bpl">..\Contactos\Views\Contactos_view.bdsproj</Projects>
|
||||
<Projects Name="PedidosProveedor_model.bpl">Model\PedidosProveedor_model.bdsproj</Projects>
|
||||
<Projects Name="PedidosProveedor_data.bpl">Data\PedidosProveedor_data.bdsproj</Projects>
|
||||
<Projects Name="PedidosProveedor_controller.bpl">Controller\PedidosProveedor_controller.bdsproj</Projects>
|
||||
<Projects Name="PedidosProveedor_view.bpl">Views\PedidosProveedor_view.bdsproj</Projects>
|
||||
<Projects Name="PedidosProveedor_plugin.bpl">Plugin\PedidosProveedor_plugin.bdsproj</Projects>
|
||||
<Projects Name="Targets">DataAbstract_D10.bpl Base.bpl ControllerBase.bpl GUIBase.bpl Contactos_view.bpl PedidosProveedor_model.bpl PedidosProveedor_data.bpl PedidosProveedor_controller.bpl PedidosProveedor_view.bpl PedidosProveedor_plugin.bpl</Projects>
|
||||
</Projects>
|
||||
<Dependencies/>
|
||||
</Default.Personality>
|
||||
</BorlandProject>
|
||||
@ -1,34 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<BorlandProject>
|
||||
<PersonalityInfo>
|
||||
<Option>
|
||||
<Option Name="Personality">Default.Personality</Option>
|
||||
<Option Name="ProjectType"></Option>
|
||||
<Option Name="Version">1.0</Option>
|
||||
<Option Name="GUID">{C142AFFD-27DC-4024-8A66-63F391E33373}</Option>
|
||||
</Option>
|
||||
</PersonalityInfo>
|
||||
<Default.Personality> <Projects>
|
||||
<Projects Name="DataAbstract_D10.bpl">..\..\DataAbstract_D10\DataAbstract_D10.bdsproj</Projects>
|
||||
<Projects Name="Base.bpl">..\..\Base\Base.bdsproj</Projects>
|
||||
<Projects Name="ControllerBase.bpl">..\..\Base\ControllerBase\ControllerBase.bdsproj</Projects>
|
||||
<Projects Name="GUIBase.bpl">..\..\Base\GUIBase\GUIBase.bdsproj</Projects>
|
||||
<Projects Name="ClassRegistry.bpl">..\..\Base\ClassRegistry\ClassRegistry.bdsproj</Projects>
|
||||
<Projects Name="Contactos_view.bpl">..\Contactos\Views\Contactos_view.bdsproj</Projects>
|
||||
<Projects Name="Presupuestos_model.bpl">Model\Presupuestos_model.bdsproj</Projects>
|
||||
<Projects Name="Presupuestos_data.bpl">Data\Presupuestos_data.bdsproj</Projects>
|
||||
<Projects Name="Presupuestos_controller.bpl">Controller\Presupuestos_controller.bdsproj</Projects>
|
||||
<Projects Name="Presupuestos_view.bpl">Views\Presupuestos_view.bdsproj</Projects>
|
||||
<Projects Name="Presupuestos_plugin.bpl">Plugin\Presupuestos_plugin.bdsproj</Projects>
|
||||
<Projects Name="Presupuestos_Test.exe">Test\Presupuestos_Test.bdsproj</Projects>
|
||||
<Projects Name="Targets">DataAbstract_D10.bpl Base.bpl ControllerBase.bpl GUIBase.bpl ClassRegistry.bpl Contactos_view.bpl Presupuestos_model.bpl Presupuestos_data.bpl Presupuestos_controller.bpl Presupuestos_view.bpl Presupuestos_plugin.bpl Presupuestos_Test.exe</Projects>
|
||||
</Projects>
|
||||
<Dependencies>
|
||||
<Dependency GUID="{E7D762A1-3A15-46B2-BD5B-3821D13B8347}">
|
||||
<Dependency GUID="{9E558626-CF49-4CFF-A178-E12C186758AC}"/>
|
||||
<Dependency GUID="{A7225A8D-F40D-4878-9A27-C5DE0E7CB638}"/>
|
||||
<Dependency GUID="{38EEF566-1895-4BDD-8007-F92F5E32CCE6}"/>
|
||||
</Dependency>
|
||||
</Dependencies>
|
||||
</Default.Personality>
|
||||
</BorlandProject>
|
||||
@ -1,496 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<BorlandProject>
|
||||
<PersonalityInfo>
|
||||
<Option>
|
||||
<Option Name="Personality">Delphi.Personality</Option>
|
||||
<Option Name="ProjectType"></Option>
|
||||
<Option Name="Version">1.0</Option>
|
||||
<Option Name="GUID">{BCA6CA66-CADE-480B-AB06-006F1F30AD81}</Option>
|
||||
</Option>
|
||||
</PersonalityInfo>
|
||||
<Delphi.Personality>
|
||||
<Source>
|
||||
<Source Name="MainSource">Presupuestos_Test.dpr</Source>
|
||||
</Source>
|
||||
<FileVersion>
|
||||
<FileVersion Name="Version">7.0</FileVersion>
|
||||
</FileVersion>
|
||||
<Compiler>
|
||||
<Compiler Name="A">8</Compiler>
|
||||
<Compiler Name="B">0</Compiler>
|
||||
<Compiler Name="C">1</Compiler>
|
||||
<Compiler Name="D">1</Compiler>
|
||||
<Compiler Name="E">0</Compiler>
|
||||
<Compiler Name="F">0</Compiler>
|
||||
<Compiler Name="G">1</Compiler>
|
||||
<Compiler Name="H">1</Compiler>
|
||||
<Compiler Name="I">1</Compiler>
|
||||
<Compiler Name="J">0</Compiler>
|
||||
<Compiler Name="K">0</Compiler>
|
||||
<Compiler Name="L">1</Compiler>
|
||||
<Compiler Name="M">0</Compiler>
|
||||
<Compiler Name="N">1</Compiler>
|
||||
<Compiler Name="O">1</Compiler>
|
||||
<Compiler Name="P">1</Compiler>
|
||||
<Compiler Name="Q">0</Compiler>
|
||||
<Compiler Name="R">0</Compiler>
|
||||
<Compiler Name="S">0</Compiler>
|
||||
<Compiler Name="T">0</Compiler>
|
||||
<Compiler Name="U">0</Compiler>
|
||||
<Compiler Name="V">1</Compiler>
|
||||
<Compiler Name="W">0</Compiler>
|
||||
<Compiler Name="X">1</Compiler>
|
||||
<Compiler Name="Y">1</Compiler>
|
||||
<Compiler Name="Z">1</Compiler>
|
||||
<Compiler Name="ShowHints">True</Compiler>
|
||||
<Compiler Name="ShowWarnings">True</Compiler>
|
||||
<Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
|
||||
<Compiler Name="NamespacePrefix"></Compiler>
|
||||
<Compiler Name="GenerateDocumentation">False</Compiler>
|
||||
<Compiler Name="DefaultNamespace"></Compiler>
|
||||
<Compiler Name="SymbolDeprecated">True</Compiler>
|
||||
<Compiler Name="SymbolLibrary">True</Compiler>
|
||||
<Compiler Name="SymbolPlatform">True</Compiler>
|
||||
<Compiler Name="SymbolExperimental">True</Compiler>
|
||||
<Compiler Name="UnitLibrary">True</Compiler>
|
||||
<Compiler Name="UnitPlatform">True</Compiler>
|
||||
<Compiler Name="UnitDeprecated">True</Compiler>
|
||||
<Compiler Name="UnitExperimental">True</Compiler>
|
||||
<Compiler Name="HResultCompat">True</Compiler>
|
||||
<Compiler Name="HidingMember">True</Compiler>
|
||||
<Compiler Name="HiddenVirtual">True</Compiler>
|
||||
<Compiler Name="Garbage">True</Compiler>
|
||||
<Compiler Name="BoundsError">True</Compiler>
|
||||
<Compiler Name="ZeroNilCompat">True</Compiler>
|
||||
<Compiler Name="StringConstTruncated">True</Compiler>
|
||||
<Compiler Name="ForLoopVarVarPar">True</Compiler>
|
||||
<Compiler Name="TypedConstVarPar">True</Compiler>
|
||||
<Compiler Name="AsgToTypedConst">True</Compiler>
|
||||
<Compiler Name="CaseLabelRange">True</Compiler>
|
||||
<Compiler Name="ForVariable">True</Compiler>
|
||||
<Compiler Name="ConstructingAbstract">True</Compiler>
|
||||
<Compiler Name="ComparisonFalse">True</Compiler>
|
||||
<Compiler Name="ComparisonTrue">True</Compiler>
|
||||
<Compiler Name="ComparingSignedUnsigned">True</Compiler>
|
||||
<Compiler Name="CombiningSignedUnsigned">True</Compiler>
|
||||
<Compiler Name="UnsupportedConstruct">True</Compiler>
|
||||
<Compiler Name="FileOpen">True</Compiler>
|
||||
<Compiler Name="FileOpenUnitSrc">True</Compiler>
|
||||
<Compiler Name="BadGlobalSymbol">True</Compiler>
|
||||
<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
|
||||
<Compiler Name="InvalidDirective">True</Compiler>
|
||||
<Compiler Name="PackageNoLink">True</Compiler>
|
||||
<Compiler Name="PackageThreadVar">True</Compiler>
|
||||
<Compiler Name="ImplicitImport">True</Compiler>
|
||||
<Compiler Name="HPPEMITIgnored">True</Compiler>
|
||||
<Compiler Name="NoRetVal">True</Compiler>
|
||||
<Compiler Name="UseBeforeDef">True</Compiler>
|
||||
<Compiler Name="ForLoopVarUndef">True</Compiler>
|
||||
<Compiler Name="UnitNameMismatch">True</Compiler>
|
||||
<Compiler Name="NoCFGFileFound">True</Compiler>
|
||||
<Compiler Name="ImplicitVariants">True</Compiler>
|
||||
<Compiler Name="UnicodeToLocale">True</Compiler>
|
||||
<Compiler Name="LocaleToUnicode">True</Compiler>
|
||||
<Compiler Name="ImagebaseMultiple">True</Compiler>
|
||||
<Compiler Name="SuspiciousTypecast">True</Compiler>
|
||||
<Compiler Name="PrivatePropAccessor">True</Compiler>
|
||||
<Compiler Name="UnsafeType">False</Compiler>
|
||||
<Compiler Name="UnsafeCode">False</Compiler>
|
||||
<Compiler Name="UnsafeCast">False</Compiler>
|
||||
<Compiler Name="OptionTruncated">True</Compiler>
|
||||
<Compiler Name="WideCharReduced">True</Compiler>
|
||||
<Compiler Name="DuplicatesIgnored">True</Compiler>
|
||||
<Compiler Name="UnitInitSeq">True</Compiler>
|
||||
<Compiler Name="LocalPInvoke">True</Compiler>
|
||||
<Compiler Name="MessageDirective">True</Compiler>
|
||||
<Compiler Name="CodePage"></Compiler>
|
||||
</Compiler>
|
||||
<Linker>
|
||||
<Linker Name="MapFile">3</Linker>
|
||||
<Linker Name="OutputObjs">0</Linker>
|
||||
<Linker Name="GenerateHpps">False</Linker>
|
||||
<Linker Name="ConsoleApp">1</Linker>
|
||||
<Linker Name="DebugInfo">False</Linker>
|
||||
<Linker Name="RemoteSymbols">False</Linker>
|
||||
<Linker Name="GenerateDRC">False</Linker>
|
||||
<Linker Name="MinStackSize">16384</Linker>
|
||||
<Linker Name="MaxStackSize">1048576</Linker>
|
||||
<Linker Name="ImageBase">4194304</Linker>
|
||||
<Linker Name="ExeDescription"></Linker>
|
||||
</Linker>
|
||||
<Directories>
|
||||
<Directories Name="OutputDir">..\..\..\Output\Cliente</Directories>
|
||||
<Directories Name="UnitOutputDir">.\</Directories>
|
||||
<Directories Name="PackageDLLOutputDir"></Directories>
|
||||
<Directories Name="PackageDCPOutputDir">..\..\Lib</Directories>
|
||||
<Directories Name="SearchPath">..\..\..\Lib;..\..\Lib</Directories>
|
||||
<Directories Name="Packages">DataAbstract_D10;base;GUIBase;ClassRegistry;Empresas_controller;Presupuestos_model;presupuestos_data;presupuestos_controller;presupuestos_view;presupuestos_plugin</Directories>
|
||||
<Directories Name="Conditionals">_CONSOLE_TESTRUNNER;EUREKALOG;EUREKALOG_VER5</Directories>
|
||||
<Directories Name="DebugSourceDirs"></Directories>
|
||||
<Directories Name="UsePackages">True</Directories>
|
||||
</Directories>
|
||||
<Parameters>
|
||||
<Parameters Name="RunParams"></Parameters>
|
||||
<Parameters Name="HostApplication"></Parameters>
|
||||
<Parameters Name="Launcher"></Parameters>
|
||||
<Parameters Name="UseLauncher">False</Parameters>
|
||||
<Parameters Name="DebugCWD"></Parameters>
|
||||
<Parameters Name="Debug Symbols Search Path"></Parameters>
|
||||
<Parameters Name="LoadAllSymbols">True</Parameters>
|
||||
<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
|
||||
</Parameters>
|
||||
<Language>
|
||||
<Language Name="ActiveLang"></Language>
|
||||
<Language Name="ProjectLang">$00000000</Language>
|
||||
<Language Name="RootDir"></Language>
|
||||
</Language>
|
||||
<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">Presupuestos_Test</VersionInfoKeys>
|
||||
<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
|
||||
<VersionInfoKeys Name="ProductName">Presupuestos_Test</VersionInfoKeys>
|
||||
<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
|
||||
<VersionInfoKeys Name="Comments"></VersionInfoKeys>
|
||||
</VersionInfoKeys>
|
||||
</Delphi.Personality>
|
||||
<UnitTesting>
|
||||
<TestFramework>DUnit / Delphi Win32</TestFramework>
|
||||
<TestRunner>GUI</TestRunner>
|
||||
</UnitTesting>
|
||||
<!-- EurekaLog First Line
|
||||
[Exception Log]
|
||||
EurekaLog Version=519
|
||||
Activate=1
|
||||
Activate Handle=1
|
||||
Save Log File=1
|
||||
Foreground Tab=0
|
||||
Freeze Activate=0
|
||||
Freeze Timeout=0
|
||||
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=0
|
||||
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=1
|
||||
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>
|
||||
@ -1,40 +0,0 @@
|
||||
program Presupuestos_Test;
|
||||
{
|
||||
|
||||
Delphi DUnit Test Project
|
||||
-------------------------
|
||||
This project contains the DUnit test framework and the GUI/Console test runners.
|
||||
Add "CONSOLE_TESTRUNNER" to the conditional defines entry in the project options
|
||||
to use the console test runner. Otherwise the GUI test runner will be used by
|
||||
default.
|
||||
|
||||
}
|
||||
|
||||
{$IFDEF CONSOLE_TESTRUNNER}
|
||||
{$APPTYPE CONSOLE}
|
||||
{$ENDIF}
|
||||
|
||||
uses
|
||||
ExceptionLog,
|
||||
Forms,
|
||||
TestFramework,
|
||||
GUITestRunner,
|
||||
TextTestRunner,
|
||||
uPresupuestosViewRegister,
|
||||
uContactosViewRegister,
|
||||
uPluginPresupuestos_Test in 'uPluginPresupuestos_Test.pas',
|
||||
uHostMainForm in 'uHostMainForm.pas' {HostMainForm},
|
||||
uPresupuestosController_Test in 'uPresupuestosController_Test.pas',
|
||||
uDataModulePresupuestos_Test in 'uDataModulePresupuestos_Test.pas';
|
||||
|
||||
{$R *.RES}
|
||||
|
||||
begin
|
||||
Application.Initialize;
|
||||
Application.CreateForm(THostMainForm, HostMainForm);
|
||||
uPresupuestosViewRegister.RegisterViews;
|
||||
uContactosViewRegister.RegisterViews;
|
||||
Application.Run;
|
||||
Application.Terminate;
|
||||
end.
|
||||
|
||||
@ -1,14 +0,0 @@
|
||||
/* VER180
|
||||
Generated by the Borland Delphi Pascal Compiler
|
||||
because -GD or --drc was supplied to the compiler.
|
||||
|
||||
This file contains compiler-generated resources that
|
||||
were bound to the executable.
|
||||
If this file is empty, then no compiler-generated
|
||||
resources were bound to the produced executable.
|
||||
*/
|
||||
|
||||
STRINGTABLE
|
||||
BEGIN
|
||||
END
|
||||
|
||||
Binary file not shown.
@ -1,98 +0,0 @@
|
||||
unit uDataModulePresupuestos_Test;
|
||||
{
|
||||
|
||||
Delphi DUnit Test Case
|
||||
----------------------
|
||||
This unit contains a skeleton test case class generated by the Test Case Wizard.
|
||||
Modify the generated code to correctly setup and call the methods from the unit
|
||||
being tested.
|
||||
|
||||
}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
TestFramework, uROBinMessage, uROServiceComponent, uDAClientDataModule,
|
||||
uDACDSDataTable, uDADataTable, uBizDetallesPresupuesto, uBizPresupuestos, Classes, DB,
|
||||
uDAScriptingProvider, SysUtils, uIDataModulePresupuestos, uROWinInetHttpChannel,
|
||||
uROClient, uDABINAdapter, uRORemoteService, DBClient, uDataModulePresupuestos;
|
||||
type
|
||||
// Test methods for class TDataModulePresupuestos
|
||||
|
||||
TestTDataModulePresupuestos = class(TTestCase)
|
||||
strict private
|
||||
FDataModulePresupuestos: TDataModulePresupuestos;
|
||||
public
|
||||
procedure SetUp; override;
|
||||
procedure TearDown; override;
|
||||
published
|
||||
procedure TestDAClientDataModuleCreate;
|
||||
procedure Test_CloneDataTable;
|
||||
procedure TestGetDetalles;
|
||||
procedure TestGetItems;
|
||||
procedure TestGetNextID;
|
||||
end;
|
||||
|
||||
implementation
|
||||
|
||||
procedure TestTDataModulePresupuestos.SetUp;
|
||||
begin
|
||||
FDataModulePresupuestos := TDataModulePresupuestos.Create(Nil);
|
||||
end;
|
||||
|
||||
procedure TestTDataModulePresupuestos.TearDown;
|
||||
begin
|
||||
FDataModulePresupuestos.Free;
|
||||
FDataModulePresupuestos := nil;
|
||||
end;
|
||||
|
||||
procedure TestTDataModulePresupuestos.TestDAClientDataModuleCreate;
|
||||
var
|
||||
Sender: TObject;
|
||||
begin
|
||||
// TODO: Setup method call parameters
|
||||
FDataModulePresupuestos.DAClientDataModuleCreate(Sender);
|
||||
// TODO: Validate method results
|
||||
end;
|
||||
|
||||
procedure TestTDataModulePresupuestos.Test_CloneDataTable;
|
||||
var
|
||||
ReturnValue: TDACDSDataTable;
|
||||
ADataTable: TDACDSDataTable;
|
||||
begin
|
||||
// TODO: Setup method call parameters
|
||||
ReturnValue := FDataModulePresupuestos._CloneDataTable(ADataTable);
|
||||
// TODO: Validate method results
|
||||
end;
|
||||
|
||||
procedure TestTDataModulePresupuestos.TestGetDetalles;
|
||||
var
|
||||
ReturnValue: IBizDetallesPresupuesto;
|
||||
begin
|
||||
// ReturnValue := FDataModulePresupuestos.GetDetalles;
|
||||
// TODO: Validate method results
|
||||
end;
|
||||
|
||||
procedure TestTDataModulePresupuestos.TestGetItems;
|
||||
var
|
||||
ReturnValue: IBizPresupuesto;
|
||||
begin
|
||||
ReturnValue := FDataModulePresupuestos.GetItems;
|
||||
// TODO: Validate method results
|
||||
end;
|
||||
|
||||
procedure TestTDataModulePresupuestos.TestGetNextID;
|
||||
var
|
||||
ReturnValue: Integer;
|
||||
DataSetName: string;
|
||||
begin
|
||||
// TODO: Setup method call parameters
|
||||
ReturnValue := FDataModulePresupuestos.GetNextID(DataSetName);
|
||||
// TODO: Validate method results
|
||||
end;
|
||||
|
||||
initialization
|
||||
// Register any test cases with the test runner
|
||||
RegisterTest(TestTDataModulePresupuestos.Suite);
|
||||
end.
|
||||
|
||||
@ -1,28 +0,0 @@
|
||||
object HostMainForm: THostMainForm
|
||||
Left = 0
|
||||
Top = 0
|
||||
Caption = 'HostMainForm'
|
||||
ClientHeight = 598
|
||||
ClientWidth = 690
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poScreenCenter
|
||||
OnCloseQuery = FormCloseQuery
|
||||
OnShow = FormShow
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
object Panel1: TPanel
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 690
|
||||
Height = 598
|
||||
Align = alClient
|
||||
BevelOuter = bvNone
|
||||
TabOrder = 0
|
||||
end
|
||||
end
|
||||
@ -1,116 +0,0 @@
|
||||
unit uHostMainForm;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, uGUIBase, ExtCtrls, uCustomEditor, cxControls;
|
||||
|
||||
type
|
||||
THostMainForm = class(TForm, IHostForm)
|
||||
Panel1: TPanel;
|
||||
procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
|
||||
procedure FormShow(Sender: TObject);
|
||||
protected
|
||||
FContenido : TCustomEditor;
|
||||
function GetWorkPanel: TWinControl;
|
||||
procedure OnWorkPanelChanged(AEditor : ICustomEditor);
|
||||
procedure ShowEmbedded(AEditor : ICustomEditor);
|
||||
procedure ReleaseEmbedded;
|
||||
public
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
property WorkPanel: TWinControl read GetWorkPanel;
|
||||
end;
|
||||
|
||||
var
|
||||
HostMainForm: THostMainForm;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
uses
|
||||
TestFramework, GUITestRunner, TextTestRunner;
|
||||
|
||||
|
||||
{ TForm1 }
|
||||
|
||||
constructor THostMainForm.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
FContenido := NIL;
|
||||
end;
|
||||
|
||||
destructor THostMainForm.Destroy;
|
||||
begin
|
||||
ReleaseEmbedded;
|
||||
inherited;
|
||||
end;
|
||||
|
||||
procedure THostMainForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
|
||||
begin
|
||||
CanClose := True;
|
||||
if Assigned(FContenido) then
|
||||
CanClose := FContenido.CloseQuery;
|
||||
end;
|
||||
|
||||
procedure THostMainForm.FormShow(Sender: TObject);
|
||||
begin
|
||||
if IsConsole then
|
||||
TextTestRunner.RunRegisteredTests
|
||||
else
|
||||
GUITestRunner.RunRegisteredTestsModeless;
|
||||
Self.SendToBack;
|
||||
end;
|
||||
|
||||
function THostMainForm.GetWorkPanel: TWinControl;
|
||||
begin
|
||||
Result := Panel1;
|
||||
end;
|
||||
|
||||
procedure THostMainForm.OnWorkPanelChanged(AEditor: ICustomEditor);
|
||||
begin
|
||||
//
|
||||
end;
|
||||
|
||||
procedure THostMainForm.ReleaseEmbedded;
|
||||
begin
|
||||
if Assigned(FContenido) then
|
||||
FContenido.Release;
|
||||
Application.ProcessMessages;
|
||||
end;
|
||||
|
||||
procedure THostMainForm.ShowEmbedded(AEditor: ICustomEditor);
|
||||
begin
|
||||
if Assigned(FContenido) then
|
||||
if not FContenido.CloseQuery then
|
||||
begin
|
||||
AEditor.Release;
|
||||
AEditor := NIL;
|
||||
Exit;
|
||||
end;
|
||||
|
||||
ShowHourglassCursor;
|
||||
LockWindowUpdate(Handle);
|
||||
try
|
||||
FContenido := AEditor.GetInstance as TCustomEditor;
|
||||
with (FContenido) do
|
||||
begin
|
||||
Visible := False;
|
||||
BorderIcons := [];
|
||||
BorderStyle := bsNone;
|
||||
Parent := WorkPanel;
|
||||
FContenido.Show;
|
||||
Align := alClient;
|
||||
FContenido.SetFocus;
|
||||
end;
|
||||
finally
|
||||
Application.ProcessMessages;
|
||||
LockWindowUpdate(0);
|
||||
HideHourglassCursor;
|
||||
end;
|
||||
OnWorkPanelChanged(FContenido);
|
||||
end;
|
||||
|
||||
end.
|
||||
@ -1,56 +0,0 @@
|
||||
unit uPluginPresupuestos_Test;
|
||||
{
|
||||
|
||||
Delphi DUnit Test Case
|
||||
----------------------
|
||||
This unit contains a skeleton test case class generated by the Test Case Wizard.
|
||||
Modify the generated code to correctly setup and call the methods from the unit
|
||||
being tested.
|
||||
|
||||
}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
TestFramework, ActnList, uPluginPresupuestos, Classes, ImgList, uInterfaces,
|
||||
uModuleController, uHostManager, PngImageList, Controls, Menus;
|
||||
type
|
||||
// Test methods for class TPluginPresupuestos
|
||||
|
||||
TestTPluginPresupuestos = class(TTestCase)
|
||||
strict private
|
||||
FPluginPresupuestos: TPluginPresupuestos;
|
||||
public
|
||||
procedure SetUp; override;
|
||||
procedure TearDown; override;
|
||||
published
|
||||
procedure TestactPresupuestosExecute;
|
||||
end;
|
||||
|
||||
implementation
|
||||
|
||||
procedure TestTPluginPresupuestos.SetUp;
|
||||
begin
|
||||
FPluginPresupuestos := TPluginPresupuestos.Create(Nil);
|
||||
end;
|
||||
|
||||
procedure TestTPluginPresupuestos.TearDown;
|
||||
begin
|
||||
FPluginPresupuestos.Free;
|
||||
FPluginPresupuestos := nil;
|
||||
end;
|
||||
|
||||
procedure TestTPluginPresupuestos.TestactPresupuestosExecute;
|
||||
var
|
||||
Sender: TObject;
|
||||
begin
|
||||
// TODO: Setup method call parameters
|
||||
// FPluginPresupuestos.actPresupuestosExecute(Sender);
|
||||
// TODO: Validate method results
|
||||
end;
|
||||
|
||||
initialization
|
||||
// Register any test cases with the test runner
|
||||
RegisterTest(TestTPluginPresupuestos.Suite);
|
||||
end.
|
||||
|
||||
@ -1,85 +0,0 @@
|
||||
unit uPresupuestosController_Test;
|
||||
{
|
||||
|
||||
Delphi DUnit Test Case
|
||||
----------------------
|
||||
This unit contains a skeleton test case class generated by the Test Case Wizard.
|
||||
Modify the generated code to correctly setup and call the methods from the unit
|
||||
being tested.
|
||||
|
||||
}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
TestFramework, uBizPresupuestos, Classes, Contnrs, Windows,
|
||||
Forms, SysUtils, Controls, uBizDetallesPresupuesto, uIDataModulePresupuestos,
|
||||
uPresupuestosController;
|
||||
type
|
||||
// Test methods for class TPresupuestosController
|
||||
|
||||
TestTPresupuestosController = class(TTestCase)
|
||||
strict private
|
||||
FPresupuestosController : IPresupuestosController;
|
||||
public
|
||||
procedure SetUp; override;
|
||||
procedure TearDown; override;
|
||||
published
|
||||
procedure TestBuscarTodos;
|
||||
procedure TestVerTodos;
|
||||
procedure hola;
|
||||
end;
|
||||
|
||||
var
|
||||
FPresupuestosController: IPresupuestosController;
|
||||
|
||||
implementation
|
||||
|
||||
uses dialogs;
|
||||
|
||||
|
||||
procedure TestTPresupuestosController.hola;
|
||||
begin
|
||||
//
|
||||
end;
|
||||
|
||||
procedure TestTPresupuestosController.SetUp;
|
||||
begin
|
||||
FPresupuestosController := TPresupuestosController.Create;
|
||||
end;
|
||||
|
||||
procedure TestTPresupuestosController.TearDown;
|
||||
begin
|
||||
FPresupuestosController := Nil;
|
||||
end;
|
||||
|
||||
procedure TestTPresupuestosController.TestBuscarTodos;
|
||||
var
|
||||
ReturnValue: IBizPresupuesto;
|
||||
begin
|
||||
ReturnValue := FPresupuestosController.BuscarTodos;
|
||||
|
||||
ReturnValue.DataTable.Open;
|
||||
showmessage(IntToStr(ReturnValue.DataTable.RecordCount));
|
||||
end;
|
||||
|
||||
procedure TestTPresupuestosController.TestVerTodos;
|
||||
var
|
||||
APresupuestos: IBizPresupuesto;
|
||||
begin
|
||||
APresupuestos := FPresupuestosController.BuscarTodos;
|
||||
APresupuestos.DataTable.Open;
|
||||
// TODO: Setup method call parameters
|
||||
FPresupuestosController.VerTodos(APresupuestos);
|
||||
// TODO: Validate method results
|
||||
end;
|
||||
|
||||
initialization
|
||||
// Register any test cases with the test runner
|
||||
RegisterTest(TestTPresupuestosController.Suite);
|
||||
|
||||
finalization
|
||||
|
||||
|
||||
end.
|
||||
|
||||
Reference in New Issue
Block a user