delphi4arab منتديات دلفي للعرب
كيف اقسم الكلمة الموجودة في edit على 2 edit - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف اقسم الكلمة الموجودة في edit على 2 edit (/showthread.php?tid=4264)



كيف اقسم الكلمة الموجودة في edit على 2 edit - amer mohamed - 12-06-2012

[COLOR="DarkRed"][FONT="Arial Narrow"]السلام عليكم
لديا 3 edit
.كيف يمكن ان اكتب كلمة زوجية الاحرف على edit1
فيقسم البرنامج الكلمة الى نصفين
النصف الاول توضع في edit2
و النصف الثاني يوضع في edit3
هل ممكن السوروس المناسب لعمل ذلك
شكرا مسبقا
[/COLOR]


كيف اقسم الكلمة الموجودة في edit على 2 edit - format82 - 12-06-2012

يمكن نقل بيانات عن طريق copy

Edit2.Text:=copy(Edit1.Text,1,5);
Edit3.Text:=copy(Edit1.Text,6,10);


كيف اقسم الكلمة الموجودة في edit على 2 edit - amer mohamed - 12-06-2012

شكرا جزيلا اخي format82
افدتني كثيرا بطريقة copy
تحياتي يا غالي


كيف اقسم الكلمة الموجودة في edit على 2 edit - format82 - 12-06-2012

لا شكر علي واجب


كيف اقسم الكلمة الموجودة في edit على 2 edit - King SofT - 14-06-2012

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

بافتراض ان Edit1 هو الذي يحمل الكلمة الاصلية
كود :
Edit2.Text:=copy(Edit1.Text,1,length(Edit1.Text)div 2); Edit3.Text:=copy(Edit1.Text,length(Edit1.Text)div 2+1,length(Edit1.Text));

بالتوفيق