1
0
mirror of synced 2024-11-14 19:13:50 +00:00
x2xmldatabinding/X2XMLDataBindingCmdLine.dpr
Mark van Renswoude 24ce12fdc5 Added: base for unit tests
Changed: extended type mapping for future improvements
2008-03-10 16:04:46 +00:00

24 lines
499 B
ObjectPascal

program X2XMLDataBindingCmdLine;
uses
ActiveX,
SysUtils,
DelphiXMLDataBindingGenerator in 'Units\DelphiXMLDataBindingGenerator.pas',
XMLDataBindingGenerator in 'Units\XMLDataBindingGenerator.pas',
XMLDataBindingHelpers in 'Units\XMLDataBindingHelpers.pas';
begin
CoInitialize(nil);
with TDelphiXMLDataBindingGenerator.Create() do
try
OutputType := otSingle;
OutputPath := ParamStr(2);
Execute(ParamStr(1));
finally
Free();
end;
end.