PDA

View Full Version : ساخت Dll


UpgradeVB6Code
پنج شنبه 24 آبان 1386, 16:05 عصر
سلام به همه
من یه کلاس نوشتم چه جوری میتونم اونو به Dll تبدیل کنم ؟
ممنون
UpgradeVB6Code
جمعه 25 آبان 1386, 12:17 عصر
نمیدونم چرا کسی کمک نمیکنه

حالا من برای شروع یه آموزش برای ساخت اکتیوکس میزارم شاید یکی هم آموزش ساخت Dll رو گذاشت !!!
لطفا
مبین رنجبر
جمعه 25 آبان 1386, 12:30 عصر
موقعی که VB رو بالا میاری .. توی صفحه New Project اینو بزن : ActiveX DLL ... بعد یه صفحه شبیه Class باز می کنه و کد هایی که توی کلای که ساختی نوشتی اینجا بنویس .. بعد برو تیو فایل بزن : Make Project.dll ... فایل Dll بعد از رجیستر شدن آماده هست واسه استفاده ............. همین
UpgradeVB6Code
جمعه 25 آبان 1386, 13:23 عصر
سلام
ممنون بابت جواب
اما من هم دقیقا همین کار میکنم اما نمیشه
این یه کلاس کوچیک هستش که من وقتی اونو توی یه کلاس به پروژه اضافه میکنم جواب میده اما به صورت Dll جواب نمیده
میشه شما هم یه نگاه کوچیک بهش بندازید !
مبین رنجبر
جمعه 25 آبان 1386, 13:46 عصر
می دونی اشکال کارت کجاست ؟ توی تعریف DLL از اسم خود DLL استفاده کردی .. این غلطه .. توی تعریف DLL باید از نام پروژه DLL استفاده کنی ... اینجوری :

DIM AA As New Class1

Msgbox AA.Name
UpgradeVB6Code
جمعه 25 آبان 1386, 14:32 عصر
آقا واقعا لطف کردی خیلی وقت بود سره این گیر بودم
فقط یه سوال ما باید نام پروژه Dll رو بنویسیم پس چرا اسم خود Dll تو لیست هست ؟
این اسم جایی استفاده میشه ؟
مبین رنجبر
جمعه 25 آبان 1386, 14:43 عصر
آره دوست عزیز این اسم استفاده می شه ... از هر دوی این اسم می شه استفاده کرد .. اما کدی که من گفتم 1 خطی بود اما اگر می خوای از اسم DLL استفاده کنی دیگه از کلمه کلیدی New نباید استفاده کنی و 1 خط دیگه باید کد بنویسی و اون هم قرار دارن اسم پروژه DLL با استفاده از کلمه Set هست ... همین روشی که من گفتم بهترین روش واسه استفاده از DLL در پروژه هست ....
UpgradeVB6Code
جمعه 25 آبان 1386, 16:04 عصر
آهان یادم اومد آره قبلا که از Dll استفاده میکردم از این دو روش برای استفاده از Dll استفاده میکردم !
UpgradeVB6Code
جمعه 25 آبان 1386, 17:53 عصر
انگار من اشتباه متوجه شدم
این که جواب نداد
Private Sub Command1_Click()
Dim a As TestDll
Set a = New Class1
MsgBox a.Name
End Sub
این جواب میده

Private Sub Command1_Click()
Dim a As Class1
Set a = New Class1
MsgBox a.Name
End Sub
میشه یه مثال کوچیک از استفاده دو خطی بزنی !
مبین رنجبر
جمعه 25 آبان 1386, 18:47 عصر
شرمنده ... اون 2 خطی رو Syntax اش یادم نیست ولی برای New کد های زیر و بیین :

بدون New :

Dim A As TestDll.Class1

با New :

Dim A As New Class1

در ضمن این 2 تا دستور بالا هیچ فرقی با هم نداره .. اگر با هم هم استفاده کنی مشکلی نیست :

Dim A As New TestDll.Class1
hamed_arfaee
جمعه 25 آبان 1386, 19:42 عصر
با سلام
به لینک زیر حتما سر بزنید
آموزش ساخت دی ال ال استاندارد
http://forum.iranled.com/showthread.php?tid=5833
UpgradeVB6Code
جمعه 25 آبان 1386, 19:57 عصر
از همه دوستان ممنونم