請教一下 我想做Query1.RecNo 可是 這個動作 要加在哪裡呢 加在button內 似乎不對 我想做的 就是使用者點選DBGrid 然後label12.caption可以顯示 他目前點選第幾筆資料 懇請賜教 謝謝 附上該段語法-- procedure TFormSQL.Button1Click(Sender: TObject); var i, j: Integer; s: string; begin Query1.close; Query1.SQL.Clear; try Query1.SQL.ADD('' edit1.text ''); Query1.Prepare; Query1.Open; //dbgird的問題 if DBGrid1.SelectedRows.Count>0 then with DBGrid1.DataSource.DataSet do for i:=0 to DBGrid1.SelectedRows.Count-1 do begin GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i])); for j := 0 to FieldCount-1 do begin if (j>0) then s:=s ', '; s:=s Fields[j].AsString; end; s:= ''; end; label12.caption:='共有' inttostr(Query1.RecordCount) '筆資料'; //label12.caption:=inttostr(Query1.RecNo ); except on E: Exception do begin ShowMessage(E.Message); end; end; end;

做法怪怪的 在 Button1 的 OnClick 下做 Close/Open Dataset 的動作 那個 DBGrid1.SelectedRows.Count 應該都會是 0 吧!

TO 版主 是的 沒有錯 都是0 所以想請教一下 當我想要求Query1.RecNo 應該要放在哪裡比較適合呢 謝謝

引言: TO 版主 是的 沒有錯 都是0 所以想請教一下 當我想要求Query1.RecNo 應該要放在哪裡比較適合呢 謝謝

將以下這段放在另一個 Button 的 OnClick 下試試:

  Query1.close;
  Query1.SQL.Clear;
  Query1.SQL.ADD(''   edit1.text   '');
  Query1.Prepare;
  Query1.Open;

那請教一下 偵測Query1.RecordCount應該要寫在哪裡 比較適當呢 謝謝

引言: 那請教一下 偵測Query1.RecordCount應該要寫在哪裡 比較適當呢 謝謝

在 Query1 開啟(Open)後, 就可以知道其 RecordCount 了。 ex:

begin
  Query1.Close;  
  Query1.SQL.Text := 'Select * From TableA';  
  Query1.Open;
  Label1.Caption := IntToStr(Query1.RecordCount);
end;