PDA

View Full Version : سوال: جدا کردن ارقام یک عدد از هم به صورت سه رقم سه رقم



سيد مجتبي هاشمي
دوشنبه 20 آبان 1387, 22:19 عصر
سلام دوستان. سوال من این است که در هنگام نمایش اطلاعات خوانده شده از پایگاه داده چگونه میتوان اطلاعات عددی را به صورت سه رقم سه رقم از هم جدا کرد تا خواندن آنها برای کاربر راحتتر باشد. ممنون از شما.

Mask
دوشنبه 20 آبان 1387, 23:07 عصر
با سلام دوست عزیز یه سرچ بزن تو همین سایت چندین پست در همین رابطه هست که کامل جواب داده.
http://barnamenevis.org/forum/showthread.php?t=49699&highlight=%D8%AC%D8%AF%D8%A7+%DA%A9%D8%B1%D8%AF%D9 %86+%D8%B1%D9%82%D9%85+%D8%AF%D9%84%D9%81%DB%8C

http://barnamenevis.org/forum/showthread.php?t=21113&highlight=%D8%AC%D8%AF%D8%A7+%DA%A9%D8%B1%D8%AF%D9 %86+%D8%B1%D9%82%D9%85+%D8%AF%D9%84%D9%81%DB%8C

shaghayegh_6113
سه شنبه 21 آبان 1387, 13:58 عصر
سلام
بستگی دارد که عدد را از چه نوعی تعریف کرده باشید مثلا اگر عدد فیلد int از یک query باشد در قسمت displayFormat آن باید ###, را تایپ کنید

behzad_dr
سه شنبه 21 آبان 1387, 14:30 عصر
دوست عزیز اگه به کد زیر دقت کنی متوجه میشی که داده ای که در یه dbedit داره نمایش می ده رو ، ویرایش کردم و علامت ، رو هر سه رقم اضافه کردم سپس اونو توی یه label بالای اون به نمایش می ذارم .. تازه به نظر من برای شکیل تر شدن اون نوشته جدید رو با قرمز نمایش بدی بهره


l:=0;
p:=',';
p2:=tDBEdit(Sender).Text;
f:=length(p2);
for o:=f downto 1 do
begin
if ((l mod 3=0) and (l<>0)) then
begin
Insert(p,p2,f-l+1);
end;
l:=l+1;
end;
label16.Caption:=p2;