إقتباس :1- مرحبا بك اخي معنا , فقط راجع قوانين المشاركات .
إقتباس :2- مواضيع دات صلة :
Regasm MyDll.dll /tlb:MyLib.tlb
Project->Import Type Library -> Add ->Toolz ->Option ->Library - Translated ->Translated Library Path-> Add ->uses ComObj;// Setting ComVisible to false makes the types in this assembly not visible
// to COM components. If you need to access a type in this assembly from
// COM, set the ComVisible attribute to true on that type.
[assembly: ComVisible(false)]
http://edn.embarcadero.com/article/32754http://atozed.com/CrossTalk/index.en.aspxhttp://msdn.microsoft.com/en-us/library/zsfww439%28VS.71%29.aspx// MyInterface.cs
public interface MyInterface
{
int Add(int i1, int i2);
}
// MyDLL.cs
using System.Runtime.InteropServices;
[ClassInterface(ClassInterfaceType.None)]
public class MyDLL : MyInterface
{
public int Add(int i1, int i2)
{
return i1+i2;
}
}
إقتباس :1- حمل Assembly Registration Tool (Regasm.exe)
2- تحصل على الـ Lib من الـ Dll بهذا الخيار :
PHP كود :Regasm MyDll.dll /tlb:MyLib.tlb
إقتباس :3- الأن من المفترض التحصل على ملف MyLib.tlb , قم بنسخه & MyDll.dll , مثلا و أرفقهما
بالبرنامج j(YourApp)
4- إذا كنت تستخدم دلفي 7 , قم بإظافة الـ TLB من :
كود :Project->Import Type Library -> Add ->
uses ComObj, MyDLL_TLB;procedure TForm1.Button1Click(Sender: TObject);
var
intfRef: MyInterface;
result: Integer;
begin
intfRef := CreateComObject(CLASS_MyDLL_) as MyInterface;
result := intfRef.Add(2, 2);
..
.
end;