Как узнать что с помощью моей программы пытаются открыть файл и как получить имя (полное) этого файла?
Категория: Delphi/Pascal
2013-02-05 14:34:46
code: #delphi
if ParamCount()=1 then begin FileName := ParamStr(1); end else if ParamCount()=2 then begin Command := ParamStr(1); FileName := ParamStr(2); end else FileName:='';
автор: Vovan-VE
Поделиться: