aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-10-26 17:01:42 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-10-26 17:01:42 +0000
commit36116a91476fbeae5c70e877f67cced72ca05356 (patch)
tree044fca28d8651e34cc18e61f423a339f8bfa5013 /Game/Code
parentbd869ae129f42fbe2489f1f9ecf333af4dd7195a (diff)
downloadusdx-36116a91476fbeae5c70e877f67cced72ca05356.tar.gz
usdx-36116a91476fbeae5c70e877f67cced72ca05356.tar.xz
usdx-36116a91476fbeae5c70e877f67cced72ca05356.zip
Improved ability to edit notetext a little bit.
Text is now changed in Lyrics view immediately Add ability to write the 'tilde' (~) in editors textinput on QWERTY and QWERTZ keyboards git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.01@531 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--Game/Code/Classes/ULyrics.pas6
-rw-r--r--Game/Code/Screens/UScreenEditSub.pas6
2 files changed, 11 insertions, 1 deletions
diff --git a/Game/Code/Classes/ULyrics.pas b/Game/Code/Classes/ULyrics.pas
index c3b440bc..105f36d1 100644
--- a/Game/Code/Classes/ULyrics.pas
+++ b/Game/Code/Classes/ULyrics.pas
@@ -70,6 +70,7 @@ type
property FontStyle: integer write SetFStyle;
procedure AddWord(Text: string);
procedure AddCzesc(NrCzesci: integer);
+ procedure ChangeCurText(Text: String);
function SelectedLetter: integer; // LCD
function SelectedLength: integer; // LCD
@@ -380,4 +381,9 @@ begin
Result := Length(Word[SelectedI].Text);
end;
+procedure TLyric.ChangeCurText(Text: String);
+begin
+ Word[Selected].Text := Text;
+end;
+
end.
diff --git a/Game/Code/Screens/UScreenEditSub.pas b/Game/Code/Screens/UScreenEditSub.pas
index 9ca45f55..ee95906a 100644
--- a/Game/Code/Screens/UScreenEditSub.pas
+++ b/Game/Code/Screens/UScreenEditSub.pas
@@ -574,15 +574,19 @@ begin
// Exit Text Edit Mode
TextEditMode := false;
end;
- SDLK_0..SDLK_9, SDLK_A..SDLK_Z, SDLK_SPACE, SDLK_MINUS, SDLK_EXCLAIM, SDLK_COMMA, SDLK_SLASH, SDLK_ASTERISK, SDLK_QUESTION, SDLK_QUOTE, SDLK_QUOTEDBL:
+ SDLK_0..SDLK_9, SDLK_A..SDLK_Z, SDLK_SPACE, SDLK_MINUS, SDLK_EXCLAIM, SDLK_COMMA, SDLK_SLASH, SDLK_ASTERISK, SDLK_QUESTION, SDLK_QUOTE, SDLK_QUOTEDBL, SDLK_RIGHTBRACKET, SDLK_HASH:
begin
Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Tekst :=
Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Tekst + chr(ScanCode);
+
+ Lyric.ChangeCurText(Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Tekst);
end;
SDLK_BACKSPACE:
begin
Delete(Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Tekst,
Length(Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Tekst), 1);
+
+ Lyric.ChangeCurText(Czesci[0].Czesc[Czesci[0].Akt].Nuta[AktNuta].Tekst);
end;
SDLK_RIGHT:
begin