[مشروع] معالج النصوص الدلفاوي

السلام عليكم

أخ Delphawi إن أمكن إستخدام إصدار أخر بدلا من 2009 النسخة المكركة موجودة لكني لا أفضلها

لو أمكن تغيير النسخة

بالتوفيق

اقتباس

أخ Delphawi إن أمكن إستخدام إصدار أخر بدلا من 2009

وانا ايضا افضل ذلك ان امكن النسخة 7

//--------------------------------------------------------------------------------//

القسم نشيط جدا واخاف عليه من الحسد

بالتوفيق

اقتباس

وانا ايضا افضل ذلك ان امكن النسخة 7

وانا ايضاً أفضلها والله ... ولكن حصلت مشكلة فيه اضرتني إلى تغييره

جاري السؤال عن حلها ...

أتصور جاء الحل في

/index.ph...st&p=885155

النفاط 1و2و3 بإستخدام دلفي 7 :blush:

// حدث تغيير حجم الفورم
procedure TForm1.FormResize(Sender: TObject);
begin
   // تحديث الأداة لعدم ظهور المحتوى بشكل مشوه
   richedit1.Refresh;
end;

سبب التعديل : إضافة الشرح باللغة العربية

Arabic_Text_Editor.rar

جزاك الله خيراً أخي rober على ردك ...

وانا للاسف لا ادخل المنتدى بشكل منتظم في هذه الفترة , وغالباً لا أدخل من جهازي

أردت أن أوضح شيئاً بخصوص فكرة البرنامج , والشكل النهائي له ... وهو انه بإذن الله سيكون محرر نصوص مثل Notepad++ , أي كمحرر كود عربي وبالدلفي ,,,

وسيكون له مجموعة امكانات أخرى إن شاء الله تعالى

-----------------------

النقطة التالية إن شاء الله ستكون :

- إضافة شريط قوائم يحتوي قائمة ملف , وفيها أمر الخروج . وقائمة تحرير وفيها أوامر النسخ والقص واللصق .

وشكراً

النقطة (حسب ما فهمت)

Arabic_Text_Editor.rar

بسم الله الرحمن الرحيم

أخ دلفاوي / من باب حب المشاركة مع الاخرين وحب التعلم قررت المشاركة معكم علي قدر المستطاع علما بأنني الان مشغول بمشروعي ..تصفيات الدوري

عموما قمت ببعض الاضافات مثل

1- وضع خط تحت التكست U

2- خاصية البولد B

3- تحديد الكل

حاولت وضع خاصية التوسيط والمحاذاة يمين ويسار ولكنني تعبت جدا في ذلك :S

ولكن ساحاول في الامر

المرفق Arabic_Text_Editor.rar

B.M.AbdelAziZ كتب:

النقطة (حسب ما فهمت)

Arabic_Text_Editor.rar

أخ محمد في فرق كبير بين حجم ملفك المضغوط وحجم ملفي المضغوط

ملفك 2 كيلو بايت

انا 220 كيلو بايت

شو السبب ممكن تقلي الطريقة اللي أخفف حجم الملفات المرفوعة ؟ او ان هناك سبب اخر لكبر الحجم

إضافة الأمر جديد في قائمة ملف

إضافة الأمر فتح في قائمة ملف

إضافة الأمر حفظ في قائمة ملف

إضافة الأمر حفظ بإسم في قائمة ملف

إضافة أمر أحتواء النص في قائمة التنسيق

إضافة الأمر خط في قائمة التنسيق

إضافة الكود للإزاحة إلى اليمين

إضافة الكود للإزاحة إلى اليسار

أرجو منكم التوجيه لتصحيح الأخطاء :blush:

neo1115 كتب:

أخ محمد في فرق كبير بين حجم ملفك المضغوط وحجم ملفي المضغوط

ملفك 2 كيلو بايت

انا 220 كيلو بايت

شو السبب ممكن تقلي الطريقة اللي أخفف حجم الملفات المرفوعة ؟ او ان هناك سبب اخر لكبر الحجم

أخ neo هناك ملفات لا داعي من وجودها أولا

ثانيا قم بتحميل الملف المرفق قم بعمل بعض التعديلات أحفظ التعديلات أنظر إلى الحجم الكامل للمجلد قم بعمل مجلد جديد أنسخ نفس الملفات من المجلد القديم

ثم قم بوضعها في المجلد الجديد و لاحظ الفرق بين حجم المجلدين على الرغم من أنها نفس الملفات ( أختلاف الحجم ليس دائم )

وصلت الفكرة :wink:

ليس المهم حجم الكود بل المهم هو حجم الملف التنفيذي و هذا مالم نتعلمه من الأخ محمد بعد :cry: :evil:

Arabic_Text_Editor.rar

اقتباس

أخ محمد في فرق كبير بين حجم ملفك المضغوط وحجم ملفي المضغوط

ملفك 2 كيلو بايت

انا 220 كيلو بايت

كما قال لك Rober هو حذف الملفات الزائدة / غير المهمة

وايضا حذف الملف التنفيذي exe فهو ياخد 90% من المساحة

بالنسبة للقائمة كنت كتبتها بالعربية: ملف/تحرير/نسخ/قص/لصق

لكن اراكمها غيرتوماها للإنجليزية !

يعطيك العافية أخ روبير اضافاتك جيدة جدا

طيب شو رايك تعمل دالة تفحص الملف اذا كان مخزن او لا عند الاغلاق او عند اضافة جديد

 procedure chickfilesave;  // الاعلان عن الدالة في قسم البرايفت

 implementation

 resourcestring
 savechange = 'Save changes to %s?';

 // دالة الفحص
 procedure tform1.chickfilesave;
 var
   option: Integer;
 begin
   if not richedit1.Modified then Exit;
   option := MessageDlg(format(savechange, [filename]),
	 mtConfirmation, mbYesNoCancel, 0);
   case option of
	 idYes: save1click(Self);
	 idNo: {لاشئ};
	 idCancel: Abort;
   end;
 end;

 procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
 begin
 chickfilesave;   //نستدعي الدالة  عند الخروج
 end;
 // عند النقر على جديد
 procedure TForm1.N2Click(Sender: TObject);
 begin
 chickfilesave;   // نستدعي  دالة الفحص هنا ايضا
	richedit1.Clear;
 end;

في ملاحظة اخ روبير علي عملية الحفظ نفسها لما احفظ الملف اول مرة بيعطني امتداد

n1.txt.txt مرتين

ولما اعمل اوفررايت لملف بيضف كل مرة .txt

هادي الصورة راح توضح كل اشي

ويعطيكم الف عافية

مشروع موفق اخوى علاء

بالنسبة للتخلص من الملفات الغير مرغوب بها فى المشروع واللتى لا تؤثر على محتوى المشروع

قم بالاتى

قم بعمل ملف Text عادى من الويندوز وقم بوضع الاتى داخلة

@Echo off
del *.~*
del *.dcu
del *.map
del *.ddp
del *.dti
del *.dof
del *.cfg
del *.bak
exit

قم باعادة تسمية الملف الى Cleaner.bat وقم بتشغيل الملف بعد ذلك , سوف يساعدك كثيراً فى التخلص من الملفات الغير مهمة يمكنك اضافة السطر التالى

del *.exe

اذا كنت لا تريد ان ترفق الملف بالملف التشغيلى له

بالتوفيق

اضافة : تم اضافة المشروع بقسم مشاريع الأعضاء

بسم الله ما شاء الله المعلمين الكبار(rober ، Swift ، B.M.AbdelAziZ) كلهم في مشروع واحد، إيه الجمال ده.

بس أنا عندي ملاحظة يا شباب، مفيش داعي ان احنا نتسابق في وضع أي أضافات بدون أن يتم الإعلان عن البدء فيها بصورة رسمية

أقصد أن احنا ننتظر المسئول عن المشروع - دلفاوي - حتى يخبرنا بالبدء في النقطة المحددة.

معلشي أنا هاستأذنكم في البدء من أول المرفق بتاع أخونا B.M.AbdelAziZ

بس أنا مش عارف الكلام عندي بيظهر مش مفهوم مع إن اللغة عندي مظبطها كويس، أرجو أن يكون هناك حل لموضوع اللغة ده لحسن هايبقى شكلنا مش ظريف

Arabic_Text_Editor.rar

معلشي ياشباب أنا باعتذر مرة أخرى، لكن لو عندكوا رأي آخر فأنا مع الجميع طبعا، نحن الآن في انتظار المسئول عن المشروع.

دلفاوي، انت فين

انت فين يا مدير :haha:

اقتباس

دلفاوي، انت فين

انت فين يا مدير 032.gif

انا هنا يا باشا :)

لكن ارجو نك تضع ملف EXE لآخر تعديل

بالنسبة للنقطة القادمة (لم أر الحالية للاسف) :

وضع شريط حالة StatusBar من اربع خانات ...

1- عدد الكلمات في المربع .

2- العمود , والسطر الحاليين .

3- حالة NumLock (إذا كان معطل تظهر كلمة Num في الخانة بلون رمادي باهت , وإن كان مفعل تظهر بلون أسود)

4- حالة CapsLock

على أي تعديل نعتمد حتى نكمل :resentful:

rober كتب:

ليس المهم حجم الكود بل المهم هو حجم الملف التنفيذي و هذا مالم نتعلمه من الأخ محمد بعد

أخ محمد يا ريت لو تفيدنا بالموضوع أعلاه

B.M.AbdelAziZ كتب:

بالنسبة للقائمة كنت كتبتها بالعربية: ملف/تحرير/نسخ/قص/لصق

لكن اراكمها غيرتوماها للإنجليزية !

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

تم حل المشكلة بالمرفق

المستفيد1 كتب:

بسم الله ما شاء الله المعلمين الكبار(rober ، Swift ، B.M.AbdelAziZ) كلهم في مشروع واحد، إيه الجمال ده.

Rober هه

لا ياعم (B.M.AbdelziZ , Swift) أنا معاك

بس روبير :huh: بعد بكير ليكون معلم

هناك مشكلة في موضوع الأزاحة فهي تتم على السطر الأول فقط :tantrum:

Arabic_Text_Editor.rar

السلام عليكــم ورحمـة الله وبركاتــة

دي نص محاولة، عملت مطلوبين وباقي اتنين

لكن المشكلة أني لم أستطع التوصل لخاصية font الخاصة بـ Num، والـ Caps حتى أتحكم في تغيير اللون من الأسود للرمادي

يعني بالضبط ربع محاولة

وجاري المحاولة مرة أخرى للوصول إليها وتنفيذ الباقي بإذن الله

Arabic_Text_Editor.rar

neo1115 كتب:

في ملاحظة اخ روبير علي عملية الحفظ نفسها لما احفظ الملف اول مرة بيعطني امتداد

n1.txt.txt مرتين

ولما اعمل اوفررايت لملف بيضف كل مرة .txt

أنت عامل show للأكستنشن من الويندوز ؟ على الأغلب

سيتم الحل قريباً

في مشكلة الخط فعندما أحمل المرفقات تكون المحارف على الشكل الذي في الصورة المرفقة

يا ريت نعتمد خط معين و يكون موحد للجميع لتلافي هذه المشكلة

Delphawi كتب:

وضع شريط حالة StatusBar من اربع خانات ...

1- عدد الكلمات في المربع .

2- العمود , والسطر الحاليين .

3- حالة NumLock (إذا كان معطل تظهر كلمة Num في الخانة بلون رمادي باهت , وإن كان مفعل تظهر بلون أسود)

4- حالة CapsLock

في المرفق تم أصلاح بعض الأخطاء : الحفظ , اللغة , ما أشار أليه الأخ neo بخصوص تحسس التعديل عند الخروج و عمل جديد

و تم أضافة الخطوات في شريط الحالة 2- العمود و السطر (أثناء الكتابة كل شيء جيد لكن عند التنقل بالأسهم تظهر أرقام عشوائية لذلك ألغيتها عند التنقل حتى يتم إيجاد حل)

3- حالة الـ Num lock لم أعرف كيف أغير لون الخط أو حتى أن أعمل enabled := false لذلك عندما يكون الزر مفعل يتم وضع كلمة num lock في الـ panel أما إن كان غير مفعل فتظهر فارغة

4- حالة الـ Caps lock نفس السابقة

الخط المستخدم هو الـ Arial

الرجاء عمل test للإضافات :happy: و التنبيه لعمل التعديلات اللازمة

لم أعمل تحرير للمشاكة السابقة حتى لا تتداخل الأمور ببعضها و إن لزم الأمر أرجو من السادة المشرفين أجراء ما يلزم للحل

Arabic_Text_Editor.rar

السلام عليكم ...

الآن شاهدت المرفقات بعد إعادة تنصيب دلفي 7 ,,, سلمت إيديكم

المرفق التالي حاولت فيه تخطي مشكلة اللغة العربية ... حيث كانت الحروف تظهر كعلامات استفهام !

Arabic_Text_Editor.rar

السلام عليكم

أولا أعتذر عن التوقف عن المتابعة للمشروع كل هذه المدة لكن الويندوز سيرفر و الباد يوزرز على الشبكة عند الزبائن :wacko:

لكن بعون الله أخلص كل المشاغل و نكمل الخطوة يلي بدأها الأخ Delphawi

أخي الكريم المشكلة لم تحل

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

القليل من الوقت فقط

لا أحد يسبقني بإضافات جديدة :P أنا راجع معكم إن شاء الله

و السلام ختام

أرى ان نحوله إلى الإنجليزية ...