AQDT;B1zXpTara.pas)p&0rTara.DFM0/dButtonsc&fTBitBtnQg.TBitBtnj"4hcdStdCtrlsc&fTEdit+b.fTLabel>g.TEdit˃g.TLabel_vgTCustomEdit.SelectAll#cdDialogsc&cdFormsc&fTFormH)g.TForm!gTCustomForm.AlignControls#gTCustomForm.CreateParams#gTCustomForm.CreateWindowHandle#gTCustomForm.CreateWnd#gTCustomForm.DefaultHandler#gTCustomForm.DefineProperties#gTCustomForm.DestroyWindowHandle#gTCustomForm.GetClientRect#gTCustomForm.Loaded#gTCustomForm.Notification#gTCustomForm.PaintWindow#gTCustomForm.ReadState#gTCustomForm.SetParent#gTCustomForm.ValidateRename#gTCustomForm.WndProc#gTCustomForm.Create#gTCustomForm.Destroy#gTCustomForm.SetFocus#gTCustomForm.WantChildKey#g Application^gTCustomForm.ShowModal#gTCustomForm.Close#cdControlsc&gTWinControl.CreateHandle#gTWinControl.DestroyWnd#gTWinControl.GetClientOrigin#gTWinControl.GetDeviceContext#gTWinControl.ShowControl#gTWinControl.Invalidate#gTWinControl.Repaint#gTWinControl.SetBounds#gTWinControl.Update#gTControl.GetDragImages#gTControl.SetDragMode#gTControl.SetName#gTControl.SetText#gTControl.GetText#cdGraphicsc&cdClassesc&f TShiftStateYgTComponent.WriteState#gTComponent.SafeCallException#gTPersistent.AssignTo#gTPersistent.Assign#cdSysUtilskg StrToFloat4Ag FormatCurrό7AcdMessageskcdWindowskcdSysInitkcdSystemkfTObject!fWord@gTObject.NewInstance#gTObject.FreeInstance#fReal{Of AnsiStringHDgStrg@Str2ExtQfStringHDg @Real2ExtQg@LStrFromStringR!g @Ext2RealQg@LStrClr'@g@HandleFinallyQgRoundg TObject.Free#g@ROUNDQc& .TFormaTaraf* TFormaTara FormaTara> .1f(redondea-!cantidad&!digi Resultf numcantifc( GeneraTara1 !canti&0!tara& !tara_fac& Resultf tarfc(TFormaTara.BitBtn1Click#!Self!Sender c(TFormaTara.BitBtn2Click#!Self!Sender c(TFormaTara.FormKeyDown#`!Self!Sender "Key!Shift& c(TFormaTara.FormShow#!Self!Sender c(TFormaTara.Tara_ProductoExit#!Self!Sender  tarfc( FinalizationQ\! c(Tara!cGFB@v, Tara_Productoq, Cantidad_Tara,BitBtn1,BitBtn2,Cantidad,Facto,Label1- BitBtn1Click- BitBtn2Click- FormKeyDown-FormShow-Tara_ProductoExitcD@l@2 Tara_Producto Cantidad_TaraBitBtn1BitBtn2CantidadFactoLabel1 BitBtn1Click BitBtn2Click FormKeyDownFormShowTara_ProductoExit TFormaTara TFormaTara@;TaraUS3҉U3Uhud0d E<$Ӹ EEE3ZYYdh|EE[]US3E܉E3Uhwd0d Ef <$UUEf <$UUEw EfE E}䛍EmEEEE}䛍EmɍEjjf <$UUE}䛍Emf <$UUU܋E}䛍U܋EmɍEx u6E}䛍EmfEEE3ZYYdh~EEE[]@F #######0.00 ######0.00@ 3҉P Uff tft@  3҉P ]US3ɉM؉M3Uhd0d UE}蛍UE}ܛUEmmEEf <$UظU؋3ZYYdhEE[]@F ######0.00U3Uh%d0d 3ZYYdh,]Ã-m n$<p&r,.2`6l:N*P\^48TVXZJ "(L0R>@ &&$F *4v  B :  x b  x b 4  x b  x bD dv(dv& |F  F 8FF *(dv$dv$dv$  xb F  RR5>`jD,&XBnl h t   "  >"n0@@1> H0@@`(X@@P>  a