masoode
یک شنبه 06 اسفند 1396, 09:40 صبح
سلام
در فرم برنامه ام چند DBEdit دارم که باید اعداد اعشاری را نمایش دهد (فقط نمایش غیر قابل ویرایش). من میخوام اعداد را با دو رقم اعشار نشان دهد. اگر در دیتا بیس در یک فیلد 21.1 باشد 21.1000003814697 نشان میدهد!!
فعلا روی هر TDBEdit یک TEdit گذاشته ام و در رویداد OnChange اولی این را نوشته ام:
Edit1.Text:=FloatToStrF(StrToFloat(DBEdit1.Text),f fFixed,10,2);
ولی می دانم که کار اصولی نیست
چه کار کنم؟
در فرم برنامه ام چند DBEdit دارم که باید اعداد اعشاری را نمایش دهد (فقط نمایش غیر قابل ویرایش). من میخوام اعداد را با دو رقم اعشار نشان دهد. اگر در دیتا بیس در یک فیلد 21.1 باشد 21.1000003814697 نشان میدهد!!
فعلا روی هر TDBEdit یک TEdit گذاشته ام و در رویداد OnChange اولی این را نوشته ام:
Edit1.Text:=FloatToStrF(StrToFloat(DBEdit1.Text),f fFixed,10,2);
ولی می دانم که کار اصولی نیست
چه کار کنم؟