+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف تنفيذ زر Button تلقائيا بعد وقت محدد (/showthread.php?tid=5911)
كيف تنفيذ زر Button تلقائيا بعد وقت محدد - sky19 - 01-02-2014
السلام عليكم
عندي زرين Button 1 & 2
كيف اعمل Procedure حيث الزر 1 انا من يضغط عليه يجعل الزر 2 ينفذ تلقائيا بعد وقت احدده ماذا افعل ؟
كيف تنفيذ زر Button تلقائيا بعد وقت محدد - noor.aldeen.sha - 02-02-2014
تستطيع ذالك من خلال وضع تايمر و عنصر اديت و زرين
ملاحظه: اعط للعنصر اديت القيمه الافتراضيه "1" و الباقي مرفق كمثال مع الشرح
كيف تنفيذ زر Button تلقائيا بعد وقت محدد - sky19 - 02-02-2014
هل يوجد حل اخر بدون مكون تيامير
كيف تنفيذ زر Button تلقائيا بعد وقت محدد - ALmuhhnad - 02-02-2014
في الحقيقة لم ارى جواب الاخ noor.aldeen.sha
لكن إليك طرقتي وهي من خلال إستعمال دوال WinAPI :
PHP كود :
unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
IdFunction : Cardinal;
implementation
{$R *.dfm}
procedure PressNextButton();
begin
Form1.Button2Click(Form1.Button2);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Caption := '1';
IdFunction := SetTimer(0,0,4000,@PressNextButton)
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
form1.Caption := '2222' + Form1.Caption;
KillTimer(0,IdFunction)
end;
end.
إن اشكل عليك شيء تفضل بالسؤال
كيف تنفيذ زر Button تلقائيا بعد وقت محدد - sky19 - 02-02-2014
مشكور على الإفادة مشكور على الإفادة مشكور على الإفادة good
كيف تنفيذ زر Button تلقائيا بعد وقت محدد - ALmuhhnad - 02-02-2014
العفو ..
لكن لماذا لا تكتب الاجابة التي حصلت عليها بالمنتديات الاخرى التي قمت بطرح السؤال بها كي تعمل الفائدة اكثر
كيف تنفيذ زر Button تلقائيا بعد وقت محدد - sky19 - 03-02-2014
[quote=ALmuhhnad]العفو ..
قمت بطرح السؤال
كيف تنفيذ زر Button تلقائيا بعد وقت محدد - karika2 - 04-02-2014
http://arabteam2000-forum.com/index.php/topic/285913-%D8%B3%D8%A4%D8%A7%D9%84-%D8%AD%D9%88%D9%84-%D8%A8%D8%B1%D9%85%D8%AC%D8%A9-%D8%A7%D9%84%D8%A3%D8%B2%D8%B1%D8%A7%D8%B1/