TAdvStringGrid ans OnGetFormat


I want to format columns with a thousand separator :
procedure TfrmAccueil.stgGrilleFrnsTotalGetFormat(Sender: TObject;
  ACol: Integer; var AStyle: TSortStyle; var aPrefix, aSuffix: string);
  if ACol > 0 then  AStyle:= ssFinancial;
but the event is not active
I put a breakpoint on the line, but the debugger does not stop.

Why this event does not work?
Kin Regards

This event is for sorting.
The event to control the display format is OnGetFloatFormat.

Sorry, I had looked at using deTAdvStringGrid Example 7 in C ++ Builder.
Thank you for your response.