https://dropcode.ru/thread/kak-preobrazovat-bitovye-operatory-iz-java-v-delphi