با امید به خدا می خوام دوباره شروع کنم .

اما از این به بعد سعی می کنم زود تر ولی حداکثر هفته ای دو سه لاگ جدید بفرستم .

موفق باشید .

اگه موضوع خواصی در مورد دلفی سوال دارید بپرسید شاید تونستم جواب بدم .

یا حق

بالا |+| نوشته شده توسط محمود آزادی در چهارشنبه نهم خرداد 1386 | موضوع:  

بچه ها بعید می دونم دیگه اینجا پست بدم . شایدم زد به سرم دوباره شروع کردم.

ولی در کل همگی موفق باشید

آیدی من تو یاهو اینه اگه کسی کاری داشت پیام بده .

yahooID : liberty_ir@yahoo.com

بالا |+| نوشته شده توسط محمود آزادی در یکشنبه هشتم بهمن 1385 | موضوع:  

کرک برنامه SUIPACK 5 یا همون نگارش 5 برای زبان دلفی

توضیحات SUIpack تو همین وبلاگ هست .

اینم لینک تو سایت اصلی کرک . : در صورت اینکه از دلفی۵-۱۰ استفاده می کنید :.

http://www.easycracks.net/d2.php?n=285151
اینم لینک کمکی رو فضای شخصی خودم :

http://www.4shared.com/file/2797518/20be3fe6/suipack584fordelphi567910patch.html

در صورتی که از زبانهای مثل BC یا همون سی بولدر استفاده می کنید می تونید وارد سایت زیر شده و کلمه SUIPACK رو جستجو کنید و بعد لینک مربوط به BC که با کلمه BC متمایزه رو انتخاب کنید . http://www.easycracks.net

توضیح نصب .::::.

برای کرک به پوشه نصب برنامه برید و فولدر مربوط ب ورژن دلفی خودتون رو از داخل فولدر های کرک انتخاب کنید . و داخل فولدر Source  درون فولدر مخصوص همان ورژن بریزید .

بالا |+| نوشته شده توسط محمود آزادی در دوشنبه نهم مرداد 1385 | موضوع:  

اول از همه بگم بی خود این لینک رو دانلود نکنید یه لینک سفارشیه به دردتون نمی خوره .

بعدم اینکه منتظر باشید تا سرم خلوت بشه که حسابی براتون برنامه نوشتم خدا . ولی وقت ندارم آپش کنم

لینک دانلود پروژه :

http://www.4shared.com/file/2731465/7f57f8d6/empitypropject.html

لینک فایل توضیح پروژه فایل ورد:

http://www.4shared.com/file/2731642/d081db99/librarystract.html

تا بعد .....

بالا |+| نوشته شده توسط محمود آزادی در پنجشنبه پنجم مرداد 1385 | موضوع:  

بعد یک وقفه طولانی حالا نوبت به آموزش بعدی میرسه . در این قسمت قصد توضیح در مورد کلاس نقاشی یا ( Class TCanvas ) می رسیم .

کلاس نقاشی ( Class TCanvas ) :

در این کلاس متدها و روالهای متعددی وجود دارد ( Function And Procedure ) شما با استفاده از این روالها و دستورات به راحتی می توانید به طراحی و ترسیم بپردازید . این کلاس که معمولا در بخش گرافیک کامپیوتری و ترسیمات مورد استفاده قرار می گیرد امکانات متعددی را برای ایجاد ترسیمات دلخواه و حتی ایجاد کامپوننتهایی با اشکال مختلف در اختیار شما قرار می دهد . و ما در این بخش شما را با اجزای مختلف این کلاس آشنا می سازیم . که به علت فراوانی دستورات و پروسه ها این آموزش را در 3 درس ارائه می دهیم .

درس اول ***

چگونگی استفاده از TCanvas :

این کلاس که از کلاسهای درونی دلفی محسوب می شود معوملا در بعضی از کلاسهای گرافیکی مورد استفاده قرار می گیرد ولی در کل شما در مواردی مانند ترسیمات کامپوننتها و حتی در مواردی همچون آبجیکت های TLabel , TForm , TListBox , .... نیز برای انجام ترسیمات در اختیار شما قرار گرفته است .
در اینجا نوبت به چگونگی دست رسی به این کلاس می رسد :
استفاده درون اشیاء آماده :
اگر از اشیا خود دلفی و یا از کلاسهای دارای این کلاس درونی استفاده می کنید ، می توان گفت که برای دست رسی در اکتر مواقع مشخصه یا Property به نام Canvas در اختیار شما قرار دارد که شما با استفاده از این مشخصه می توانید همانند مشخصه های دیگربه زیر روال ها و متدهای این کلاس دست رسی پیدا کنید . مانند روشهای زیر :

Label1.Canvas.Refresh();
Image1.Canvas.Refresh();
ListBox1.Canvas.Refresh();

همانطور که در بالا مشاهده می کنید با استفاده از نام یک شی ( Object ) به راحتی می توان به کلاس زیرین نقاشی آن دست پیدا کرد . البته به شرط وجود و توانایی دست رسی به آن .
پس از دست رسی به مشخصه نقاشی ما احتیاج به دست رسی به صفت ها ، مشخصه ها و دستورات درونی مشخصه می باشیم . برای این کار کافیست تا با زدن نقطه پس از نام مشخصه Canvas به لست متدها و روالهای آن دست رسی پیدا کنید . همانند مثال بالا که علامت نقطه با رنگ قرمز مشخص شده است .

ایجاد و ساخت کلاسهای دلخواه :
برای ایجاد کلاسهای دلخواه برای دست رسی به اشیاء و محیطهای دلخواه به صورت زیر عمل می کنیم .
1- ابتدا یک متغییر از نوع کلاس TCanvas تعریف می کنیم . که این متغییر بسته به نیاز ما می تواند سراسری و یا درونی باشد .  در اینجا به یک مثال توجه کنید که تا انتها در مراحل بعد نیز با همین مثال پیش می رویم :

Var
   ADesktop:TCanvas;

2- پس از تعریف متغییر در اینجا نوبت به ساخت و تخصیص حافظه به متغییر می رسد . توجه کنید که اگر بدون ساخت یک متغییر قصد استفاده از آن را داشته باشید با خطای هین برنامه با پیام عدم درسترسی به محافظه بر خورد می کنید .  برای این کار مجدد از کلاس TCanvas استفاد می کنیم . همانند مثال

Var
   ADesktop:TCanvas;
begin
  ADesktop := TCanvas.Create;
...
End;

3- در این قسمت می بایست دسته یا دستگیره Handel متغییر را به یک کنترل نصبت بدهیم تا بتوانیم از آن کنترل استفاده کنیم . این کار معمولا با استفاده از Function به نام GetDC صورت می پذیرد . به طور مثال م قصد دست یابی به کنترل دسکتاپ Desktop را داریم تا بر روی آن طراحی انجام دهیم . با توجه به مثال بالا این چنین عمل می کنیم.
نکته : Handel یا HWND ها شماره های خاصه هر کنترل یا پنجره می باشند که سیستم عامل با توجه به آنان به اشیاء دست رسی پیدا می کند . به طور مثال دست گیره صفحه دسکتاپ ( 0 ) صفر و یا برای دستیابی به دستگیره Form1 از Form1.Handel استفاده می کنیم . برای راهنمایی بیشتر می توانید از راهنمای خود محیط دلفی استفاده کنید . کافیست تا کلمه را تایپ کرده و کلیدهای CTRL+F1 را فشار دهید .

...
ADesktop.Handel :=  GetDC(0);
....

حال کلاس شما آماده برای استفاده می باشد . شما می توانید با استفاده از زیر روالها و متدهای درونی متغییر تعریف شده به طراحی بپردازید .

توجه به این نکته ضروریست که پس از اتمام کار با متغییر حتما فضای اختصاص یافته به متغییر را رها کنید همانند زیر .

....
ADesktop.free;
End

برای دریافت اینکه چگونه می توانید عملیات ترسیمی را انجام دهید می بایست تا ارسال بعد منتظر بمانید یا اینکه با استفاده از راهنمای مشخصه های خود دلفی با استفاده از کنجاوی خودتان به انجام این کار بپردازید .

تا ارسال بعد منتظر بمانید .

بالا |+| نوشته شده توسط محمود آزادی در جمعه شانزدهم تیر 1385 | موضوع: آموزش دلفی و برنامه نویسی  

سلام دوستان :

این مبحث رو به مبحث درس ساختمان داده اختصاص دادم و اینکه چگونه بررسی کنیم که دو شئ چگونه با هم برخورد می کنند و چگونه الگوریتمی برای آن به کار ببریم تا به صحت ابن موضوع دست پیدا کنیم. 

این اگوریتم معمولا برای درست کردن بازی به کار میره یا صحت وجود موس بر روی یک شی Object .

اشیای چهار گوش Rectangle Objects:

وقتی دو شی چهار گوش با هم بر خورد می کنند یکی از حالتهای زیر به وجود می آید :

1. یکی از نقاط چهار گوشه دو شی درون شی دیگر قرار گیرد .

2. یکی از اضلاع اشیاء بر هم مماس باشند .

3. یکی از دوشکل به طور کامل درون شی دیگر قرار بگیرد .

در این حالت ما با اگوریتمهای متفاوتی بر خورد می کنیم

در حالت اول برای بررسی درون گرایی می بایست نقطه مورد نظر را با حالتهای زیر بررسی کنیم که آیا نقطه داده شده درون چهار چوب ما قرار دارد یا خیرو آیا نقطه داده شده شرایط زیر را دارد :

1. مختصات سمت چپ وبالای شی دوم از مختصات سمت چپ وبالای شی اول کوچکتر باشد

2. مختصات سمت راست وبالای شی اول از مختصات سمت چپ وبالای شی دوم بزرگتر باشد

3. مختصات سمت ر است وپایین شی اول از مختصات سمت چپ وبالای شی دوم بزرگتر باشد

4. مختصات سمت چپ وبالای شی دوم از مختصات سمت چپ وپایین شی اول بزرگتر باشد

در این حالت می توان گفت که شی دوم نقطه داده شده را در خود جای داده و تصادف رخ داده است . یادتان باشد که این نقطه می تواند هر نقطه دلخواه دیگری برای بررسی باشد

در حالت دوم برای بررسی تصادف به صورت مماس می بایست یک نقطه از نقاط اضلاع را انتخاب کردهو  نقطه مورد نظر را با حالتهای زیر بررسی کنیم که آیا نقطه داده شده برروی چهار چوب ما قرار دارد یا خیرو آیا نقطه داده شده شرایط زیر را دارد :

نقطه انتخاب شده را همانند بالا و با شرایط بالا برسی می کنیم با این تفاوت که نقطه داده شده در صورت مساوی بودن با خطوط مورد بررسی قرار می گیرد 

در حالت سوم برای بررسی تصادف به صورت درون گرایی کامل می بایست یک نقطه از نقاط اضلاع را انتخاب کرده و  نقطه مورد نظر را با حالتهای زیر بررسی کنیم که آیا نقطه داده شده درون چهار چوب ما می باشد :

1. در ابتدا می بایست این موضوع را مد نظر بگیرید که اگر بزرگ را با شی کوچک مقایسه کنید جواب همیشه منفی . بنابر ای ن در ابتدا بررسی کنید که شی کوچکتر از شی دوم باشد

2. در مرحله بعد یک نقطه را  از شئ دوم انتخاب کنید و سپس آن را مانند مراحل قبل مورد بررسی قرار دهید .

خوب اینم الگوریتم مقایسه که دو متغییر ر به عنوان ورودی دریافت کرده که یکی از نوع TPoint  و دیگری از نوع TRect می باشد . این الگوریتم برنامه مختصات یک نقطه را گفته و با جعبه که به آن داده شده مقایسه می کند . که آیا نقطه درون حعبه می باشد یا خیر . (حالت اول و دوم)

function InRect(Value:TPoint;Arect:TRect ):Boolean ;
begin
with Value,Arect do
begin
 Result :=
 ((X >= Left) and (Y >= Top))
and
 (( X <= Right) and (Y >=Top))
and
 (( X >= Left) and (Y <= Bottom))
and
 (( X <= Right) and (Y <= Bottom));
end;
end;

این الگوریتمم برسی برای اینه که ببینه دوتا باکس با هم برخورد کردند یا خیر . بدین نحو که بررسی نقاط اصلی چهار گوشه شی داده شده را با جعبه مورد نظر بررسی می کند .

function BoundsInRect(Value,Arect:TRect):Boolean;
var
r2:Boolean ;
begin
r2 := inrect(Point(Value.Left,Value.Top),Arect);
r2 := R2 or inrect(Point(Value.Right,Value.Top),Arect);
r2 := R2 or inrect(Point(Value.Right ,Value.Bottom),Arect);
r2 := R2 or inrect(Point(Value.Left,Value.Bottom),Arect) ;
Result := r2 ;
end;
 

بقیه اشکالم اگر شد و وقت کردم الگوریتم شون رو در میارم و براتون ارسال می کنم .

و بازم مثل همیشه اگر مشکلی بود با من تماس بگیرید . شماره ارتباط منو می تونید از بخش درباره ما به دست بیارید . اگر سوال مهمی داشتید با دفتر موئسسه تماس بگیرید و پیغام بزارید. !

تا چند روز آینده با 3 گیم جدید که با همین الگوریتم نوشته شده آشناتون می کنم .

بالا |+| نوشته شده توسط محمود آزادی در شنبه سیزدهم خرداد 1385 | موضوع:  

سلام دوستان :

دیدم مثل اینکه خیلی ها از شمایل پیش فرض Form ویندوز خسته شدند و دلشون می خواد که در پنجره دلخواه خودشون و با شرایط خودشون کار کنن .  خیلی ها با برنامه هایی مثل یاهو مسنجر ( Yahoo messenger ) و ویندوز مدیا پلیر ( Windows Media Player ) آشنا هستید . شاید دلتون بخواد برنامه هایی که می نویسید دارای چنین قابلتی باشد . یعنی بتوان اسکین Skin برنامه رو به صورت دلخواه  خودتون و کاربران برنامه ها تون تغییر بدهید  و دیگه داخل محیط خشک و چهار چوب یکنواخت محیط ویندوز قرار نگیرند .

خوب من بهتون یک جعبه مئلفه Component Pack برای استفاده در محیطهای دلفی با ورژنهای متفاوت معرفی می کنم . تا کار شما رو راحت تر کنم . هرچند برای این کار شما روشهای متفاوتی برای انجام محدود کردن و تغییر شکل ظاهری پنجره ها پیش رو دارید ولی من این برنامه و سرویس رو بهتون معرفی می کنم .

سرویس پک 5 ویا بالاتر شرکت sunisoft :

این سرویس که ورژن اصلی آن با قیمت هنگفتی در بازار به فروش می رسد وحتی ورژن های کرک شده آن نیز دارای قیمت و ارزش فراوانی در کشور ماست ، بر روی وب سایت ( Web Site ) شرکت SUI با سوریس بسته و بدون سروس با ورژن آزمایشی Trial قابل دانلود است اگر زرنگ باشید که کرک این برنامه هم تحت شبکه یافت خواهید کرد ولی بازهم این برنامه در فایل های اجرایی بدون پیغام ظاهر می شود و شما می توانید از آن استفاده کنید . در ورژن Trial کرک Crack نشده شما هنگام اجرای برنامه با یک پیغام معرفی شرکت سازنده مواجه می شید و شما با زدن دکمه OK به اجرای ادامه برنامه میپردازید . البته باز هم ذکر کنم که این پیام پس از کامپایل Compile و اجرای فایل اجرایی دیگر به نمایش در نمی آید . یعنی به شما اجازه داده شده تا برنامه را حتی برای مصرف تجاری نیز استفاده کنید  .

مزایای برنامه :

1.  استفاده آسان و تغییر شکل ظاهری آسان فرم :
   از مزایای  این برنامه قابلیت آسان استفاده و فراوانی کامپننتها می باشد . در این برنامه شما می توانید شکل ظاهری دلخواه برای برنامه های خود را  ایجاد کنید  یعنی حتی می توانید خارج از چهار چوب برنامه ها حتی با درج یک تصویر ساده شکل برنامه خود را به شکل تصویر تغییر دهید یعنی دیگر احتیاجی به برنامه نویسی برای تغییر شکل ظاهری برنامه نیست و حتی برنامه به صورت خودکار کادر اطراف را پاک کرده و به شما قابلیت جابه جایی فرم را نیز می دهد . حتی بدون نوشتن یک خط برنامه . همانطور که در شکل می بینید .

2. استفاده از قالبهای مختلف و توانایی تغییر قالب در هنگام اجرا :
   یکی دیگر از قابلیتهای جالب برنامه و پکت استفاده راحت از سازنده قالب و حتی اجازه ساخت قالب به کاربر می باشد .   این امر به نویسندگان این اجازه را می دهد که دیگر بدون نیاز به تغییرات زیاد در روند کلی برنامه و شکل ضاهری آن تنها با استفاده از یک فایل که به همراه سورس ارسال می شود به تغییر شکل ظاهری برنامه بپردازند یعنی شما می توانید به راحتی برای برنامه های خود قالب جدید Theme تعریف کنید . در زیر چند نمونه قالب آماده پیش فرض را می بینید که همراه برنامه به شما داده می شود .

برای نمایش بزرگ کلیک کنید :

قالب شیشه ای آبی   BlueeGlass	قالب مک او اس  MacOS
قالب تهی     MP10	قالب یکه سبز OneGreen
قالب فولاد آبی SteelBlue	قالب ویندوز اکس پی WinXP

خود فکر می کنم توضیحات کافی باشه : بهتره حالا کینک دانلود رو بدم که شما از بخش دانلود همین سایت بتو نید دانلود کنید .

برای دانلود لطفا وارد بخش دانلود بشید . اگر مشکلی داشتید باها در میون بزارین تونستم جواب می دم .

لینک بخش دانلود 

بالا |+| نوشته شده توسط محمود آزادی در چهارشنبه دهم خرداد 1385 | موضوع:  

لینک به مقاله : دانلود برنامه و توضیحات 

این برنامه به دو زبان تدارک دیده شده( فارسی و انگلیسی) .  

بالا |+| نوشته شده توسط محمود آزادی در دوشنبه هجدهم اردیبهشت 1385 | موضوع:  

لینک فعلی : دانلود اینجا راکلیک کنید

برای آسان شدن دانلود بر روی لینک راست کلیک کنید سپس گزینه  Save target as را انتخاب کنید

بالا |+| نوشته شده توسط محمود آزادی در چهارشنبه ششم اردیبهشت 1385 | موضوع: