Состояние кнопки insert (Insert/Overwrite) {------------------------------------------}{ Returns the status of the Insert key. }{------------------------------------------}function InsertOn: Boolean;begin InsertOn := LowOrderBitSet(GetKeyState(VK_INSERT))end; Copyright © "Мастера DELPHI" E-mail: delphi@mastak.com http://www.delphimaster.ru Источник получения информации: http://www.delphimaster.ru
{------------------------------------------}{ Returns the status of the Insert key. }{------------------------------------------}function InsertOn: Boolean;begin InsertOn := LowOrderBitSet(GetKeyState(VK_INSERT))end;