AQDf;B1zXp Dialogos.pas,r dialogos.DFM:*dExtCtrlsc&fTBevelM#-fTShape fTPanel02ag.TBevelDg.TShape佼g.TPanel R%cdButtonsc&fTBitBtnQg.TBitBtnj"4hcdStdCtrlsc&fTLabel>g.TLabel_vcdControlsc&f TMouseButton|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.SetWidth#gTControl.SetLeft#gTWinControl.GetHandle#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.SetPosition#f TPositionz3%gpoScreenCenter:gTCustomForm.ShowModal#gTCustomForm.Show#gTCustomForm.Close#cdGraphicsc&g TFont.GetSize#cdClassesc&f TShiftStateYgTComponent.WriteState#gTComponent.SafeCallException#gTPersistent.AssignTo#gTPersistent.Assign#cdSysUtilskcdMessageskg WM_SYSCOMMAND̫6cdWindowskgReleaseCaptureB Pg SendMessagehkcdSysInitkcdSystemkfTObject!fWord@fInteger`LgTObject.NewInstance#gTObject.FreeInstance#f AnsiStringHDfStringHDfBooleanaUgLengthg@LStrLenO:gTruncg TObject.Free#g @LStrAddRefQg@LStrCatQg@TRUNCQg@LStrClr'@g@HandleFinallyQc& .TDialogoT_ *TDialogo>+" DialogoW+"N .1f$(sonido!duracion! frecuencia Result ic(MuestraMensaje>f%&!mensajefc(MuestraMensaje2>f%&!mensajefc( CierraMensajeQ&c(TDialogo.Panel4Click# &!Self"!Senderc(TDialogo.FormKeyDown#$&!Self"!Sender"Key!Shift&c(TDialogo.BotonAceptarKeyDown#R&!Self"!Sender"Key!Shift&c(TDialogo.FormActivate# &!Self"!Senderc(TDialogo.BotonAceptarClick# &!Self"!Senderc(TDialogo.Panel3MouseDown#P&!Self"!Sender!Button !Shift& !X&!Y&c(TDialogo.Label2MouseDown#P&!Self"!Sender!Button !Shift& !X&!Y&c( FinalizationQ\! &c(dialogos!&cG"9FF!@v,Cuadritoq,Mens ,Shape1,Panel3,Raya1,Raya2,Raya3,Panel4,Titulo , BotonAceptar,Label2 - Panel4Click- FormKeyDown-BotonAceptarKeyDown- FormActivate-BotonAceptarClick-Panel3MouseDown-Label2MouseDowncD$@l @X CuadritoMensShape1Panel3Raya1Raya2Raya3Panel4Titulo BotonAceptarLabel2 Panel4Click FormKeyDownBotonAceptarKeyDown FormActivateBotonAceptarClickPanel3MouseDownLabel2MouseDownTDialogoTDialogo@;dialogosUQSEE3Uhd0d E } EUP8&@8 Ѓ!P8P8P8P81P81P81@8 Ѓ3ZYYdhE[Y] ?USVEE3Uhd0d E@Pփ2E@P2uE Ѓ!E@Pփ2U3ZYYdhE^[YY]?Uf9u]USVf>uf> u^[]ddUjhhP] UjhhP] U3Uh%d0d 3ZYYdh,]Ã-mA DNfPVX\6`d$T&24^b*,.0F HJLR"Z(hj i$$4&0,>  B" l d  8*: $<*:*:*<6:6:6:" $<nt H $|:$|$ $<$|0: 8v $ x x x$xx x " > " > 555 9 9bpF,4 *D***666PH<LRd H     8 8r%"4L 2 02 @ ``0FF @  5 9 a