آموزش ساخت دفتر تلفن

[مرد مباح]

ممنون سولجر جان از نظرتون.
ولي اين آموزشها رو براي تشكر نميزارم.
براي اينه كه اگه كسي توي نت دنبال جواب ميگشت بتونه يك جوابي پيدا كنه و شايدم دعام كرد و شايدم نه.
مهم اينه كه بشه به چند نفر كه نياز دارن چيزاي مفيد ياد داد.

من هم همين جا از تمام زحماتت تشكر ميكنم. چون ديدم كه چقدر پيگير هستي.
هميشه موفق باشي.

[مرد مباح]

برنامه رو ادامه ميديم.

در اين قسمت ميخوام يك راه سختتر براي ورود و تغيير اطلاعات را پيگيري كنيم.
چون راه هاي ساده زيادي وجود داره ولي من ترجيه ميدم راه سخت رو بگم كه بعدا به دردتون بخوره.

بر روي فرم اصلي برنامه چندتا دكمه قرار دهيد كه عناوين زير ايجاد كنيد :
1."اضافه كردن"و 2."تغيير اطلاعات"و 3."حذف اطلاعات" و 4."جستجو بر حسب نام"و 5."جستجو بر حسب تلفن"

كدهاي هر يك را به ترتيب توضيح خواهم داد. نوع فرم و شكل آن را مطابق ميل خود انتخاب و مرتب نمائيد.

قبل از ورود اطلاعات و كارهاي شبيه به اين ، يك فرم اضافي ايجاد نمائيد و نام آن را Hlp بگذاريد و روي آن دو Edit و دو دكمه قرار دهيد.
يكي از دكمه ها را OK و ديگري را Cancel بگزاريد و روي دكمه OK دبل كليك كنيد. در بخش ONClick كد زير را وارد نمائيد.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

البته بعدا به اين كد مقادير ديگري نيز اضافه ميشود و دليل اينكه شرط tag = 0 را متوجه خواهيد شد.

روي رويداد OnShow فرم نيز موقتا كد زير را وارد نمائيد.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

[mkh2006]

با سلام خدمت مرد مباح
آقا مرسی این کار که داری مکنی کار تو÷یه تو اموزشت را بذار و کاری به تکراری و حرف دیگرون نداشته باش مرسی

[مرد مباح]

ممنونم از شما mkh2006 به خاطر لطفتون.

حال به سراغ فرم اصلي رفته و روي دكمه 1 دبل كليك كنيد و كد زير را وارد نمائيد.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

روي دكمه 2 دبل كليك كنيد و كدهاي زير را بنويسيد.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

البته طبق اين كد نامهاي مشابه در نظر گرفته نميشوند و راه هايي براي رفع اين موضوع وجود داره.
يكي از راه ها استفاده از يك فرم دست ساز است كه يك Edit و يك DBGrid خواهد داشت و جستجو در آن صورت ميگيرد كه اين مسئله در اين قسمت در نظر گرفته نشده است و شايد در اواخر اين برنامه به آن بپردازيم.

اين كدها يك مقدار را دريافت ميكنن (براي مثال "علي") و در ديتابيس به دنبال اولين موردي كه با اين موضوع هم خواني داشته باشد ميگردد. با اين تفاوت كه حتي تركيبات اين كلمه نيز در نظر گرفته ميشود ( براي مثال "عليرضا")
اين كار را علامت "*" كه در فرمان ----- قرار داده شده ، انجام ميدهد.

براي دكمه 3 هم تمام كدهاي بالا را تكرار نمائيد با اين تفاوت كه :
1. بجاي hlp.tag := 2 <-- hlp.tag := 1;
2. بجاي hlp.show <-- hlp.showmodal;

برنامه شما در حال حاضر شرايط خوبي دارد ولي بايد يك سري كد به آن اضافه شود تا كاملا درست عمل نمايد.

[مرد مباح]

حالا دوباره به سراغ فرم HLP برويد و روي دكمه OK كد زير را اضافه نمائيد.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

كدهاي بالا عمل تغييرات رو كامل ميكنن.
حال براي اينكه بتونين دكمه سوم فرم اصلي يعني پاك كردن رو كامل نمائيد چند روش وجو دارد .
من روش زير را پيشنهاد ميكنم.
كدهاي زير را بعد از فرمان hlp.show اضافه نمائيد :

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

به اين ترتيب شما امكان پاك كردن يك مورد را نيز از دفت تلفن ايجاد نموديد.
در بخش بعدي درباره جستجوها و ... صحبت ميكنيم.

[soldier]

ممنون سولجر جان از نظرتون.
ولي اين آموزشها رو براي تشكر نميزارم.
براي اينه كه اگه كسي توي نت دنبال جواب ميگشت بتونه يك جوابي پيدا كنه و شايدم دعام كرد و شايدم نه.
مهم اينه كه بشه به چند نفر كه نياز دارن چيزاي مفيد ياد داد.

من هم همين جا از تمام زحماتت تشكر ميكنم. چون ديدم كه چقدر پيگير هستي.
هميشه موفق باشي.

سلام مباح جون

ای ول مرامت. خیلی باحالی.

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

یه هفته دیگه آزادم. دوباره شروع به آموزش گذاشتن میکنم.


راستی اگر میشه بعد از کامل شدن آموزش اون رو به صورت یک فایل Pdf

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

من دیل آپی هستند که نمی تونم صفحات زیادی رو بگیرم.


خداحافظ

[مرد مباح]

به چشم .
اين كار رو هم انجام ميدم. موفق باشيد.

[mahtab1360]

سلام من تازه عضو انجمن شدم مطالب شما خیلی جالب و مفید بود من دارم برنامه دفتر تلفن با پارادکس کار میکنم.1 سوال داشتم در عمل فیلتر کردن چطوری میشه از دو شرط استفاده کرد یعنی مثلااسمهایی را نمایش بده که فیلد اسم شرکت و نام بخش برابر چیزی باشه که کاربر میگه .
از راهنماییتون ممنون

[darya_Sh]

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

[مرد مباح]

میریم به سراغ سرچ
معمولا برای سرچ از فرمان Locate استفاده میشود ولی در بعضی موارد که دفتر تلفن هم یکی از آنهاست به نظر من بهتر از فرمان Filter استفاده شود.
یک فرم جدیدبا نام Find ایجاد کنید و روی آن یک Edit و یک DBGride قرار دهید.
در رویداد OnChange کامپوننت Edit کدهای زیر را بنویسید :

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

حالا تغییرات زیر را بدهید تا برنامه کامل شود :
1. مقدار دیتاسورس DBGrid رو با دیتاسورستون که اول طراحی کردین یکی کنید.
2. بر روی دکمه 4 دبل کلیک کنید و کد زیر را بنویسید.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

3. برای دکمه 5 کدهای فوق را عینا تکرار کنید با این تفاوت که tag := 1 باشد.

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