How to display "No Data" when there is no information to display in the TMS FNC Grid on TMS WEB Core.

[ByungIl_Lee]

I want to display "No Data" when there is no information to display in the TMS FNC Grid on TMS WEB Core. Please give us how.

[Pieter_Scheldeman (Pieter)]

This can be achieved with the following code

procedure TForm20.FormCreate(Sender: TObject);
begin
  TMSFNCGrid1.ColumnCount := 0;
  TMSFNCGrid1.RowCount := 0;
end;

procedure TForm20.TMSFNCGrid1AfterDraw(Sender: TObject;
  AGraphics: TTMSFNCGraphics; ARect: TRectF);
begin
  if (TMSFNCGrid1.ColumnCount = 0) and (TMSFNCGrid1.RowCount = 0) then
    AGraphics.DrawText(ARect, 'No Data', False, gtaCenter, gtaCenter);
end;