pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

fix find in rxlockupcombo with press Spacebar

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2668 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2013-02-10 14:29:33 +00:00
parent ca816f94e0
commit ea52b268e3
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/rx/rxpopupunit.pas
View File

@ -902,7 +902,7 @@ end;
procedure TPopUpGrid.UTF8KeyPress(var UTF8Key: TUTF8Char); procedure TPopUpGrid.UTF8KeyPress(var UTF8Key: TUTF8Char);
begin begin
inherited UTF8KeyPress(UTF8Key); inherited UTF8KeyPress(UTF8Key);
if UTF8Key>#32 then if UTF8Key>=#32 then
FindNextChar(UTF8Key) FindNextChar(UTF8Key)
else else
if UTF8Key = #8 then if UTF8Key = #8 then