現在每掃一個條碼他就會ENTER到下一行 所以要在它到下一行之前就要去發生事件去資料庫抓到這個條碼 然後把資料庫的資料顯示出來以後再ENTER 就很像是刷商品 會出來商品的條碼及價錢 我查過DELPHI的書 好像都沒寫到 所以請教一下大家 謝謝

papalili 你好 :    讀取條碼與鍵盤輸入並沒有什麼不同.    假設是 Focus 在 Edit1 上讀取條碼, 可在 Edit1.OnKeyDown Event :    

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key=13 then begin
    // Open DataSet...
  end;
end;

樓上的大大講的就是答案，對付條碼、磁條掃描器，就是對付人手輸入鍵盤的方法一樣，用個EDIT來接收輸入的資料，在EDIT.ONKEYPRESS時檢查是不是有輸入#13 (條碼掃描器在輸入完成後會加ENTER字符#13)，如果出現#13是就完成輸入，那EDIT.TEXT就是你要讀的條碼值~!~大部份都是數字字碼，也有英文字碼的版本，不過那不是你要管的事情，現在的SCANNER都會自動判斷條碼規格及識別字碼，你只要負責接收來自於KEYBOARD的EVENT就好了 我不懂，不懂，不懂....所以我才來ktop學工夫

我大概知道各位大大的意思了 可是我現在要做的像一般我們在外面看的結帳的畫面(用DBGRID) 就是刷出條碼來,這個條碼就要去資料庫抓這個條碼的條碼 並且顯示出來這個商品及價格 是像這位大大寫的判斷完這些數字後,就觸發搜尋資料庫這個條碼 看有沒有這個條碼,然後把我們要顯示出來的欄位給一起拉出來嗎?

正是正是~你從keypress這個event中去處理資料庫就好，每當這個條碼輸入的EDIT的ENTER鍵被觸發，你就在這個EVENT里查詢資料庫，把查到的資料顯示在畫面上即可 我不懂，不懂，不懂....所以我才來ktop學工夫

OK 謝謝你們 我知道流程了