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

بگین چی به نظرتون کم و کسر هست تا بگم.
مبحث بعدی لینک به Access هست.
به جز این موضوع اگه چیزی هست بگین که دیگه به اون قسمت بر نگردیم.

ممنون مرد مباح خیلی عالی است لطفا ادامه بده فقط یک تقاضا دارم واونم اینکه لطف کنی و در مورد دستوراتی که می نویسی یک کمی توضیح بدی که این دستورات چه کاری انجام می دن

دوست عزیز.
من توضیحات رو در بخش همه چیز درباره دیتابیسها دادم.
اینجا فقط یک نمونه عملی و کاربردیه که در واقع یتونه مشکلات احتمالی اضافی رو حل کنه.

پس ببخشید من نمی دونستم

نقل قول:

---

نوشته شده توسط مرد مباح [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

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

در ضمن بايد اشاره كنم يك سري مباحث خيلي مقدماتي رو ديگه توضيح نميدم و براي اطلاعات ميتونين به لينك امضاي من مراجعه كنيد.

ضمنا اين آموزش رو كم كم شروع ميكنم و لطف كننيد و نظر بدين كه موافق اين آموزش هستيد يا اينكه اين پست رو حذف كنيم !!

---

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

پس بقيه آموزش چي شد.
البته بنده از ورژن 2006 و 2007 كه استفاده كردم در قسمت Tools - database desktop را نداشتم.
چه كاري بايد انجام بدم.
و اينكه آيا راهي هست كه بشه با Accsess بتونم فايل ديتا بيس خودم را توليد كنم و به برنامه نسبت دهم.
همچنين اونطور كه شنيدم براي ارتباط با بانك اطلاعاتي بهترين گزينه ADO است ! آيا اين گزينه درست است؟

با تشكر از آموزشي كه گذاشتي.

ادامه آموزشها : ارتباط به كمك ADO
برنامه دقيقا مطابق توضيحاتي كه در بالا گفته شده ساخته ميشود.
ولي يك تفاوت وجود دارد. در ديتاماژول قبلا Table قرارداده بوديد.
در حالتي كه بخواهيد به ديتابيسي شبيه به اكسس كانكت بشيد ، از تب ADO ميتوانيد ADODataset و يا ADOTable رو انتخاب كنيد. ADOQuery براي حالتي كه از فراميت SQL استفاده ميكنيد كاربرد زيادي دارد.
بر روي هر كدوم از اين كامپوننتها كه برويد دو مشخصه زير را ميبينيد.
1. ConnectionString
2. ‍CommandText
البته توسيه ميشود كه اگر بيش از 1-2 تا تيبل داريد از يك ADOConnection استفاده كنيد كه برنامه يك بار به بانك اطلاعاتي كانكت شود و كليه اطلاعات را در اختيار ساير ابزارهايADODataset,ADOTable,ADOQuery) ADO) قرار خواهد گرفت و در آن شرايط ميتوانيد بايد از خاصيت Connection اين كامپوننتها استفاده نمود

مقادير بسيار زياد و متغييري وجود دارد كه در شرايط مختلف به ConnectionString تخصيص داده ميشود. ولي در حالت ساده و براي ارتباط به فايل اكسس بايد مراحل زير را انجام دهيد.

کد:

---

Press ... Btn in ConnectionString
Build
Microsoft Jet
Select File Name
OK

---

به اين ترتيب شما به بانك متصل خواهيد شد و شما بايد تيبل مورد نظر خودتان را به كمك فرامين SQL انتخاب نماييد.
اگر هم بلد نيستيد فقط در بعضي مسائل كارتون خيلي سخت خواهد شد. ولي ميتوانيد از فرمان زير استفاده كنيد :

کد:

---

select * from YourTableName

---

البته اگر از دكمه ... هم استفاده كنيد به راحتي ميتوانيد به همين نتيجه برسيد.

موفق باشيد

متشكريم. جون من ادامه بده

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

نقل قول:

---

نوشته شده توسط مرد مباح [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

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

کد:

---

if find.tag = 0 then dm.table.filter := 'Name = '''+edit.text+'*'''
else dm.table.filter := Tel = '''+edit.text+'*'''
dm.table.filtered := true;

---

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

کد:

---

find.tag := 0;
find.showmodal;

---

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

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

---

گزينه showmodal ندارم