diff options
author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-11-03 14:53:17 +0000 |
---|---|---|
committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-11-03 14:53:17 +0000 |
commit | d33f56a40d9e8325a2782f90bb253dece5127c5f (patch) | |
tree | 900bf17f151709a17f2371371e7135bcf96357da /src/screens/UScreenEditHeader.pas | |
parent | 2b125425a66f54922e8aaf34c2a616c43f024f11 (diff) | |
download | usdx-d33f56a40d9e8325a2782f90bb253dece5127c5f.tar.gz usdx-d33f56a40d9e8325a2782f90bb253dece5127c5f.tar.xz usdx-d33f56a40d9e8325a2782f90bb253dece5127c5f.zip |
All comments are English now (Polish ones have been translated)
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1498 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r-- | src/screens/UScreenEditHeader.pas | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/screens/UScreenEditHeader.pas b/src/screens/UScreenEditHeader.pas index 5ff3dde5..3678973e 100644 --- a/src/screens/UScreenEditHeader.pas +++ b/src/screens/UScreenEditHeader.pas @@ -275,8 +275,7 @@ end; var Min: integer; Sec: integer; - Tekst: string; - Pet: integer; + Count: integer; AktBeat: integer; begin { glClearColor(1,1,1,1); @@ -294,8 +293,8 @@ begin AktBeat := Floor(CurrentSong.BPM[0].BPM * (Music.Position - CurrentSong.GAP / 1000) / 60); Text[TextDebug].Text := IntToStr(AktBeat); if AktBeat <> LastClick then begin - for Pet := 0 to Czesci[0].Czesc[Czesci[0].Akt].HighNut do - if (Czesci[0].Czesc[Czesci[0].Akt].Nuta[Pet].Start = AktBeat) then begin + for Count := 0 to Czesci[0].Czesc[Czesci[0].Akt].HighNut do + if (Czesci[0].Czesc[Czesci[0].Akt].Nuta[Count].Start = AktBeat) then begin Music.PlayClick; LastClick := AktBeat; end; @@ -314,7 +313,7 @@ begin Text[TextNStart].Text := IntToStr(Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Start); Text[TextNDlugosc].Text := IntToStr(Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Dlugosc); Text[TextNTon].Text := IntToStr(Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Ton); - Text[TextNText].Text := Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Tekst; + Text[TextNText].Text := Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Text; // draw static menu inherited Draw; |