paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 04:39:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

Gtk2: make selstart for GtkEntry setting consistent with other ws. issue #11802

Browse Source 
git-svn-id: trunk@35596 -
This commit is contained in:
zeljko 2012-02-26 09:59:33 +00:00
parent fc35b838ef
commit 9f7ab89220
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/interfaces/gtk2/gtk2wsstdctrls.pp
View File

@ -1277,7 +1277,8 @@ begin
if not WSCheckHandleAllocated(ACustomEdit, 'SetSelStart') then if not WSCheckHandleAllocated(ACustomEdit, 'SetSelStart') then
Exit; Exit;
Entry := PGtkEntry(ACustomEdit.Handle); Entry := PGtkEntry(ACustomEdit.Handle);
if GetSelStart(ACustomEdit) = NewStart then exit; // make gtk2 consistent with others. issue #11802
// if GetSelStart(ACustomEdit) = NewStart then exit;
if Entry^.text_max_length > 0 then if Entry^.text_max_length > 0 then
NewPos := Min(NewStart, Entry^.text_max_length) NewPos := Min(NewStart, Entry^.text_max_length)