+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيفية تقسيم الكلمة حرف حرف ؟ (/showthread.php?tid=2572)
كيفية تقسيم الكلمة حرف حرف ؟ - AnoirsoftDeveloper - 16-11-2010
السلام عليكم
أود أن أقسم الكلمة(باللغة العربية ) حرف حرف وإدراجها في قاعدة البيانات حرف بعد حرف ؟
كيفية تقسيم الكلمة حرف حرف ؟ - TF6M - 17-11-2010
و عليكم السلام و رحمة الله و بركاته
أخي AnoirsoftDevloper , تم التطرق للسؤال في موضوع سابق ...
إستخدم خاصية البحث , راجع هذا الموضوع : تقسيم كلمة
مثال :
كود :
Function _SplitMyWord (TrgStr:String): String;
{$IF CompilerVersion >= 17}Inline;{$IFEND}
Var
i: Byte;
Begin
For i:= 1 To Length(TrgStr) Do
if Result <> '' then
Result:= Format('%s , %s',[Result ,TrgStr[i]]) Else
Result:= TrgStr[i];
End;RE: كيفية تقسيم الكلمة حرف حرف ؟ - Bachirsoft - 08-10-2017
هل ينجح الأمر بالنسبة الى الأعداد أي أريد 1735 يعطيني Edit1.Text:=1 و Edit2.Text:=7 و Edit3.Text:=3 و Edit4.Text:=5
RE: كيفية تقسيم الكلمة حرف حرف ؟ - rahiche - 09-10-2017
نعم تعامل مع الرقم على انه نص string و ليس ك integer
و في حاتلك الخاصة يمكنك اعطاء كل حرف او رقم في مكون
مثلا
edit1.text := mystring[1]
حيث mystring هو المتغير الذي يحمل القيمة 1735