ربط الازرار بزر واحد

[erorr]

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

انشئت برنامج بلغة الدلفي يحمل لنفترض 3 ازرار وكل زر يقول بانشاء سورس كود مختلف , كيف تجميع الثلاث ازرار ( بزر واحد فقط ) والزر الواحد ان ضغطت علية يقول ( بانتاج سورسات مختلفة ) حسب الـ 3 ازرار اللتي انشئتها مسبقا .
علما بان كود زر الضغط هو كالتالي :

كود :

memo1.Lines.SaveToFile('Project2.dpr'); memo2.Lines.SaveToFile('functions.pas'); memo3.Lines.SaveToFile('cazanova.bat');