ممكن فتح ملف نصي بدون لاحقةوحفظه بدون لاحقة

نعم يمكن

ينفع بإستخدام الأداه RichTextBox

وسوف اشرحلك كيف فيما بعد لأني دلوقتي هاقوم للضرورة القصوى

سيتم فتح الملف أمامك على الفورمة وايضا لو عاوز تحفظها من غير إمتداد ينفع برضو

يلا سلام

نعم أخى يمكن حتى لو أخترت أمتداد آخر , الفكرة أن الـ Format الخاصة بالملف ستبقى كما هى : Text Format

MohamedAliSalim كتب:

ينفع بإستخدام الأداه RichTextBox

وسوف اشرحلك كيف فيما بعد لأني دلوقتي هاقوم للضرورة القصوى

سيتم فتح الملف أمامك على الفورمة وايضا لو عاوز تحفظها من غير إمتداد ينفع برضو

يلا سلام

مفيش أى حاجة ليها أخى.

اقتباس

نعم يمكن

اقتباس

نعم أخى يمكن حتى لو أخترت أمتداد آخر , الفكرة أن الـ Format الخاصة بالملف ستبقى كما هى : Text Format

اقتباس

ينفع بإستخدام الأداه RichTextBox

طيب هو ينفع باستخدام TextBox يعني

اقتباس

مفيش أى حاجة ليها أخى.

Private Sub Command1_Click()
'كود الحفظ
Dim filenum
filenum = FreeFile
Open "c:\NOUR" For Output As filenum
Write #filenum, Text1.Text
Close filenum
End Sub

كيف نستطيع باستخدام common dialogبعد اذن الجميع

وليس التقيد بفتح ملف من مسار معين

الأداه اللي انا اقصدها دي RichTextBox

دي بيتم إظهار الملف التيكست او اي ملف كتابة بنفس التنسيق المكتوب به من قبل

ويمكن ايضا بعد عرض الملف اللي انت عاوز تفتحة تقدر تعدل فيه براحتك مع التنسيق المناسب

تغير نوع الخط تغير حجمه او جعله عريض و مائل و تحته خط

وايضا إزاحة الى اليمين واليسار والوسط

ويتم حفظ هذه التغيرات بأي إمتدات انت عاوزه او حتى بدون اي إمتدات كما قلت

اقتباس

وليس التقيد بفتح ملف من مسار معين

يعني ايه ؟

معنى كدة ان انت هاتكتب المسار في الكود

يعني مش هاتخلى المستخدم يحدد الملف

ينفع أكيد

CommonDialog1.FileName ="file address"

بعد كدة اعطي امر الفتح زي ما انت عاوز

يعني إذا كنت مثلا هاتستخدم الأداه RichTextBox

هايبقى

RichTextBox1.LoadFile CommonDialog1.FileName

وبس خلاص

هذه شكل الفورمة الى أنا عاملها لكتابة وحفظ وفتح اي ملف وورد او تيكست بس غالبا اللى مافهوش لعب كتير

برده مفيش حاجة ليها لأنه لا يتحث عن Formatted Text