摘要:
这里指的输入设置主要是扫描枪或者磁条卡刷卡设备 如果仅是IC卡ID卡的,直接设置ReadOnly为True就可以了 根据输入速度判断 OnKeyPress …………….. if NeedCard and _IsKey then begin // if Edit1.Text = '' then begin lctime := GetTickCount; Timer_input.... 阅读全文
摘要:
dxMemData1.SortedField := Lindex; dxMemData1.SortOptions := []; var i: Integer; begin // dxDBGrid_ColumnClick(TdxDBGrid(Sender), Column); dxMemData2.DisableControls; for i := 0 to dxDB... 阅读全文
摘要:
procedure TForm1.Button1Click(Sender: TObject); begin dxMemData1.CopyFromDataSet(ADOQuery1); end; procedure TForm1.Button2Click(Sender: TObject); begin with dxMemData1 do begin // dxMemD... 阅读全文