delphi貨幣轉數字
⑴ 請各位用delphi幫忙編寫一個人民幣大小寫轉換函數
我不會用DELPH寫,會用別的語言寫
⑵ Delphi中將字元串和數字之間相互轉換的函數,具體使用方法及格式(舉個例子,要說明數據類型等)
整數到字元串 IntTostr() 字元串＝IntTostr(整數)
字元串到整數 strToInt()
字元串到小數 StrToFloat()
小數到字元串 FloatToStr()
⑶ delphi中如何實現數字大小寫轉換.不要人民幣金額轉換的.
const
S1='壹';
S2='貳';
S3='叄';
S4='肆';
var
Str: String;
i: integer;
begin
Str:='1234';
edit1.Text:=str;
for i:=1 to length(str) do
case Str[i] of
'1': label1.Caption:=S1;
'2': label2.Caption:=S2;
'3': label3.Caption:=S3;
'4': label4.Caption:=S4;
end;
怎麼沒懸賞分的。
⑷ Excel 怎樣用公式把貨幣轉化成數值用
一、用公式將文本數字轉成數值：
假設文本數據寫在A1單元格，則可以在B1單元格寫入以下任一個公式
公式一
=A1*1
公式二
=A1、1
公式三
=A1+0
公式四
=A1-0
公式五
=--A1
公式六
=VALUE(A1)
二、把文本數值在原單元格直接轉換成數值：
方法一
選中單元格----右鍵----設置單元格格式---改"文本"為"常規"格式---再進入單元格回車確認.如果是大批量的單元格是文本格式的數值,則要一個一個的進入單元格進行回車確認,所以很不方便.
方法二
選中一個空單元格----右鍵----復制----再選中文本格式所在的單元格和單元格區域----右鍵----選擇性粘貼---加---確定.這樣就是通過運算的方法使選中的單元格或單元格區域進行加0處理使其轉為常規數字的方式.
方法三
選中文本格式數值所在的單元格或單元格區域------在選中的單元格或單元格區域旁會出現一個選項圖標----點擊會出現選項菜單----選擇"轉為數字"
⑸ delphi 阿拉伯數字轉化成中文數字
數要小於1億，代碼如下，供參考：
var
n:longint;
a:array[1..8]ofinteger;
b:array[1..8]ofstring;
i,k,m:integer;
s,st:string;
procereinsert(varm:integer;x:integer);
begin
ifm=0thena[1]:=xelsea[m+1]:=x;
inc(m);
end;
begin
n:=83007305;
{readln(n);}
m:=0;
b[1]:='';b[2]:='十';b[3]:='百';b[4]:='千';b[5]:='萬';
b[6]:='十';b[7]:='百';b[8]:='千';
whilen>0dobegin
insert(m,nmod10);
n:=ndiv10;
end;
s:='';
fori:=mdownto1dobegin
str(a[i]:0,st);
k:=length(s);
ifi<>5then
ifa[i]=0thenbegin
if(s,k-1,2)<>'零'thens:=s+'零';
endelses:=s+st+b[i];
ifi=5then
ifa[i]=0thenbegin
if(s,k-1,2)<>'零'thens:=s+'萬'
elses:=(s,1,k-2)+'萬';
endelses:=s+st+b[i];
end;
if(s,length(s)-1,2)='零'thens:=(s,1,length(s)-2);
writeln(s);
end.
⑹ excel表格里如何將數字轉換成貨幣數字
將數字轉換為貨幣數字，其實就是將數值單元格格式設置為貨幣格式。依次步驟為：
選中需要設置的單元格，滑鼠右擊選擇單元格格式
出現單元格格式對話框，點擊數字選項卡（一般默認數字選項卡激活）
點擊會計專用，按自己的需求選擇貨幣符號以及小數點位數，然後確定
如下圖具體錄制的操作：
⑺ delphi 如何把標准格式的數字字元串轉換為數字
str := '1,350';
str := stringreplace(str, ',','',[rfReplaceAll]);
i := strtointDef(str, 0);
⑻ Delphi 文字轉換成數字
你如果再EIDT1.TEXE里輸入姓名肯定會報錯了！你用了一個轉換函數了！樓上的基本正解但要去掉 num:=strToint(Edit1.Text);
⑼ c#將數字轉換為貨幣格式
int i = 60000;
string d=i.ToString("c");
⑽ delphi 中怎麼把字元串轉化成數字
用函數strtofloat