Subversion Repositories jumper

Rev

Go to most recent revision | Blame | Last modification | View Log | RSS feed

ßÖ °¨˜:^ñ˜–<p
HighScore.pas5´g:r
HighScore.dfm*´g:dStdCtrlsÈCÒïfTButton7êÈeg.TButtonx;HcdComCtrlsÈCÒïfTPageControl§õ1f  TTabSheet$Ó5Íf        TListView
      *Åf    TListItem‰¦jg
.TPageControl©5hg
.TTabSheeta¨¯g
.TListViewô–œ§gTCustomListView.SetSortTypeHgxYf    TSortTypeV›ÍgstNone®DB«gTListItems.Addxer´gTListItem.SetCaptionL”ŽgstText°DB«cdDialogsÈCÒïcdFormsÈCÒïfTFormè±Ig.TFormïu$,gTCustomForm.AlignControlsmgaÈgTCustomForm.CreateParamspgaÈgTCustomForm.CreateWindowHandleqgaÈgTCustomForm.CreateWndrgaÈgTCustomForm.DefinePropertiestgaÈgTCustomForm.DestroyWindowHandleugaÈgTCustomForm.DoCreatewgaÈgTCustomForm.DoDestroyxgaÈgTCustomForm.GetClientRect{gaÈgTCustomForm.GetFloating}gaÈgTCustomForm.LoadedgaÈgTCustomForm.Notification€gaÈgTCustomForm.PaintWindow‚gaÈgTCustomForm.QueryInterface„gaÈgTCustomForm.ReadState…gaÈgTCustomForm.SetParentBiDiModeˆgaÈgTCustomForm.SetParentŠgaÈgTCustomForm.UpdateActions‹gaÈgTCustomForm.ValidateRenamegaÈgTCustomForm.WndProcgaÈgTCustomForm.ResizinggaÈgTCustomForm.CreateÇgaÈgTCustomForm.CreateNewÈgaÈgTCustomForm.DestroyÉgaÈgTCustomForm.AfterConstructionÊgaÈgTCustomForm.BeforeDestructionËgaÈgTCustomForm.CloseQueryÍgaÈgTCustomForm.DefaultHandlerÎgaÈgTCustomForm.SetFocusÚgaÈgTCustomForm.SetFocusedControlÛgaÈgTCustomForm.ShowModalÝgaÈgTCustomForm.WantChildKeyÞgaÈg%TScrollingWinControl.AdjustClientRect¸(#g&TScrollingWinControl.AutoScrollEnabledº(#g%TScrollingWinControl.AutoScrollInView»(#gTCustomForm.CloseÌgaÈ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.SetParentBackgroundÏê.¯gTWinControl.ShowControlÑê.¯gTWinControl.Invalidateë.¯gTWinControl.Repaintë.¯gTWinControl.SetBoundsë.¯gTWinControl.Update
ë.¯gTControl.GetAction6†`)gTControl.GetDragImages<†`)gTControl.GetEnabled=†`)g!TControl.GetFloatingDockSiteClass?†`)gTControl.SetAutoSizeN†`)gTControl.SetDragModeO†`)gTControl.SetEnabledP†`)gTControl.SetNameQ†`)gTControl.SetBiDiModeU†`)gTControl.InitiateAction”†`)cdGraphicsÈCÒïcdClassesÈCÒïgTComponent.UpdateRegistryŽŽòìgTComponent.WriteState’ŽòìgTComponent.SafeCallExceptionªŽòìgTPersistent.Assign§N`fTStringListÌæ~8cdSysUtilsÈCÒïgStrToIntDef$‘gIntToStri5ŽgFormatùÕðùg
FileExists°üêg
DeleteFile°üêcdMessagesÈCÒïcdWindowsÈCÒïcdSysInitÈCÒïcdSystemÈCÒïfTObject¼„©_fInteger¶¨§
f
AnsiStringÔÿ×fStringÔÿ×gTObject.DispatchÀG—ƒgTObject.NewInstanceÂG—ƒgTObject.FreeInstanceÃG—ƒgExitg
@LStrArrayClrzYœ´g@HandleFinallyEóa‚gRoundg@LStrAddRefö³jg@ROUNDEóa‚fTextFile•Ãç²g
AssignFileg@Assignì˜jtgResetg
@ResetTextR#µDgEofg@EofTextw)ågReadlng@ReadLStringÑÄg@ReadLnrɳØg        CloseFileg@CloseR#µDg@_IOTestEóa‚g@LStrClrѨ}µg@LStrAsgƒ4µce   Constants^ñ˜gJNL_SEP’÷pgJNL_FILEX(ce     Functions^ñ˜gExplode/â³c4   HighScore€iif@c4WindowsÊc4MessagesÈc4SysUtils¼c4Classes°c4Graphics®c4Controlsvc4Forms(c4Dialogs&c4ComCtrls
c4StdCtrlsc&.THighScoreForm€‡Xt*THighScoreFormˆ0ùå‘ 
HighScoreFormæ>_ÿ‘L .2f 4     Functionsc4  Constantsc(THighScoreForm.CompareDesc€+¼ÓµÝ"!Self!Sender!Item1
!Item2
!Data&"Compare& n1 n2c(THighScoreForm.Parse€0¼Óµ!
"!Self!JournalEntryfø res Datefð Namefè Scorefà SecondsfØ RemovedfÐ Total        Remaining
 PPMfÈ .
 .
 .
 .
c(THighScoreForm.ReadOutJournal€1¼Óµ"!Self ffÁø tmpføc(THighScoreForm.Execute€3¼ÓµÀ"!Self!     LevelNameføc(THighScoreForm.CompareAsc€,¼ÓµÝ"!Self!Sender!Item1
!Item2
!Data&"Compare& n1 n2c(THighScoreForm.CloseBtnClick€-¼Óµ"!Self!Senderc(THighScoreForm.ClearBtnClick€.¼Óµ!"!Self!Senderc(THighScoreForm.ClearLists€2¼Óµz"!Selfc(Finalization€Eóa‚\! "cž(        HighScore€!"cžþGÑ        FTU¡Qz©þ¼&,PageControlá,RemainingTabñ,TimeTab,
RemainingList,ScoreTab!,PPMTab1,TimeListA,     ScoreListQ,PPMLista,CloseBtnq,ClearBtn-CompareDescîi-
CompareAscîé-
CloseBtnClickî
-
ClearBtnClickî,
FLevelName‘-Parseî-ReadOutJournalîÍ-
ClearListsî%-ExecuteîÝcD €ÿÿÿP@lå#L@RS($bøPageControlüRemainingTabTimeTab
RemainingListScoreTabPPMTabTimeList ScoreListPPMListCloseBtn ClearBtnCompareDesc
CompareAsc
CloseBtnClick
ClearBtnClickTHighScoreFormTHighScoreFormL^       HighScoreU‹ìjjSV‹Ù‹u3ÀUh¨dÿ0d‰ ‹C‹ÿRH|f‹F‹ÿRH|[Mü‹Cº‹ÿS‹Eü3Òè‹ØMø‹Fº‹0ÿV‹Eø3Òè;Ãu    ‹E3҉ë;Ã}‹EÇë ‹EÇÿÿÿÿ3ÀZYYd‰h¯EøºèÃéëë^[YY]ÂU‹ì¹jjIuùQSVW‰Uü‹Ø‹Eüè3ÀUhgdÿ0d‰ ‹Uü¸€è‹ðMø3ҋƋ8ÿWMôº‹Æ‹8ÿWM຋Ƌ8ÿW‹Eà3Òè‰EðMܺ‹Æ‹8ÿW‹EÜ3Òè‰EìMغ‹Æ‹8ÿW‹EØ3Òè‰EèMÔº‹Æ‹0ÿV‹EÔ3Òè‹ø+}èÛEðÛEìÞùØ
„è‰Eä3ҋƒ苃‹€,è‹ð‹Uô‹Æè‹F‹Uø‹ÿQ8UЋÇè‹UЋF‹ÿQ8²‹ƒè3ҋƒ苃‹€,è‹ð‹Uô‹Æè‹F‹Uø‹ÿQ8ŰEðè‹ŰF‹ÿQ8²‹ƒè3ҋƒ苃‹€,è‹ð‹Uô‹Æè‹F‹Uø‹ÿQ8UȋEìè‹UȋF‹ÿQ8²‹ƒè3ҋƒ苃‹€,è‹ð‹Uô‹Æè‹F‹Uø‹ÿQ8UċEäè‹UċF‹ÿQ8²‹ƒè3ÀZYYd‰hnEĺèEôºèÃéëÞ_^[‹å]Ãÿÿÿÿ|pBU‹ìÄ(þÿÿS3҉Uü‹Ø3ÀUhÝdÿ0d‰ ‹ÃèEüP‹ƒ$‰…(þÿÿƅ,þÿÿ•(þÿÿ3ɸôè‹Eüè„Àtl‹Uü…0þÿÿ荅0þÿÿèèë(Uü…0þÿÿ荅0þÿÿèè‹Uü‹Ã荅0þÿÿèè„Àtč…0þÿÿèè3ÀZYYd‰häEüèÃéëð[‹å]ÃÿÿÿÿJournal\%s.jnlU‹ìQS‰Uü‹Ø‹Eüè3ÀUhUdÿ0d‰ ƒ$‹Uüè‹Ãè‹Ã‹ÿ’ì3ÀZYYd‰h\EüèÃéëð[Y]ÃU‹ìjjSV‹Ù‹u3ÀUh¨dÿ0d‰ ‹C‹ÿRH|f‹F‹ÿRH|[Mü‹Cº‹ÿS‹Eü3Òè‹ØMø‹Fº‹0ÿV‹Eø3Òè;Ãu   ‹E3҉ë;Ã}‹EÇÿÿÿÿë     ‹EÇ3ÀZYYd‰h¯EøºèÃéëë^[YY]ÂèÃU‹ìƒÄôS3ɉMü‹Ø3ÀUhadÿ0d‰ EüP‹ƒ$‰EôÆEøUô3ɸxè‹Eüè‹Ãè3ÀZYYd‰hhEüèÃéëð[‹å]ÃÿÿÿÿJournal\%s.jnlS‹Ø‹ƒ‹ÿ’Ø‹ƒ‹ÿ’Ø‹ƒ‹ÿ’Ø‹ƒ‹ÿ’Ø[ÃU‹ì3ÀUh%dÿ0d‰ ÿ3ÀZYYd‰h,Ãéëø]Ã-ÃmñQQQUQQQ,¶^`ØdÚÜ\x6¸BDJ¨²R´HX|z~šˆ>Œœž@ ¢¤¦NLªT¬’”–˜n.€024‚„8†ŠFŽfprV:<PZbhjlÖQÙi$é"
(FUU(Q*$i$il¾8¾diàâ8捍
!l¾8¾8¾8¾&
è " "*À0" ",À0" ",À0" ",À0ààâ@Í*Í%HÍ
ÂÄ$îò
 úü
ö

Í      âLÝæÝ(
Í.Ý     âé$él¾8¾déàâ
t
$B
ÂÆ%       âL%z--]-â]®fy
884V\8882
,&*&,&,&,x4>R$<ú
(Z@@N884V
8PH@`‘=’
0
½´

ÁÎ

Åè

É
“ŠªUUUUUU
U U"U$U&U(U*i0,`U,é40¥U0
64éU486ýU6U :><‚U"<Í@>-U$>%B@U&@ÝFDU(DYLmÞq^u^y`}``…d‰d‘•‚™†ˆ¡ˆ¥Š©Š­Š±ŠµŒ¹ŒÑÕ5Ù9áåíñ¡õ¡ù¥ý¥¥­      ­é!ý)
 -9”Œià0u8y8…œuœþ‰ÐyÐþ…Øþ‰Øþ…ê‰ê…òþ‰òþAxp2‘\™z™þ±±)þµ)
½½©þµ©þÁ]Á þŽÅiþÉÉÉþ‘¹    þÍ@aÑ>ÑÝþÝ@2á@á¸þéà0õ8ù8œõœþ     ÐùÐþØþ       Øþê      êòþ      òþ
@
þ@8Ðþ%@))vþ-  a