+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف يأخذ العدد من edit1 ويوضع االجزء الصحيح له في edit2 (/showthread.php?tid=3523)
الصفحات:
1
2
كيف يأخذ العدد من edit1 ويوضع االجزء الصحيح له في edit2 - King SofT - 30-10-2011
rami كتب :السلام عليكم[color="darkgreen"]
كود :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]
كيف يأخذ العدد من edit1 ويوضع االجزء الصحيح له في edit2 - itoumoui - 22-12-2011
السلام عليكم
بارك الله فيكم لقد وجدت ضالتي في هذا المنتدى وما أود إضافته هو لما تبحث عن
الجزء العشري
تفعل هكذا
كود :
edt1.Text:=FloatToStr(frac(StrToFloat...........[COLOR="Red"]الحمد لله[/OLOR]