Состояние кнопки Insert

function InsertOn: Boolean;
begin
  
 
  Result:=LowOrderBitSet(GetKeyState(VK_INSERT));
end;

Источник: https://dmitry9.nm.ru/info/

Исправлено by Vit