delphi DBGrideh如何删除一列或多列？
展开全部
if DBGrid1.SelectedRows.CurrentRowSelected = True then //判断当前行是否被选中
begin
if MessageBox(Handle,'确定要删除记录吗？', '提示', mb_IconInformation+mb_YesNo+mb_DefButton2) = mrYes then
DBGrid1.SelectedRows.Delete
end
else
Application.MessageBox(PChar('没有任何记录或者没有被选中！'), '提示', mb_IconInformation);
begin
if MessageBox(Handle,'确定要删除记录吗？', '提示', mb_IconInformation+mb_YesNo+mb_DefButton2) = mrYes then
DBGrid1.SelectedRows.Delete
end
else
Application.MessageBox(PChar('没有任何记录或者没有被选中！'), '提示', mb_IconInformation);
追问
这事删除行吗？我想问的是列
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
