Parameter vorhanden

Sie benötigen die Funktion in diesem Artikel (http://www.howtodothings.com/ViewArticle.aspx?Article=760), um diese ordnungsgemäß funktioniert

Funktion ParamExists (const paramname: string): Boolean;
var
S: string;
beginnen
Result: = GetParameterValue (paramname, ['/','-'], ':', S);
end;