Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1 | daniel-mar | 1 | Ý ù ±3 <pDXGUIDEdit.pasi½ö( rDXGUIDEdit.DFMi½ö(dComObjÈCÒïgGUIDToStringò!ú'gStringToGUID í»cdActiveXÈCÒïgCoCreateGuidþûµcdStdCtrlsÈCÒïfTEdit´×fTButton[PV.g.TEditõpÃg.TButtonµ9-cdDialogsÈCÒïcdFormsÈCÒïfTFormg.TFormkðjgTCustomForm.AlignControls¾`þgTCustomForm.CreateParams¾`þgTCustomForm.CreateWindowHandle¾`þgTCustomForm.CreateWnd ¾`þgTCustomForm.DefineProperties¾`þgTCustomForm.DestroyWindowHandle¾`þgTCustomForm.DoCreate¾`þgTCustomForm.DoDestroy¾`þgTCustomForm.GetClientRect¾`þgTCustomForm.GetFloating¾`þgTCustomForm.Loaded¾`þgTCustomForm.Notification¾`þgTCustomForm.PaintWindow¾`þgTCustomForm.QueryInterface¾`þgTCustomForm.ReadState ¾`þgTCustomForm.SetParentBiDiMode#¾`þgTCustomForm.SetParent%¾`þgTCustomForm.UpdateActions&¾`þgTCustomForm.ValidateRename(¾`þgTCustomForm.WndProc*¾`þgTCustomForm.Resizing+¾`þgTCustomForm.Createb¾`þgTCustomForm.CreateNewc¾`þgTCustomForm.Destroyd¾`þgTCustomForm.AfterConstructione¾`þgTCustomForm.BeforeDestructionf¾`þgTCustomForm.CloseQueryh¾`þgTCustomForm.DefaultHandleri¾`þgTCustomForm.SetFocusu¾`þgTCustomForm.SetFocusedControlv¾`þgTCustomForm.ShowModalx¾`þgTCustomForm.WantChildKeyy¾`þg%TScrollingWinControl.AdjustClientRectäNTg&TScrollingWinControl.AutoScrollEnabledæNTg%TScrollingWinControl.AutoScrollInViewçNTgTCustomForm.Closeg¾`þgApplication¾OvYgTApplication.MessageBoxJ}cdControlsÈCÒïgTWinControl.AssignToægTWinControl.CanAutoSizeægTWinControl.CanResize ægTWinControl.ConstrainedResize¢ægTWinControl.CreateHandle¥æg#TWinControl.CustomAlignInsertBeforeªægTWinControl.CustomAlignPosition«ægTWinControl.DestroyWnd¯ægTWinControl.GetClientOrigin¿ægTWinControl.GetControlExtentsÁægTWinControl.GetDeviceContextÂægTWinControl.ShowControlÜægTWinControl.InvalidateægTWinControl.RepaintægTWinControl.SetBoundsægTWinControl.UpdateægTControl.GetActionD9`gTControl.GetDragImagesJ9`gTControl.GetEnabledK9`g!TControl.GetFloatingDockSiteClassM9`gTControl.SetAutoSize\9`gTControl.SetDragMode]9`gTControl.SetEnabled^9`gTControl.SetName_9`gTControl.SetBiDiModec9`gTControl.InitiateAction¢9`gTControl.GetTextØ9`gTControl.SetTextÿ9`cdGraphicsÈCÒïcdClassesÈCÒïgTComponent.UpdateRegistrysv·égTComponent.WriteStatewv·égTComponent.SafeCallExceptionv·égTPersistent.Assign6Í\cdSysUtilsÈCÒïf Exceptionü`9 g |
2 | .ExceptionVJõgException.CreateFmtï#'-cdMessagesÈCÒïcdWindowsÈCÒïgMB_YESNO·DСgMB_ICONQUESTIONÓDСg MB_DEFBUTTON24ºÛ¡gIDYES¹DСcdSysInitÈCÒïcdSystemÈCÒïfTObject÷! GfBooleanNcÇf |
||
3 | AnsiString8ÿñgTObject.Dispatchûä kgTObject.NewInstanceýä kgTObject.FreeInstanceþä kfString8ÿñg@LStrAsgw@g@LStrClrãóg@HandleFinallyX,TdfTGUIDsh{fPCharð»µjf PAnsiCharð»µjgExit g LoadResStringà]ØgTrue§1Øog@RaiseExceptX,Tdg @LStrArrayClr³¢Â¿g@HandleAnyExceptionX,Tdg@RaiseAgainX,Tdg@DoneExceptX,TdceDXConsts gSCannotMadec~vc&.TDelphiXGUIDEditFormØ! *TDelphiXGUIDEditForm½6 DelphiXGUIDEditFormæË6< .2f %SIsGUIDnewlyMade |
||
4 | 8ÿÿÿÿ Is GUID newly made? ("TDelphiXGUIDEditForm.OKButtonClick´ÜîY I!Self!Sender |
||
5 | c(&TDelphiXGUIDEditForm.CancelButtonClick³ÜîY !Self !Sender |
||
6 | c(#TDelphiXGUIDEditForm.NewButtonClick±ÜîY Ñ!Self!Sender |
||
7 | GUIDfàc(TDelphiXGUIDEditForm.EditChange²ÜîY !Self !Sender |
||
8 | c(TDelphiXGUIDEditForm.EditExitµÜîY ý!Selffø!Sender |
||
9 | c(TDelphiXGUIDEditForm.FormShow¶ÜîY Ê!Self!Sender |
||
10 | c(TDelphiXGUIDEditForm.EditEnter·ÜîY ¦!Self!Sender |
||
11 | c(FinalizationX,Td \! c( |
||
12 | DXGUIDEdit !cG éFbø Aöx©þ¸& |