Source position: keyboard.pp line 35
function FindSequence(
const St: String;
var AChar: Byte;
var Ascan: Byte
):Boolean;