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

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

شاطر | 
 

 كيفية انشاء ملف DLL واستدعائه بدلفي

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


عدد المساهمات : 71
نقاط : 188
تاريخ التسجيل : 25/03/2014

مُساهمةموضوع: كيفية انشاء ملف DLL واستدعائه بدلفي   الأربعاء أكتوبر 01, 2014 1:24 pm

كيفية انشاء ملف DLL واستدعائه بدلفي

بسم الله الرحمن الرحيم

و الصلاة و السلام على رســـول الله

كيفية انشاء ملف DLL بـــ Delphi
واستدعائه بــــبرنامج دلفي Delphi

ملف دي ال ال
---------------------

الكود:


procedure Button1Click(Sender: TObject);  // Procedure begin
private
// Déclarations privées
public
// Déclarations publiques
end;  // end

var
Form1: TForm1; // form1 = tforl1

function Addition(a1,b1: integer): integer; // Addition = integer
external 'TestDLL1.dll'; // dll

implementation

{$R *.dfm} // dfm

procedure TForm1.Button1Click(Sender: TObject);  // Procedure begin
var
x, y: integer; // y,y = integer
j: integer; // j = integer

begin
x := StrToInt(Edit1.Text); // x = Edit1.Text
y := StrToInt(Edit2.Text); // y = Edit2.Text
j := Addition(x, y);   // j = Addition x y
Label1.Caption := IntToStr(j);  // Label1.Caption = j

end;  // Procedure end

end.  // end

أرجو زيارة المنتدى
-----------------------
delph.forumalgerie.net

لـــنقل هذه المواضيع أرجـــــــــــــو منكم ذكر رابط المنتدى
الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://defl.yoo7.com
 
كيفية انشاء ملف DLL واستدعائه بدلفي
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

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