無法做單一欄位查詢 |
答題得分者是:pedro
|
selo
一般會員 發表:3 回覆:5 積分:1 註冊:2008-03-11 發送簡訊給我 |
|
pedro
尊榮會員 發表:152 回覆:1187 積分:892 註冊:2002-06-12 發送簡訊給我 |
|
selo
一般會員 發表:3 回覆:5 積分:1 註冊:2008-03-11 發送簡訊給我 |
|
selo
一般會員 發表:3 回覆:5 積分:1 註冊:2008-03-11 發送簡訊給我 |
|
pedro
尊榮會員 發表:152 回覆:1187 積分:892 註冊:2002-06-12 發送簡訊給我 |
不清楚你的問題卡在哪裡,
試著從頭來看看你的問題出在哪裡? 我用下面的表單,是OK的 請先用乾淨的(剛置放在表單上)的ADOQuery元件, 資料庫用C:\Program Files\Common Files\Borland Shared\Data\dbdemos.mdb 填上語法select OrderNo,Sum(Qty) as totQty from items group by OrderNo 在DBGrid即可看到效果 [code delphi] object Form1: TForm1 Left = 192 Top = 114 Width = 783 Height = 540 Caption = 'Form1' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object DBGrid1: TDBGrid Left = 200 Top = 136 Width = 409 Height = 265 DataSource = DataSource1 TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] end object DataSource1: TDataSource DataSet = ADOQuery1 Left = 112 Top = 176 end object ADOQuery1: TADOQuery Connection = ADOConnection1 CursorType = ctStatic Parameters = <> SQL.Strings = ( 'select OrderNo,Sum(Qty) as totQty from items group by OrderNo') Left = 80 Top = 104 end object ADOConnection1: TADOConnection Connected = True ConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Co' 'mmon Files\Borland Shared\Data\dbdemos.mdb;Persist Security Info' '=False' Mode = cmShareDenyNone Provider = 'Microsoft.Jet.OLEDB.4.0' Left = 48 Top = 48 end end [/code] |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |