تحديد البارمتر المرتبط بالEXE

السلام عليكم ورحمة الله وبركاتة

هذة أول مشاركة لى فى منتدى دلفى واحب ان أكون معكم وهذا كود كنت قد بحثت عنة طويلا ولم أجده إلى ان وفقنى الله -سبحانة وتعالى- إلية واحب ان أشارك بة معكم هو كود بسيط لمعرفة الملف المرتبط بسطر الأمر للملف التنفيذى

ومستخدمى فيجوال بيسك يعرفون ذلك بالأمر VBA.Commmand

var
    LeftString: string;
    begin
    LeftString:=CMDLINE; //get command-line
    // remove your exe path from command-line
    Delete(LeftString,1,Length(paramstr(0))+1);
    //get the true path and show it in form caption
    form1.Caption:= LeftString;
    //this code if you get back exe file so you can run it
    WinExec(Pchar(LeftString),SW_SHOWNORMAL);

كما أرجوا من الأخ عروة التصحيح إذا كنت مخطأ فهذة أولى خطواتى

وفقكم الله