| # | Line 640 | Line 640 | end; | |
|---|---|---|
| 640 | {$ifend} | |
| 641 | ||
| 642 | {$if lcl_fullversion = 2000002} | |
| 643 | < | procedure UTF8KeyPress(var UTF8Key: TUTF8Char); override; |
| 643 | > | procedure TIBLookupComboEditBox.UTF8KeyPress(var UTF8Key: TUTF8Char); |
| 644 | begin | |
| 645 | if DataSource = nil then | |
| 646 | < | THackedCustomComboBox(self).UTF8KeyPress(UTF8Key) |
| 646 | > | THackedCustomComboBox(self).CallUTF8KeyPress(UTF8Key) |
| 647 | else | |
| 648 | inherited; | |
| 649 | end; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |