شماره تلفن داخل Label

[Shahryar_Bmp]

سلام
من می خوام تو برنامم وقتی که در ادیت شماره وارد کنید و 3 رقم اول شماره *******0912 یا شماره ای باشه که خودم تعریف میکنم مقدار یک لیبل به موبایل و شماره های تلفن مثله ********021 رو در لیبل بزنه تلفن !
امیدوارم درست توضیح داده باشم
ممنون

[ghabil]

if Copy(edtPhone.text,1, 4)= '0912' then lbType.Caption := 'Mpbile'
else if Copy(edtPhone.text,1, 3)= '021' then lbType.Caption:= 'Phone';