[FastReport] 칸에 맞게 폰트 자동 조절하기

TfrxMemoView의 Properties 중

WordBreak := False;
WordWrap := False;

TfrxMemoView의 이벤트에서

OnAfterData와 OnAfterPrint, OnBeforePrint 중 선택하여 스크립트에 아래 이벤트를 적용.

procedure MemoOnFontAutoSize(Sender: TfrxComponent);
begin
  with TfrxMemoView(Sender) do begin
    if Text = '' then
      Exit;

    while (CalcHeight < Height) or (CalcWidth < Width) do
      Font.Size := Font.Size + 1;

    while (CalcHeight > Height) or (CalcWidth > Width) do
      Font.Size := Font.Size - 1;
  end;
end;