где баг?
в нём все операции выполняются посредством комманд вида $open <имя файла>. но функция, которая вычленяет из комманды папраметр возвращает, почему-то, пустую строку.
пример прилагается.
В функции GetParam закомментарь exit .
2. для обрезания пробелов в начале и в конце строки используй Trim
3. по части выцарапывания из строки нужного тебе параметра пользуй I := Pos('$open', S); .... или нечто вроде этого....
4. если тебя интересуют параметры, которые передаются при запуске файла - используй ParamCount и ParamStr