嗯嗯… 第一個問題… 當我要新增一筆資料時… 我要判斷當兩個欄位的資料相同時，不能讓其輸入… 則…如何去判斷兩個欄位呢… 我是使用以下程式…可是不行…  if (Table1.Locate('stu_id',Edit1.text,[]))and (Table1.Locate('crs_id',Edit2.text,[]))        then showmessage('學號 '+Edit1.text+'  , 課號  '+EDIT2.text+ '  重覆!!請重新輸入!') 請問有那裡寫錯嗎？ crs_id重覆時，就會出錯…        第二個問題是… 我有一個stu_id(學生學號)，他可以選很多課(crs_id) 但是在我修改這個學生所選的課號時， 存入資料庫時， 往往覆蓋的不是我要修改的那筆… 我該如何下指令去針對我要修改的資料呢？    

第一個問題： 您得判斷式變成：先用 Edit1.text 找尋學生編號，再用 Edit2.text 找課號，如果兩個 Locate 都成立，就出現警告訊息！問題是‧‧‧分開找當然找的到。 原因是 Locate 無法設定兩個搜尋式！ 第二個問題： 因為您找到的紀錄，本身就是錯的，所以改到的資料也是錯的！ 建議使用 TQuery ： Query_Temp.SQL.Clear; Query_Temp.SQL.Add('SELECT * FROM STU_BASE '); Query_Temp.SQL.Add('WHERE STU_ID =' Edit1.text ); Query_Temp.SQL.Add('AND CRS_ID =' Edit2.text ); Query_Temp.Close; Query_Temp.Open; if Query_Temp.RecordCount > 0 then begin ShowMessage('資料重複！'); abort; end;

Locate 是可以搜尋一個以上的欄位的 你可以試試: if Table1.Locate('stu_id;crs_id', VarArrayOf([Edit1.Text, Edit2.Text]),[]) then ShowMessage('學號 ' Edit1.text ' , 課號 ' EDIT2.text ' 重覆!!請重新輸入!'); 第二個問題也可以利用以上的方法, 在找到資料後再使用 Table1.Edit 去修改該筆資料

另一個想法 妳可以試試 在table1或(query1)的 onafterscroll事件寫

  var
    aa:string;
    bb: string;         aa:=Query1.FieldByName('stu_id').asstring;
     bb:=Query1.FieldByName('crs_id').asstring;
     if CompareText(aa,bb) = 0 then
     begin
     ShowMessage('學號 ' Edit1.text ' , 課號 ' EDIT2.text  ' 重覆!!請重新輸入!');
     end;

天行健 君子當自強不息~~@.@

------
天行健
君子當自強不息~~@.@

之前在忙期中考… 沒空上來回應… 謝謝大家…第一個問題解決了…    第二個問題…我再試試…不行的話再麻煩大家了…