很久之前就看到axsoft版主的大作,最近用到試了一下,結果出了問題;我完全照作,卻得到一個非預期結果 結果 wrong argument for if action diver supply marianne miles 22-44-500211 advanture undersea ..... . . . . . field state is of unknown type 以上不知是還有哪裡遺漏了,麻煩請指點一下,謝謝 axsoft 文章片斷------- . . 一個使用TQRGoups、TQRExpr控件的報表 該報表先列出州名，接著列出該州的所有公司及公司總數，一個州列完後空一行（groups中斷），列出新的州名，接著列新州下的所有公司，沒有填州名的公司統一列在Unknown state下面。 1. 建立一個新project。 2. 放一個Tquery在Tquickrep上，其SQL屬性為：select * from customer order by State,Company;(即根據州、公司排序)，DatabaseName為BCDMome,Active為true. 3. 放一個TquickRep控件在Form1上,DataSet為Tquery1. 4. 放一個TQRGroups控件在TquickRep上，這時默認為group header。（任何時候當group中斷或更高級別的group中斷，這個header都將打印出來，如果有表達式，根據表達式的值顯示內容。）接著添加一個group footer band,添加時，放一個TQRBand控件在報表上，連接TQRGroups的FooterBand屬性到這個QRBand，這時這個新建的TQRBand就成為Group Footer. （TQRGroup的一個重要特性是表達式，任何時候當表達式的值變時Group都將中斷，如表達式是按省列出城市名，當前列出廣東省，當屬於該省的城市列完後，表達式值改變，這時Group中斷，接著顯示其他省的城市名。）TQRGroups的Expression屬性設為Query1.State(根據不同的州來中斷)。 5. 放一個TQRBand控件在報表上,BandType為rbDetail. 6. 放一個TQRExpr控件在group header上面，其Expression屬性為：if(State<>’’,State,’Unknown state’)，即如果公司的州沒填，就歸入Unknown state,否則歸入State. 7. 放三個TQRDBText在Detail上，他們的DataSet都指向Query1,DataField分別指向Company,Contact,Phone. 8. 在放一個TQRExpr控件在group Footer上面,Expression為’Customers in’ State ’:’ Str(Count) 作用是在每個州的公司列完後顯示該州總共有多少個公司。 9. 按右鍵選預覽，應該看到不同的州名及其公司和公司公司總數。 . . . ----------------------- 謝謝您花費寶貴時間回應!!

------
**********************


**********************