delphi4arab منتديات دلفي للعرب
HomeWork_04 تمرين تطبيقي - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : تمارين دلفي وحلول (https://delphi4arab.net/forum/forumdisplay.php?fid=16)
+--- الموضوع : HomeWork_04 تمرين تطبيقي (/showthread.php?tid=371)

الصفحات: 1 2

HomeWork_04 تمرين تطبيقي - STRELiTZIA - 03-01-2009

إقتباس :التصحيح في المرفقات
الآن اصبح صحيح 100%

تحياتي

HomeWork_04 تمرين تطبيقي - STRELiTZIA - 06-01-2009

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

تم ارفاق الملفات المصدرية للتمرين...

الأوامر التي استعملت هي :

لعمل التشفير... و هو عبارة على عكس الأحرف فقط Big Grin

اضافة في قائمة الــ Uses الوحدة : StrUtils
PHP كود :
StrUtils 

PHP كود :
procedure TMain.EncryptBtnClick(Sender: TObject);
var i: integer;
begin
  CibleMmo.Clear;
  for i := 0 to SourceMmo.Lines.Count - 1 do
  begin
    CibleMmo.Lines.Add(ReverseString(SourceMmo.Lines.Strings[i]));
  end;
end 
;

اما بالنسة للنسخ دون تشفير :

PHP كود :
procedure TMain.CopyBtnClick(Sender: TObject);
var i: integer;
begin
  CibleMmo.Clear;
  for i := 0 to SourceMmo.Lines.Count - 1 do
  begin
    CibleMmo.Lines.Add(SourceMmo.Lines.Strings[i]);
  end;
end; 

بالتوفيق ان شاء الله

HomeWork_04 تمرين تطبيقي - bo0oda - 07-01-2009

STRELiTZIA كتب :لعمل التشفير... و هو عبارة على عكس الأحرف فقط Big Grin

اضافة في قائمة الــ Uses الوحدة : StrUtils
PHP كود :
StrUtils 
ReverseString only

ده انا قعدت 3 ايام احول اعملinstall لل Highlighter :mad:
ولما نزلته كنت زهقت من التمرين .:o :p

HomeWork_04 تمرين تطبيقي - kachwahed - 01-02-2009

السلام عليكم
في الحقيقة لم أشارك لحل التمرين، أردت فقط أن أضيف وحدة تجعل النص Highlight لأجل لغة Pascal
وذلك دون استعمال مكونات SynEdit، ولا أية مكونات خارجية فأنا لا أحب استعمال المكونات الخارجية.
وجدتها في إحدى المواقع فعدلت فيها وأعددت لكم مثال صغير في المرفقات ومعه الوحدة المعنية بالتحويل، وطريقة استخدامها في نص المكون RichEdit1.
تستعمل على مكون TRichEdit ومن عيوبها أنها تتطلب في كل مرة استعمال الإجراء HighlightPascal ووضعه في حدث التغيير في المكون TRichEdit يجعل العملية ثقيلة نوعا ما، خاصة إذا كان النص طويلا.

HomeWork_04 تمرين تطبيقي - paix144 - 04-09-2009

السلام عليكم
جازاكم الله ألف خير على كل هذا العلم النافع
هذا هو تطبيقي