mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-11 05:40:45 +01:00
win32: don't reassign already found lWinControl variable by HandleUnicodeChar - use parent lWinControl value (fixes bug #0013044)
git-svn-id: trunk@18448 -
This commit is contained in:
parent
8a512a2cf1
commit
7ce333d91a
@ -1126,7 +1126,6 @@ var
|
||||
begin
|
||||
Result := false;
|
||||
UTF8Char := UTF8Encode(widestring(WideChar(AChar)));
|
||||
lWinControl := WindowInfo^.WinControl;
|
||||
if Assigned(lWinControl) then
|
||||
begin
|
||||
Result:= lWinControl.IntfUTF8KeyPress(UTF8Char, 1, False);
|
||||
|
||||
Loading…
Reference in New Issue
Block a user