نحوه کار با LeftStr و RightStr و MidStr

[shirin71]

نحوه کار با LeftStr و RightStr و MidStr

Code:
کد HTML:
procedure TForm1.Button1Click(Sender: TObject);
var n,x: integer;
begin
n:=3;
x:=4;
Label1.Caption:=LeftStr('String Name',n);
Label2.Caption:=RightStr('String Name',n);
Label3.Caption:=MidStr('String Name',x,n);
end;

n تعداد رشته برای جدا کردن.
x شروع جدا کردن کاراکتر برای MidStr

LeftStr تعداد n رشته از سمت چپ
RightStr تعداد n رشته از سمت راست
MidStr تعداد 4 رشته از سمت چپ شروع از کاراکتر x ام

خروجی Label1:

Code:
کد HTML:
Str

خروجی Label2:

Code:
کد HTML:
ame

خروجی Label3:
Code:
کد HTML:
ing