یه سوال ساده برای شما

با سلام خدمت دوستان گرامی
می خواستم سوال کنم که چگونه می شود که در یک ادیب باکس که مثلا 8 رقم در آن نوشته شده است 4 رقم ابتدای آن را جدا کرد و در یک جای دیگه ثبت کرد مثلا عدد 00040251 که هشت رقم است را می خواهم چهار رقم ابتدای آن یعنی 0004 را در یک جای دیگه ذخیره کنم

متشکرم

سلام . جواب:

کد:

---

var
    str:string;
Begin
    ....
    ....
    str:=copy(Editbox1.text,0,4);
End;

---

چهار رقم اول در متغير str قرار مي گيره.
باي