بدست آوردن کاراکتر اول و آخر در یک شی Edit

[hamid-nic]

سلام دوستان ، وقتتان بخیر
چطور می توان کاراکتر اول و آخر در یک شی Edit را بدست آورد ؟
لازم بذکر است که تعداد کاراکتر هایی که در این Edit قرار می گیره ثابت نیست و هر بار تعدادی مختلف کاراکتر را در خود می گیرد .
خیلی ممنون از دوستانی که راهنمایی می کنند .

[Felony]

var
FirstChar, LastChar: Char;
begin
FirstChar:= Edit1.Text[1];
LastChar:= Edit1.Text[Length(Edit1.Text)];
end;