كيف اجعل البرنامج يقبل التعديل على اسم ملف بشرط ؟

[rabihpascal]

كود :

var filename:string; begin if od.execute then filename:=extractfilename(od); if filename<>'config.php'then showmessage('error') else memo1.lines.loadfromfile(filename);