ذخیره سازی متن

[shareh]

با سلام به دوستان
من با savedologe و memo می خواهم یک ویرایشگر ساده داشته باشم.فقط دو چیز نیاز دارم
1-زمانیکه که کاربر خواست از برنامه خارج بشه اگر یادداشت خود رو ذخیره نکرده باشد یه پیام برا او ظاهر بشه
2-اگه در هنگام ذخیره کردن نام فایل مشابه فایل موجود در کامپیوتر بود یک پیام در این منظور ظاهر بشه.
لطفا اینها رو داخل این فایل الحاقی درست بکنید
با تشکر

[babak_delphi]

در ایونت OnChange در Memo یک متغیر رو set کن تا بفهمی که تغییری در متن ایجاد شده یا نه ، بعد در ایونت OnCloseQuery از فرم این متغیر را کنترل کن و اگر نیاز بود پیغام مناسب رو نمایش بده ، در ضمن در موقع OnShow و همچنین ایجاد فایل جدید (New) و همچنین باز کردن یک فایل متنی (Open) ، این متغیر رو دوباره آماده کن
برای کنترل وجود فایل همنام هم از تابع ExistFile استفاده کن.

[shareh]

راستش من هیچی بلد نیستم .اگه میشه رو همون مثال اجراش کنید و بفرستید

[MNosouhi]

روی کامپیوترت به مسیر زیر برو :
D:\Program Files\Borland\Delphi7\Demos
در مسیر مذکور پوشه RichEdit رو باز کن و برنامه داخلش رو اجرا کن . یه ادیتور کامل.
جواب سوال ها رو هم می تونی از داخل همون پروژه پیدا کنی.