منتدى متعدد المهام

منتدى متعدد المهام في عدة مجالات
 
الرئيسية  البوابةالبوابة  التسجيلالتسجيل  دخولدخول  

شاطر | 
 

 عملية الجمع في دلفي

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
ben taib allaa



عدد المساهمات : 64
نقاط : 182
تاريخ التسجيل : 28/04/2015
الموقع : http://delph.forumalgerie.net

مُساهمةموضوع: عملية الجمع في دلفي    الخميس أكتوبر 20, 2016 7:01 pm


عملية الجمع في دلفي

ضع على الفورم 3
TLabel
ضع على الفورم 3
TButton
ضع على الفورم 3
TEdit

procedure TForm1.Button1Click(Sender: TObject);
var a,b,c : Integer;
begin
a := StrToInt(Edit1.Text);
b := StrToInt(Edit2.Text);
c := a + b;
Edit3.Text := IntToStr(c);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Edit1.Text := ''; Edit2.Text := '';
Edit3.Text := '';
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
Close;
end.
الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://delph.forumalgerie.net
sabire



عدد المساهمات : 75
نقاط : 77
تاريخ التسجيل : 30/09/2016

مُساهمةموضوع: رد: عملية الجمع في دلفي    الإثنين أكتوبر 24, 2016 5:18 pm

شــــــــــــــكرا
الرجوع الى أعلى الصفحة اذهب الى الأسفل
 
عملية الجمع في دلفي
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتدى متعدد المهام :: منتديات عالم الحواسيب الشخصية :: تعلم البرمجة باللغة الدلفي-
انتقل الى: