全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1308
推到 Plurk!
推到 Facebook!

統一發票編號的問題!!

 
angel
一般會員


發表:13
回覆:9
積分:4
註冊:2002-03-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2002-06-20 11:36:15 IP:203.204.xxx.xxx 未訂閱
請教各位前輩: 小妹目前想要做統一發票自動編號的程式, 假設給定一固定編號.起始流水號.截止流水號 ex: 固定編號: AB1234 起始流水號:5001 截止流水號:6000 所以產生結果應為 AB12345001 ~ AB12346000 要如何寫呢?? 請大家幫幫忙!! 謝謝
klmer
一般會員


發表:11
回覆:46
積分:13
註冊:2002-03-13

發送簡訊給我
#2 引用回覆 回覆 發表時間:2002-06-20 11:47:48 IP:210.243.xxx.xxx 未訂閱
procedure TForm1.Button1Click(Sender: TObject); var s:string; i:integer; begin memo1.Clear; s:='AB1234';//固定編號 for i := 5001 //起始號 to 6000 //結束號 do begin s := s inttostr(i) #10#13; Memo1.lines.add(s); s:='AB1234'; end; end; try try 看 我是把結果寫到 memo裡面 結果會是 AB12345001 AB12345002 : AB12346000 不知道是不是你要的結果呀....
angel
一般會員


發表:13
回覆:9
積分:4
註冊:2002-03-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2002-06-21 14:50:41 IP:203.204.xxx.xxx 未訂閱
謝謝指教!! 我發覺有時自己應該要先想想看再問..... 太仰賴別人幫忙就不好囉!!
syntax
尊榮會員


發表:26
回覆:1139
積分:1258
註冊:2002-04-23

發送簡訊給我
#4 引用回覆 回覆 發表時間:2002-06-24 21:31:37 IP:203.204.xxx.xxx 未訂閱
....不會吧 !! @_@ 不過 你的問題是太簡單了一點 像小學生的程度 可是 不會就要問 這樣才會進步
whyzn
中階會員


發表:46
回覆:149
積分:54
註冊:2002-06-16

發送簡訊給我
#5 引用回覆 回覆 發表時間:2002-06-24 23:45:24 IP:61.223.xxx.xxx 未訂閱
引言: ....不會吧 !! @_@ 不過 你的問題是太簡單了一點 像小學生的程度 可是 不會就要問 這樣才會進步
自己先鑽研,真的沒辦法解決再求助,這樣會進步得更快 ●○○○○○●○○○○○● 竹密不妨水過,山高無礙雲飛
------
●○○○○○●○○○○○●
竹密不妨水過,山高無礙雲飛
系統時間:2017-11-19 22:10:54
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!