ورود

View Full Version : فیلدهایCurrency



davoodmz
شنبه 02 اردیبهشت 1385, 09:06 صبح
با سلام
من از یک کامپونت استفاده می کنم که DBCurrency را دارد ولی برای اینکه عملیات ضرب و تقسیم را روی فیلدها انجام دهیم کار نمی کند و خطای اینکه ((از نوع Integer نمی باشد)) را می دهد .
چطور می شود از نوع currency نمایش داد ولی در اصل فیلدها از نوع integer باشد و عملیات ریاضی را روی آن انجام داد.
باتشکر

davoodmz
چهارشنبه 06 اردیبهشت 1385, 08:49 صبح
با سلام
من کدش را بدست آوردم به صورت
strtocurr(fild) ولی من strtoint را که می نویسم خطا می‌دهد

hr110
چهارشنبه 06 اردیبهشت 1385, 10:45 صبح
شاید مشکلتون با round حل شود!

davoodmz
چهارشنبه 06 اردیبهشت 1385, 11:17 صبح
با سلام
سوالم را یک جور دیگر توضیح می‌دهم
در یک فرم سه dbedit داریم و می خواهیم وقتی از dbedit2 خارج شدیم dbedit2 و dbedit1 با هم ضرب شوند من این کار را با کد زیر در رویداد onexit مربوط به dbedit2 انجام دادم به شکل زیر


dbedit3.Text := inttostr(strtoint(dbedit1.Text) * strtoint(dbedit2.Text)) ;

و بعد از ذخیره هیچ خطایی رخ نمی‌دهد
حال من می خواهم محتویات این dbeditهای که نوعشان از نوع integer می باشد فقط در فرم به صورت currency نمایش داده شوند.من این کار را نیز با یک کامپونت انجام دادم ولی بعد از اجرا عملیات ریاضی دیگر با کد بالا انجام نمی‌شود. لطفاً راهنمایی کنید
باتشکر.