Atozed Forums

Full Version: How to select dbgrid row by click
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
Hello,
i don't arrive solve my problem,
i think is  simple,

just when i click on dbgrid select the row

thank's a lot for your help
best regards
In Properties:
dgTails.columns[1].LinkField := KLY;

and

procedure TfmTail.dgTailsColumns1Click(ASender: TObject; const AValue: string);
begin
with dmTail do
begin
if tTails.FieldByName('KLY').AsString = AValue then
begin
btPlanClick(ASender);
end else begin
tTails.First;
while not tTails.Eof do
begin
if tTails.FieldByName('KLY').AsString = AValue then break;
tTails.Next;
end;
end;
end;
end;
Hello,
thank you very mutch that work very well
Thank's a lot.

do you knwon if it's possible to change row color on row select ?

Thank's a lot for your help
best regards

hello,

here the solution that work well for information in future

procedure TIWFormModifTache.IWDBGridListeTachesRenderCell(ACell: TIWGridCell;
  const ARow, AColumn: Integer);
begin

          // -1 is Footer Row
  if ARow = -1 then
  begin
    ACell.BGColor := clSilver;
    if AColumn = 0 then
    begin
      ACell.Font.Color := clRed;
      ACell.Text := IntToStr(IWDBGridListeTaches.RecordCount);
    end;
  end
  else if IWDBGridListeTaches.RowIsCurrent then
  begin
    ACell.BGColor := clYellow;
  end;
end;