كيف يأخذ العدد من edit1 ويوضع االجزء الصحيح له في edit2

[King SofT]

السلام عليكم

كود :

if edit1.text = '' then edit2.text := inttostr(0) else if edit1.text = ' ' then edit2.text := inttostr(0) else edit2.text := floattostr(int(strtofloat(edit1.text)));

[color="darkgreen"]
ما فائدة استثنائك للشرط الاول اذا كان الثاني هو نفسه

شكرا

[/color]