src/test/cn/SerializationTest.dpr

   1 program SerializationTest;\r
   2 \r
   3 uses\r
   4   Forms,\r
   5   Vectores in '..\..\Vectores.pas',\r
   6   SerializacionTest in 'SerializacionTest.pas' {FormTest},\r
   7   Objeto in '..\..\Objeto.pas',\r
   8   ObjetoPersistente in '..\..\ObjetoPersistente.pas',\r
   9   Tipos in '..\..\Tipos.pas',\r
  10   RegExpr in '..\..\RegExpr.pas';\r
  11 \r
  12 {$R *.RES}\r
  13 \r
  14 begin\r
  15   Application.Initialize;\r
  16   Application.Title := 'Prueba de Caja Negra: Serialización de Vectores';\r
  17   Application.CreateForm(TFormTest, FormTest);\r
  18   Application.Run;\r
  19 end.\r