Forum: Object-Pascal / Delphi-Language
Delphi
by stahli,
16. Jun 2020
Ja, ich fände das auch gut.
Es würde sich ja lediglich um eine andere Schreibweise von if-Statements handeln.
Der Compiler könnte quasi identischen Maschinencode wie bei if-Statements erzeugen.
Schwieriger wäre sicherlich, das auch dem Debugger beizubringen.
Wie hoch der Aufwand letztlich in Summe wäre, kann ich nicht wirklich beurteilen.
Forum: Object-Pascal / Delphi-Language
Delphi
by stahli,
15. Jun 2020
Entweder Round(AZoomFactor * 100) oder
mehrere if´s in dieser Form:
function TfrmEditor.GetZoomFactorAsPercent(
AZoomFactor: Single = 1): TibZoomFactorPercent;
begin
Result := TibZoomFactorPercent.Custom;
if (AZoomFactor = 0.10) then Exit(TibZoomFactorPercent.Percent10);