![]() |
Visuelle Komponente für VCL and FMX Framework
ich möchte eine Erweiterung der CheckListBox als Komponente sowohl für das VCL als auch für das FMX Framework anbieten
Delphi-Quellcode:
TCheckListBoxErweiterung = class(
{$IFDEF FrameWork_VCL} TCheckListBox {$ENDIF} {$IFDEF FrameWork_FMX} TListBox {$ENDIF} ) private ... end; ist so was machbar? Wird diese Komponente dann in die Komenetenliste für beide GUI Frameworks aufgenommen? Akuell habe ich diverse Compiler Fehler dich ich nicht beheben kann, die Ursprüngliche Version mit nur VCL Unterstützung hat problemlos funktioniert. |
AW: Visuelle Komponente für VCL and FMX Framework
Das geht, aber du musst das etwas anders machen, wenn du die Komponente für beide Frameworks registrieren möchtest:
Delphi-Quellcode:
Auf diese Weise wird der Quelltext doppelt eingebunden, sowohl unter interface als auch unter implementation. Mit UseVCL und UseFMX bzw. UseInterface und UseImplementation musst du in der eingebundenen Unit dann unterscheiden...
{$define UseInterface}
TCheckListBoxExtendedVCL = class(TCheckListBox) {$define UseVCL} {$i 'CheckListBox.pas'} end; TCheckListBoxExtendedFMX = class(TListBox) {$define UseFMX} {$i 'CheckListBox.pas'} end; implementation {$undef UseInterface} {$define UseImplementation} {$define UseVCL} {$i 'CheckListBox.pas'} {$define UseFMX} {$i 'CheckListBox.pas'} Ob sich eine solche Vorgehensweise hier lohnt und sinnvoll ist, kann ich nicht beurteilen. Ich persönlich habe für FMX und VCL lieber getrennte Units, die nur die Logik soweit wie möglich in gemeinsamen Units teilen. |
AW: Visuelle Komponente für VCL and FMX Framework
sieht nach dem falschen Ansatz aus ... ich glaube ich verabschiede mich von der Idee und mache auch VCL und FMX getrennt :-(
|
AW: Visuelle Komponente für VCL and FMX Framework
TMS hat das mit seinem FNC Komponenten bereits seit einigen Jahren umgesetzt. Schau dir mal an, wie der das gemacht hat ...
|
AW: Visuelle Komponente für VCL and FMX Framework
+1 Für separate Units U.Vcl U.Fmx
Es geht ja bei FMX womöglich noch weiter in U.FMX.And, U.FMX.iOS, ... Deshalb besser gleich alles sauber in UnterUnits separieren. Vielleicht ist ![]() |
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:31 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz