• From: Gotham City
  • Registered: 2017-12-31
  • Posts: 406

Topic: hello Dmitiry Derek and All users

how can we auto adjust row height equal to tablegrid size...
i mean when we add new or delete row then row height automatically Increase or decrease.  see attachments ..

Post's attachments

Attachment icon Pumps.zip 366.17 kb, 270 downloads since 2019-03-09 

  • Registered: 2014-02-14
  • Posts: 10,294

Re: hello Dmitiry Derek and All users

procedure Form1_GridEmployees_OnChange (Sender: string);
var
    i, c: integer;
begin

    c := Form1.GridEmployees.Columns.Count - 1;
    for i := 0 to c do
    begin
        Form1.GridEmployees.Columns[i].VerticalAlignment := taAlignTop;
        Form1.GridEmployees.Columns[i].WrapKind := wkWordWrap;
    end;

    c := Form1.GridEmployees.RowCount - 1;
    for i := 0 to c do Form1.GridEmployees.BestFitRow(i);
end;
Dmitry.