رسائل في دلفي

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

رسائل في دلفي

مُساهمة  alla23 في الثلاثاء أكتوبر 25, 2016 9:41 am

رسائل في دلفي

ضع على النموذج أو الفورم 2 أزرار

انقر على الفورم واكتب تالي :

procedure TForm1.FormCreate(Sender: TObject); // .......
begin
Form1.Position := poScreenCenter; // ........
Form1.Height := 200; //........
Form1.Width := 350; // ........
Form1.Caption := 'رســـــالـة'; // ............

Form1.Button1.Left := 30; // ........
Form1.Button1.Top := 50;// ...........
Form1.Button1.Height := 30; // .....
Form1.Button1.Width := 90; //
Form1.Button1.Caption := 'انقر هنا'; // .....

Form1.Button2.Left := 205; // .......
Form1.Button2.Top := 100; // ...........
Form1.Button2.Height := 30; // ........
Form1.Button2.Width := 105; // .......
Form1.Button2.Caption := 'خروج '; // .........

end; // ....

// انقر على زر الاول
procedure TForm1.Button1Click(Sender: TObject); // .....
begin // ....
// اكتب تالي
// عند نقر تظهر رسالة
ShowMessage('السلام عليكم '); // ...
end; // ....
// ......
// انقر على زر الثاني
procedure TForm1.Button2Click(Sender: TObject); // .....
begin // ...
// اكتب تالي
Close; // .......
end; // ....

alla23
عضو ذهبي
عضو ذهبي

عدد المساهمات : 66
نقاط : 182
تاريخ التسجيل : 26/05/2013
الموقع : http://delph.forumalgerie.net

http://delph.forumalgerie.net

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى