ورود

View Full Version : گذاشتن Seprator برای اعداد(خارج از دیتابیس)



کامروا
شنبه 14 آبان 1390, 16:46 عصر
سلام دوستان
من میخوام توی یک edit وقتی عدد مینویسم seprator دار باشه. همچنین وقتی توی dbgrid نشون میدم sep داشته باشه اما وقتی توی database ذخیره میکنم فقط عدد ذخیره بشه(بدون sep)

سپاس فراوان

firststep
شنبه 14 آبان 1390, 16:59 عصر
ببینید عزیز کامپوننتهای زیادی این کارو می کنن شاید بهتر باشه با کامپوننت ها این کارو بکنید

فکر کنم بهترینشون raize باشه البته با دلفی 2010 به بالا هم فکر کنم بشه

اگر هم کد می خواین توی سایت کلی بحث شده در باره این موضوع

کامروا
شنبه 14 آبان 1390, 17:13 عصر
این کامپوننت مجانیه؟
سرج کردم ولی چیزی پیدا نکردم!!

سعید صابری
شنبه 14 آبان 1390, 21:09 عصر
کامپوننت رایگان یکی از بچه های سایت ساخته جناب gbg جستجو کنید پیداش می کنید. در ضمن advedit از tms نیز هست
کد هم می تونی از کد زیر استفاده کنی


var
s:string;
i:Integer;
begin
s:='';
if Edit1.Text>''then
begin
for i:=0 to Length(Edit1.Text)do
if Edit1.Text[i]in['0'..'9']then
s:=s+edit1.Text[i];
Edit1.Text:=FormatFloat('#,',StrToInt64(s));
Edit1.SelStart:=Length(Edit1.Text)+1;
end;