如题
解决方案 »
- 如何将RecordSet中的数据集绑定到dbgrid中?
- dbgrideh过滤怎么设置
- 急!!有关ListView中如何做CheckBox?
- 关于连接文件服务器的问题!!!!急!
- 由于WinRAR解压出错,我的硬盘上出现许多文件名是乱码的文件名,这些文件Windows2000好像不能识别,以至于现在不能删除,怎么办?
- 这样可以的吗?-^-)
- 请问如何将存储过程控件检索出来的数据打印出来?
- 哪位高手知道Excel文件的格式?
- 新安装delphi7,发现少控件,高手支招
- 我想在打印报表时插入几条记录,但又最好不要插在基表中
- 如何取得C:\Documents and Settings\Administrator路徑
- 恶心的 3721!
with DBGrid1.DataSource.DataSet do
begin
for i := 0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBook(Pointer(DBGrid1.SelectedRows.Items[i]));
dosomething;
end;
end;
begin booklist := DBGrid.SelectedRows;
if booklist.Count > 0 then
begin
for I := 0 to booklist.Count-1 do
begin
Q_Query.Book := booklist[i];
Q_Query.Delete;
end;
end