Gostaria de saber como faço para pegar o evento click
de uma linha qualquer, retornada do BD no GridView
.
Por exemplo, o GridView
me mostra 3 linhas, quero clicar numa dessas linhas e executar uma determinada ação.
Gostaria de saber como faço para pegar o evento click
de uma linha qualquer, retornada do BD no GridView
.
Por exemplo, o GridView
me mostra 3 linhas, quero clicar numa dessas linhas e executar uma determinada ação.
Procure o evento onClick
na palheta de Object Inspector.
Ao clicar no Grid ele já seta no registro do banco de dados, então você pode capturar o id
e fazer o teste.
procedure Tfrm.DBGri1Click(Sender: TObject);
begin
case TQuery.fieldbyname('id').asInteger of
1:;
2:;
end;
end;
Uma outra alternativa é usar o evento OnCellClick
, ele é disparado quando o usuário clica em alguma célula da grade.
Veja um exemplo:
procedure TForm1.DBGrid1CellClick(Column: TColumn);
var
ID: integer;
begin
ID := DBGrid1.Fields[0].AsInteger; // Pega a o valor da primeira coluna selecionada
case ID of
1: ShowMessage('João');
2: ShowMessage('José');
3: ShowMessage('Maria');
else
ShowMessage('Nome desconhecido!');
end;
end;
ShowMessage(Column.Field.AsString)
.