My Visual Database — gridUsers

Re: gridUsers

null@example.com (Patriot10200) — Mon, 07 Apr 2025 12:17:02 +0000

Благодарю

Совсем забыл про эту часть кода (TAForm(frmdbCoreUsers).OnActivate := @frmdbCoreUsers_OnActive;)

Re: gridUsers

null@example.com (k245) — Mon, 07 Apr 2025 09:30:17 +0000

procedure frmdbCoreUsers_OnActive (Sender: TObject;);
begin
   frmdbCoreUsers.gridUsers.Columns[4].Header.MultiLine := True;
   frmdbCoreUsers.gridUsers.Columns[4].Header.Caption := 'Пятый'+chr(10)+'столбец';
   frmdbCoreUsers.gridUsers.HeaderSize := 36;
end;

begin
  TAForm(frmdbCoreUsers).OnActivate := @frmdbCoreUsers_OnActive;
end.

gridUsers

null@example.com (Patriot10200) — Mon, 07 Apr 2025 06:47:28 +0000

Доброго времени, нужно изменить имена шапки таблицы пользователей, пытался не получается, может подскажете?
использовал код типо

procedure frmdbCoreUsers_gridUsers_OnActive;
begin
frmdbCoreUsers.gridUsers.Columns[7].Header.MultiLine := True;
frmdbCoreUsers.gridUsers.Columns[7].Header.Caption := 'Седьмой столбец';
end;

так же пробовал процедуру OnChange