Source position: amigados.pas line 2533
function GetCliProgramName(
Buf: PChar;
Len: LongInt
):LongInt;