how Stringgrid first line fasten?

[mehmet07]

Hi,

how Stringgrid first line fasten?

 

[Sherzod]

Hi mehmet pak.

 

If I understand correctly. You want to freeze the first row?

 

Honestly I could not do it in the stringgrid ...

If anyone can, it would be good ...

 

 

But, in my opinion, you can use two unistringrid on one panel.

   

   1. Unistringgrid1: rowCount = 1, Align = AlTop, you need to find the height of ... (e.g. Height = 24)

   2. Unistringgrid2: rowCount = 100, Align = AlClient

 

procedure TMainForm.UniStringGrid1MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  if UniStringGrid2.Col <> UniStringGrid1.Col then UniStringGrid2.Col := UniStringGrid1.Col;
end;

procedure TMainForm.UniStringGrid2MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  if UniStringGrid1.Col <> UniStringGrid2.Col then UniStringGrid1.Col := UniStringGrid2.Col;
end;

 

 

Sincerely ...

 

[mehmet07]

tanks Duser.