Printable View
سلام دوستان از این به بعد هر کس هر مشکلی ، سوالی ، سورس و ... در رابطه با دی ال ال ( DLL ) ها داشت در این تاپیک قرار مطرح کنه تا همه بتونند راحتتر دسترسی داشته باشند و از تاپیک استفاده کنند ... :31:
سوال اول را خودم دارم ...
1- چطوری یه شرط ساده مثل زیر را از طریق DLL فراخوانی کنم ؟
شرط داخل Button فرم پروژه ام :
;('If edit1.text='123' then showmessage('Good') else showmessage('Sorry
می خوام این شرط را از DLL فرخوانی کنم !!!
لطفا این سوال را توضیح بدید تا سوالات بعدی را مطرح کنم :31::10:
بايد يه تابع با آرگومان ورودي بسازي و بعد تابع رو فراخواني كني.
با اجازه يه مثال مي زنم:
مسلماً آرگومان ورودي اين تابع براي خواسته شما Edit1.Text خواهد بود.کد:ّFunction Proviso_Check(Value:String):Boolean;
Begin
Result:=false;
if value='123' then
ShowMessage('Your Message .....');
Result:=true;
end;
....
Exports Proviso_Check;
به نظرتون همیشه Result=True نیست ؟!!!نقل قول:
ّFunction Proviso_Check(Value:String):Boolean;
Begin
Result:=false;
if value='123' then
ShowMessage('Your Message .....');
Result:=true;
end;
....
Exports Proviso_Check;
بهتره كه زياد به دنبال خطاهاي اين چنين نباشيد، هدف نحوه تعريف يك تابع شرطي در dll بوده كه گفته شدنقل قول:
از همتون ممنونم ولی حالا اگه بخوام سایر توابع را برای سایر اشیاء تعریف کنم چی !!!
مثلا بخوام تایمر 2 را Visible اش را False کنم یا Enabled اش را True و... ؟
یا .... ؟
راستی اگه چند تا Edit داشته باشیم چی تداخل ایجاد نمی شه ؟؟؟
برای اینکه بین چند تا Edit ، Edit هدف را بشه انتخاب کرد باید چکار کرد ؟ مثلا از بین 10 تا Edit میخوام Edit 4 را چک کنم ؟؟؟
برای رفع مشکل چکار کنیم ؟؟؟نقل قول:
به نظرتون همیشه Result=True نیست ؟!!!
شما باید ابجکت مورد نظر را به تابع ارسال کنید.در واقع ارجاع به شی را داشته باشیدنقل قول:
راستی اگه چند تا Edit داشته باشیم چی تداخل ایجاد نمی شه ؟؟؟
برای اینکه بین چند تا Edit ، Edit هدف را بشه انتخاب کرد باید چکار کرد ؟ مثلا از بین 10 تا Edit میخوام Edit 4 را چک کنم ؟؟؟
اولاً دوست عزيز، تايمر خاصيتي به نام Visible نداره كه بخواين True يا False اش كنيد. به هر حال اين كه مشكلي نداره. شما متغير ورودي آرگومان تابعتون رو مي تونيد از نوع TTimer بگيرين. بعد رويداد OnTimer اون را مقدار دهي كنيد.نقل قول:
حالا اگه بخوام ساير توابع را براي ساير اشياء تعريف کنم چي !!!
مثلا بخوام تايمر 2 را Visible اش را False کنم يا Enabled اش را True و... ؟
يا .... ؟
راستش من دقيقاً منظور شما رو نفهميدم. خوب اينم كه مشكل خاصي نداره، آرگومان ورودي تابع شما همان Edit هدف خواهد بود. مگر اينكه آرايه اي از Edit ها داشته باشيد كه اين هم كاري نداره. با ايندكسش بفرسينش به تابع.نقل قول:
راستي اگه چند تا Edit داشته باشيم چي تداخل ايجاد نمي شه ؟؟؟
براي اينکه بين چند تا Edit ، Edit هدف را بشه انتخاب کرد بايد چکار کرد ؟ مثلا از بين 10 تا Edit ميخوام Edit 4 را چک کنم ؟؟؟
فكر نكنم اين موضوع اونقدر هم موضوع مهمي باشه. اگه خيلي مي خواين مطمئن باشين. تابع رو به رويه تغيير بدين كه اصلاً آرگومان خروجي نداشته باشه. من Result رو در آخر برنامه True كردم به اين معني كه تابع شما با موفقيت به پايان رسيده. همين.نقل قول:
به نظرتون هميشه Result=True نيست ؟!!!
نقل قول:ببخشید اشتباه شده بود آخر شبی قاطی کرده بودم !!! :31:نقل قول:
تايمر خاصيتي به نام Visible نداره
می شه یه مثال کلی برای توضیحات بالا بزنید ( لطفا سورس یه پروژه کامل را قرار بدید ) ؟؟؟
یعنی هم بشه چندین تایمر را کنترل کرد و هم هم چندین Edit ( مقادیر Edit ) و.... !!!
اگر می شه یه مثال جامع چه از دی ال ال باشه و چه از فراخوانی آن !!!:46:
سلام. تاپيك جالبيه
لطفا نحوه فراخواني dll به صورت پويا رو هم بگيد. تشكر
سلام
کد:http://www.functionx.com/delphi/dll.htm
کد:http://www.delphi-central.com/dynamicdll.aspx
کد:http://delphi.about.com/od/windowsshellapi/a/dll_basics.htm
فقط این قسمت رو تو یه Begin و End; بزار:نقل قول:
برای رفع مشکل چکار کنیم ؟؟؟
نقل قول:
ShowMessage('Your Message .....');
Result:=true;
آره درسته ... اصلا مهم نیست !!! این همه بحث هم لازم نداره ... فقط خواستم گیرنده ، متوجه این موضوع بشه !!! آخه این جور که شما اول تابع Result=false گذاشتین... من فکر کردم تابع خروجی False هم قرار بده !!!نقل قول:
فكر نكنم اين موضوع اونقدر هم موضوع مهمي باشه. اگه خيلي مي خواين مطمئن باشين. تابع رو به رويه تغيير بدين كه اصلاً آرگومان خروجي نداشته باشه. من Result رو در آخر برنامه True كردم به اين معني كه تابع شما با موفقيت به پايان رسيده. همين.