كيف تنفذ Button1Click(Sender) على برامج خارجية

كيف تنفذ Button1Click(Sender) على برامج خارجية - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف تنفذ Button1Click(Sender) على برامج خارجية (/showthread.php?tid=3459)

كيف تنفذ Button1Click(Sender) على برامج خارجية - cargem - 28-09-2011

اود من لدية خبرة افادتنا
الهدف هو عملية نقر زر في برنامج خارجي
هذا المثال عندما يكون الفورم 2 في البرنامج
هذا توضيح لا غير عن هدف السؤال

[صورة: picture0001e.png]

كود :
uses Unit2;

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show;
if Form2.Showing then
    Form2.Button1Click(Sender);
end;

كود :
procedure TForm2.Button1Click(Sender: TObject);
begin
ShowMessage('Gooooooool');
end;