delphi 判断刚编辑过某行

var
SelRow,SelCol:Integer;
////
procedure TForm1.StringGrid1SetEditText(Sender: TObject; ACol,
ARow: Integer; const Value: String);
begin
SelRow := ARow;
SelCol:=ACol;
end;

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
begin
if (SelRow<>ARow) or (SelCol<>ACol) then
begin
if StringGrid1.Cells[SelCol,SelRow]<>'a' then
showmessage('not valid!');
end;
end; 

阅读更多
文章标签: delphi integer string
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

不良信息举报

delphi 判断刚编辑过某行

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭