Go to most recent revision | Blame | Last modification | View Log | RSS feed
# ¤@ w¹â6‚×0ù ComMain– <r WindowsXP.res Pn3rComMain.DFMl 95pComMain.pasm 95 dSystem fTObject|ê®ìf
AnsiString¶+{Ÿfstring¶+{ŸgTObject.Dispatchµ
Ä„gTObject.NewInstance·
Ä„gTObject.FreeInstance¸
Ä„fInteger ™fÂgExit fBooleanúef PAnsiChar“u½RfLongBool;»ég @LStrCat3é`pÅg @LStrCatNé`pÅg@LStrToPChar$ÉÇg @LStrArrayClrüŸg@HandleFinallyé`pÅfTextFileŒs¾g
AssignFile g@AssignA#°ÀgReset g
@ResetTextðË ƒgReadln g@ReadLString¹Ÿg@ReadLnœÈ™g CloseFile g@CloseðË ƒgRewrite g@RewritTextðË ƒgAppend g@AppendðË ƒgWriteln g@Write0LStringµ—Tg@WriteLnÔ|| g@LStrAddRef”`Eg@_IOTesté`pÅg @LStrLAsg‘ÔœgSeekEof g@SeekEof¥n³g@LStrCmpé`pÅgInc gParamStrrÅögTObject.Create¡
Ä„g@LStrAsg‘ÔœgTObject.Free¢
Ä„fPChar“u½Rg@LStrClr\ª«>cdSysInit cdWindows g
DeleteFile2åŒ7cdMessages cdSysUtils gDirectoryExists'h'&g CreateDir'h'&g
FileExists'h'&gIntToStrñF¬g
DeleteFile'h'ˆŸ;Z4@gStrToIntrÅögExtractFilePathÓ¢}GcdClasses gTComponent.UpdateRegistryÒa0þgTComponent.WriteStateÖa0þgTComponent.SafeCallExceptionïa0þgTPersistent.Assignë!FqfTStrings‡†efTStringListôkPg.TStringList×dI¢cdGraphics cdControls gTWinControl.AssignTo<¾ßgTWinControl.CanAutoSize<¾ßgTWinControl.CanResize<¾ßgTWinControl.ConstrainedResize<¾ßgTWinControl.CreateHandle<¾ßg#TWinControl.CustomAlignInsertBefore<¾ßgTWinControl.CustomAlignPosition <¾ßgTWinControl.DestroyWnd$<¾ßg!TWinControl.DockReplaceDockClient'<¾ßgTWinControl.GetClientOrigin5<¾ßgTWinControl.GetControlExtents7<¾ßgTWinControl.GetDeviceContext8<¾ßgTWinControl.SetParentBackgroundW<¾ßgTWinControl.ShowControlY<¾ßg+TWinControl.UpdateControlOriginalParentSize[<¾ßgTWinControl.Invalidate<¾ßgTWinControl.Repaint•<¾ßgTWinControl.SetBounds˜<¾ßgTWinControl.Update›<¾ßgTControl.GetActionÄ×ïYgTControl.GetDragImagesÊ×ïYgTControl.GetEnabledË×ïYg!TControl.GetFloatingDockSiteClassÍ×ïYgTControl.SetAutoSizeÞ×ïYgTControl.
SetDragModeß×ïYgTControl.SetEnabledà×ïYgTControl.SetNameá×ïYgTControl.SetBiDiModeå×ïYgTControl.InitiateAction(ØïYgTWinControl.GetHandleœ;¾ßcdForms fTForm!€³5fTCloseAction¿¬þg.TFormT‘‡gTCustomForm.AlignControls~C)gTCustomForm.CreateParams~C)gTCustomForm.CreateWindowHandle~C)gTCustomForm.CreateWnd~C)gTCustomForm.DefineProperties~C)gTCustomForm.DestroyHandle~C)gTCustomForm.DestroyWindowHandle~C)gTCustomForm.DoCreate~C)gTCustomForm.DoDestroy ~C)gTCustomForm.GetClientRect%~C)gTCustomForm.GetFloating'~C)gTCustomForm.Loaded*~C)gTCustomForm.Notification+~C)gTCustomForm.PaintWindow-~C)gTCustomForm.QueryInterface/~C)gTCustomForm.ReadState0~C)gTCustomForm.RequestAlign1~C)gTCustomForm.SetParentBiDiMode3~C)gTCustomForm.SetParent5~C)gTCustomForm.UpdateActions6~C)gTCustomForm.ValidateRename8~C)gTCustomForm.WndProc:~C)gTCustomForm.Resizing;~C)gTCustomForm.Createt~C)gTCustomForm.CreateNewu~C)gTCustomForm.Destroyv~C)gTCustomForm.AfterConstructionw~C)gTCustomForm.BeforeDestructio
nx~C)gTCustomForm.CloseQueryz~C)gTCustomForm.DefaultHandler{~C)gTCustomForm.SetFocusˆ~C)gTCustomForm.SetFocusedControl‰~C)gTCustomForm.ShowModal‹~C)gTCustomForm.WantChildKeyŒ~C)g%TScrollingWinControl.AdjustClientRectµ<Åg&TScrollingWinControl.AutoScrollEnabled·<Åg%TScrollingWinControl.AutoScrollInView¸<ÅcdDialogs g
MessageDlgãŒn~fTMsgDlgType²ÇnÇgmtError.qlZf
TMsgDlgBtn>aKPgmbOK½
IãcdStdCtrls fTButtonä«IÝfTLabelÝ^L€f TComboBoxµš;g.TButtonÇ'/g.TLabelÀ2*Òg
.TComboBox˜n÷ŒcdGauges cdShellAPI gShellExecuteˆÙcdExtCtrls fTBevel£È¢Zg.TBevel†œ€¬cdComCtrls fTProgressBar×/fñg .TProgressBarºDCgTProgressBar.SetPosition P{‰gTProgressBar.GetPositionP{‰c5ComMain€ _¸ŽÏc5System c5SysInit bc5Windows dc5Messages hc5SysUtils jc5Classes zc5Graphics Šc5Controls Œc5Forms Êc5Dialogs 9c5StdCtrls Qc5Gauges mc5ShellAPI qc5ExtCtrls yc5ComCtrls …c&
.TMainForm€ ì†* * TMainFormˆ !©Ê, MainFormæ /~ÂÊ,D mæ +J‹&.F7.2F 0 (TMainForm.RunClick€ O8¾b ‘1ˆ2,!Self ,!Sender i . 4
.