Source position: amigados.pas line 2030
function GetProgramName(
buf: PAnsiChar;
len: LongInt
):LongBool;