一些問題 = = |
|
答題得分者是：christie
|
|
g9614721
一般會員   發表：27 回覆：51 積分：15 註冊：2008-07-23 發送簡訊給我 |
procedure TForm1.Button29Click(Sender: TObject);
begin form1.Query1.Close; form1.Query1.SQL.Clear; form1.Query1.SQL.Add('Select sum(進貨數量)-sum(領用數量) as 總計 from T_buy where 物品名稱="' edit16.text '"group by msds,'); form1.Query1.Open; end; end. 1.請問如何將總計顯示在 dbedit 上面呢? 讓from一啟動時 就會自動計算 然後顯示在dbedit上面 2.若是顯示在dbgird上面 如何將 進貨數量 領用數量 那些欄位 一起帶出來 和總計 一起顯示在gird上面呢?@@ |
|
christie
資深會員  發表：30 回覆：299 積分：475 註冊：2005-03-25 發送簡訊給我 |
問題二:
拉 TDataSource / TDBGrid DBGrid1屬性DataSource設為DataSource1 DataSource1屬性DataSet設為Query1 procedure TForm1.Button29Click(Sender: TObject); begin Query1.SQL.Text:='Select sum(進貨數量) as 進貨總量,sum(領用數量) as 領用總量,'; Query1.SQL.Add('sum(進貨數量)-sum(領用數量) as 總計 from T_buy where 物品名稱="' edit16.text '"group by msds,'); Query1.Open; end; 問題一: Form.OnCreate From一啟動時 就會自動計算, 值請放Edit。 ===================引 用 g9614721 文 章=================== procedure TForm1.Button29Click(Sender: TObject); begin form1.Query1.Close; form1.Query1.SQL.Clear; form1.Query1.SQL.Add('Select sum(進貨數量)-sum(領用數量) as 總計 from T_buy where 物品名稱="' edit16.text '"group by msds,'); form1.Query1.Open; end; end. 1.請問如何將總計顯示在 dbedit 上面呢? 讓from一啟動時 就會自動計算 然後顯示在dbedit上面 2.若是顯示在dbgird上面 如何將 進貨數量 領用數量 那些欄位 一起帶出來 和總計 一起顯示在gird上面呢?@@
------
What do we live for if not to make life less difficult for each other? |
|
g9614721
一般會員 發表：27 回覆：51 積分：15 註冊：2008-07-23 發送簡訊給我 |
有錯誤發生
我將它們放在一起 就可行了 修改成這樣 就沒問題了! form1.Query1.Close; form1.Query1.SQL.Clear; form1.Query1.SQL.Add('Select sum(進貨數量) as 進貨總量,sum(領用數量) as 領用總量,sum(進貨數量)-sum(領用數量) as 總計 from T_buy where 物品名稱="' edit16.text '"'); form1.Query1.Open; 3Q大大 但如何才能上述三個欄位 抓到DBEDIT 呢 因為那似乎是虛擬的欄位=.= DBEDIT 不知道怎麼抓 ===================引 用 christie 文 章=================== 問題二: 拉 TDataSource / TDBGrid DBGrid1屬性DataSource設為DataSource1 DataSource1屬性DataSet設為Query1 procedure TForm1.Button29Click(Sender: TObject); begin Query1.SQL.Text:='Select sum(進貨數量) as 進貨總量,sum(領用數量) as 領用總量,'; Query1.SQL.Add('sum(進貨數量)-sum(領用數量) as 總計 from T_buy where 物品名稱="' edit16.text '"group by msds,'); Query1.Open; end; 問題一: Form.OnCreate From一啟動時 就會自動計算, 值請放Edit。 ===================引 用 g9614721 文 章=================== procedure TForm1.Button29Click(Sender: TObject); begin form1.Query1.Close; form1.Query1.SQL.Clear; form1.Query1.SQL.Add('Select sum(進貨數量)-sum(領用數量) as 總計 from T_buy where 物品名稱="' edit16.text '"group by msds,'); form1.Query1.Open; end; end. 1.請問如何將總計顯示在 dbedit 上面呢? 讓from一啟動時 就會自動計算 然後顯示在dbedit上面 2.若是顯示在dbgird上面 如何將 進貨數量 領用數量 那些欄位 一起帶出來 和總計 一起顯示在gird上面呢?@@ |
|
g9614721
一般會員 發表：27 回覆：51 積分：15 註冊：2008-07-23 發送簡訊給我 |
有錯誤發生
我將它們放在一起 就可行了 修改成這樣 就沒問題了! form1.Query1.Close; form1.Query1.SQL.Clear; form1.Query1.SQL.Add('Select sum(進貨數量) as 進貨總量,sum(領用數量) as 領用總量,sum(進貨數量)-sum(領用數量) as 總計 from T_buy where 物品名稱="' edit16.text '"'); form1.Query1.Open; 3Q大大 但如何才能上述三個欄位 抓到DBEDIT 呢 因為那似乎是虛擬的欄位=.= DBEDIT 不知道怎麼抓 ===================引 用 christie 文 章=================== 問題二: 拉 TDataSource / TDBGrid DBGrid1屬性DataSource設為DataSource1 DataSource1屬性DataSet設為Query1 procedure TForm1.Button29Click(Sender: TObject); begin Query1.SQL.Text:='Select sum(進貨數量) as 進貨總量,sum(領用數量) as 領用總量,'; Query1.SQL.Add('sum(進貨數量)-sum(領用數量) as 總計 from T_buy where 物品名稱="' edit16.text '"group by msds,'); Query1.Open; end; 問題一: Form.OnCreate From一啟動時 就會自動計算, 值請放Edit。 ===================引 用 g9614721 文 章=================== procedure TForm1.Button29Click(Sender: TObject); begin form1.Query1.Close; form1.Query1.SQL.Clear; form1.Query1.SQL.Add('Select sum(進貨數量)-sum(領用數量) as 總計 from T_buy where 物品名稱="' edit16.text '"group by msds,'); form1.Query1.Open; end; end. 1.請問如何將總計顯示在 dbedit 上面呢? 讓from一啟動時 就會自動計算 然後顯示在dbedit上面 2.若是顯示在dbgird上面 如何將 進貨數量 領用數量 那些欄位 一起帶出來 和總計 一起顯示在gird上面呢?@@ |
發表時間：2008-11-12 17:12:50
IP:140.125.xxx.xxx 訂閱
系統時間：2024-05-06 15:16:29
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |