HomeWork_07 تمرين تطبيقي

[STRELiTZIA]

بسم الله الرحمن الرحيم
في المرفق حل التمرين بما يخص استعمال Plugin لـــ AT4RE FastScanner مع حماية الأوامر من الاستثناءات exceptions باستعمال try و finally و وضع بعض الفحوص الأساسية و إنشاء فورم Main و أخرى لعمل About.
---------

تعقيب على حلول الإخوة الأعضاء الكرام.

أخي djug :
- حل صحيح و عمل ممتاز بما يخص الــ Plugin

أخي Goblin :

يقوم بجمع Edit1.Text و Edit2.Text داخل Procedure من خلال ال Dynamic Dll.
فماذا افعل

الاجابة على سؤالك :
تصحيح ملف المكتبة

PHP كود :

function AdditionOperation(a, b : integer): integer; stdcall;
begin
Result := a + b ;
end; 


تصحيح الاستدعاء

PHP كود :

var ProcessHandle : THandle;
AdditionOperation : function (a, b : integer): integer; stdcall;
begin
if RadioButton1.Checked then
begin
ProcessHandle := Loadlibrary('SimpleDllCalc.dll');
@AdditionOperation := GetProcAddress(ProcessHandle,'AdditionOperation');
Edit3.Text := AdditionOperation(StrToInt(Edit1.Text), StrToInt(Edit2.Text));
FreeLibrary(ProcessHandle);
end ; 


أخي tf6 غير مهبول
حل صحيح بما يخص التعامل مع المكتبة.... أين حل الــ Plugin ؟

اخي Dr MOT :
حل كامل و جيد أيضا.

------

إليكم سؤال دون أن تقوموا بالتجربة...
أين الصحيح في كتابة الاستعداء التالية للمكتبة ؟

PHP كود :

LoadLibrary(‘Test.dll’) 


او

PHP كود :

LoadLibrary(‘Test’)