Einzelnen Beitrag anzeigen

Luckner

Registriert seit: 28. Nov 2006
Ort: Berlin
418 Beiträge
 
Delphi 7 Enterprise
 
#1

Fastreport, Variable Fontgrösse abhängig von Anzahl der Buchstaben

  Alt 1. Okt 2021, 11:31
Hallo,
möchte gerne beim Ausdruck mit Fastreport, eine Variable, die verschiedene Anzahl von Zeichen enhalten kann aber das Feld eine konst. Grösse hat, die Fontgrösse ändern, damit die Zeichen in dieses Feld passen. Mein Versuch:
Delphi-Quellcode:
procedure Doppel7OnBeforePrint(Sender: TfrxComponent);
begin
  if Length(Doppel7) > 10 then
    Doppel7.Font.Size := 8
  else
    Doppel7.Font.Size := 10;
end;
ändert nichts.

Die nächste Routine macht Fehler beim Aufruf.
Delphi-Quellcode:
procedure Doppel7OnBeforePrint(Sender: TfrxComponent);
begin
  if Length(<frxReportAufstellung."Doppel7">) > 10 then
   // Doppel7.Font.Size := 8
   <frxReportAufstellung."Doppel7">.Font.Size := 8
  else
   // Doppel7.Font.Size := 10;
   <frxReportAufstellung."Doppel7">.Font.Size := 10;
end;
"Doppel7" ist die entsprechende Variable. Die Übergabe des Inhaltes funktioniert. Formatierung jedoch nicht.

Gruß, Luckner

Geändert von Luckner ( 1. Okt 2021 um 12:06 Uhr)
  Mit Zitat antworten Zitat