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