https://dropcode.ru/thread/kak-proverit-tip-peremennoi-v-delphi