23-01-2009, 12:55 PM
[COLOR="RoyalBlue"]السلام عليكم و رحمة الله و بركاته
لدي سؤال عن تقسيم الاحرف, كيف عمل Split للحروف ؟
حاولت فى هذا الكود ولكن فيه خطأ, فهو ياتى بالحرف الخامس و العاشر فقط ![/COLOR]
لدي سؤال عن تقسيم الاحرف, كيف عمل Split للحروف ؟
حاولت فى هذا الكود ولكن فيه خطأ, فهو ياتى بالحرف الخامس و العاشر فقط ![/COLOR]
كود :
[color=Navy][B]var[/B][/color] a,b,c,d,e : [color=Navy][B]string[/B][/color];
[color=Navy][B]begin[/B][/color]
a := Edit1.Text;
b := a[[color=Blue]5[/color]]+a[[color=Blue]10[/color]];
c := a[[color=Blue]12[/color]]+a[[color=Blue]1[/color]];
d := a[[color=Blue]2[/color]]+a[[color=Blue]9[/color]];
e := b + c + d;
Edit2.Text := e;
[color=Navy][B]end;[/B][/color]