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

[hasanjj]

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:

Str

خروجی Label2:

ame

خروجی Label3:

ing