Parametro esiste

È necessario la funzione in questo articolo (http://www.howtodothings.com/ViewArticle.aspx?Article=760) per arrivare a questo funziona correttamente

funzione ParamExists (const ParamName: string): Boolean;
var
S: string;
iniziare
Risultato: GetParameterValue = (ParamName, ['/','-'], ':', S);
fine;