不讓User在DbGrid下隨便新增資料的問題. |
尚未結案
|
ooctiger
一般會員 發表:25 回覆:46 積分:14 註冊:2002-07-08 發送簡訊給我 |
|
huangeider
高階會員 發表:288 回覆:492 積分:231 註冊:2003-02-26 發送簡訊給我 |
在form1按下button後 form2會跑出來
使用者選form2內的query1所篩選的record後
按確定後 form2關閉
所選的資料會加入form1上的table1中
在form1中 procedure TForm1.Button1Click(Sender: TObject); begin try form1:=tform1.create(application); form2.query1.close; form2.query1.sql.clear; form2.query1.sql.add('select no,name,da1,da2 from 資料表 where no between 1 and 3'); form2.query1.open; form1.showMODAL; finally form1.free; end; end;在form2中 按下button確定鈕 procedure TForm2.Button1Click(Sender: TObject); begin form1.table1.insert; form1.table1.fieldbyname('no').asstring:= query1.fieldbyname('no').asstring; form1.table1.fieldbyname('name').asstring:= query1.fieldbyname('name').asstring; form1.table1.fieldbyname('da1').asstring:= query1.fieldbyname('da1').asstring; form1.table1.fieldbyname('da2').asstring:= query1.fieldbyname('da2').asstring; form1.table1.post; close; end; 「堅持」從洗馬桶做起 Aric 發表人 - huangeider 於 2003/11/10 12:23:14 |
ooctiger
一般會員 發表:25 回覆:46 積分:14 註冊:2002-07-08 發送簡訊給我 |
不讓User在DbGrid下隨便新增資料的問題. 1.DBGrid下需新增資料 2.資料的來源是TQuery從一個資料表所Select出的
例如:
No Name Da1 Da2
01 John AA 12
02 Jane AB 10
03 Mary CA 52 3.請問我要如何在新增的Button按下時能夠讓User
選擇要上述要新增的資料,然後按下確定的Button後
將資料新增至我所要存檔的TABLE中. 4.另外一個條件是新增時可能只有要新增No='02'的這一筆紀錄
我應該如何做?
|
huangeider
高階會員 發表:288 回覆:492 積分:231 註冊:2003-02-26 發送簡訊給我 |
1 當form2出現時在form2中正常下應有tdbgrid相連到query1
此時使用者就可以選擇要加入的record了
當按下確定後所新增的就是當時所選的record了
如選了no 為02的record再按確定button鈕後no 02那筆資料
就會新增到table1中
2 若要把程式寫死了,直接在用query1時作篩選no 為02的出來
不用show出form2直接就可以新增
3 若已知要新增的某筆代號 不用query篩選也可以用table
作if locate('no',02,[])=true的動作,把要選的資料找出來
再作新增
2跟3都可以在form1用一個button或元件作 「堅持」從洗馬桶做起
Aric
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |