تفکیک اعداد

[medooo]

سلام
من می خواستم یه عدد رو از توی یه ادیت تفکیک کنم
مثلا اگه عدد 45689 رو داشته باشیم تفکیک شده آنها رو توی ادیت های جداگانه ای بنویسه
4 5 6 8 9

[Mahdi.Delphi]

میتونید با تابع Length طول رشته رو به دست بیارید و بعد به تک تک کاراکترهای اون رته دسترسی داشته باشید.

Str := Edit.Text;
Len := Length( Str );
Showmessage(Str[1]+' '+Str[2]+' , '+Str[3]);