This example is how I look for nohp in a pulse transaction on the server. using tedit to find data on the next grid.
In the event of a change in tedit, the text will be searched to the next column of the grid. Column Nohp located at index 6. by looping from the first line to last line , it will seek the edit value in the column specified. If there is data that is similar or the text containing the data will be displayed in nextgrid

procedure TFrmMain.tcariChange(Sender: TObject);
var
  i: Integer;
  s: string;
  RowVisible: Boolean;
begin
  for i := 0 to gridtrx.RowCount - 1 do
  begin
    s := UpperCase(tcari.Text);
    RowVisible := (s = '') or
    (Pos(s, UpperCase(gridtrx.Cell[6, i].AsString)) > 0);
    gridtrx.RowVisible[i] := RowVisible;
  end;
end;

 

 

 

 

Print Friendly