====== Razvoj Controla ====== Workflow za kreiranje novih UI-Controla za WvdS FPC RAD Suite. Controls moraju funkcionirati za **Design-Time** (VS Code Designer) i **Runtime** (Desktop/TUI/Web). ===== Pregled ===== Control se sastoji od više slojeva: ^ Sloj ^ Svrha ^ Putanja ^ | Runtime Model | Target-neutralna logika | ''~/sources/common/ui/controls/{category}/'' | | Target Renderer | Target-specifični prikaz | ''~/sources/common/ui/targets/{target}/renderers/'' | | Pack Manifest | PXAML-Tag → Klasa Mapping | ''~/packs/controls/{control_id}/'' | | Designer Metadata | Toolbox, Properties, Events | ''~/sources/extensions/wvds.vscode.ui.meta/'' | ===== Varijable ===== Pri kreiranju Controla definirajte ove varijable: ^ Varijabla ^ Primjer ^ Opis ^ | ''{CONTROL_ID}'' | ''dateedit'' | Jedinstveni identifikator (lowercase) | | ''{CONTROL_CLASS}'' | ''TWvdSDateEdit'' | Pascal-naziv klase | | ''{PXAML_TAG}'' | ''DateEdit'' | Naziv taga u PXAML-u | | ''{PXAML_NS}'' | ''wvds'' | Namespace (wvds za interne Controls) | | ''{TARGETS}'' | ''tui,desktop,web'' | Podržani targeti | ===== Workflow (7 koraka) ===== ==== Korak 1: Contract Freeze ==== Definirajte javni API Controla: **Properties:** (* Minimalni skup javnih Properties *) property Value: TDateTime read FValue write SetValue; property Format: string read FFormat write SetFormat; property MinDate: TDateTime read FMinDate write FMinDate; property MaxDate: TDateTime read FMaxDate write FMaxDate; property ReadOnly: Boolean read FReadOnly write FReadOnly; **Events:** (* Potrebni Events *) property OnValueChanged: TWvdSNotifyEvent read FOnValueChanged write FOnValueChanged; property OnValidating: TWvdSValidateEvent read FOnValidating write FOnValidating; **TargetCaps:** ^ Capability ^ TUI ^ Desktop ^ Web ^ | Keyboard | Required | Required | Required | | Mouse | Optional | Required | Required | | Touch | N/A | Optional | Optional | | Popup | Optional | Required | Required | ==== Korak 2: Runtime Model Unit ==== Kreirajte target-neutralnu Model-Unit: **Putanja:** ''~/sources/common/ui/controls/{category}/WvdS.UI.Controls.{Category}.{ControlId}.pas'' unit WvdS.UI.Controls.Editors.DateEdit; {$mode objfpc}{$H+} interface uses WvdS.UI.Core.Base, WvdS.UI.Core.Events; type (* @abstract(Polje za unos datuma s Kalender-Popupom) Target-neutralni Model za DateEdit. Ne sadrži ovisnosti o Renderingu ili Hostu. *) TWvdSDateEdit = class(TWvdSControl) private FValue: TDateTime; FFormat: string; FOnValueChanged: TWvdSNotifyEvent; procedure SetValue(AValue: TDateTime); protected procedure DoValueChanged; virtual; public constructor Create(AOwner: TWvdSComponent); override; property Value: TDateTime read FValue write SetValue; property Format: string read FFormat write FFormat; property OnValueChanged: TWvdSNotifyEvent read FOnValueChanged write FOnValueChanged; end; implementation (* Implementacija bez Target-specifičnog koda *) end. **Bez Target-specifičnih ovisnosti!** Nema DOM-a, nema Terminal-I/O-a, nema LCL-Units. ==== Korak 3: Target Renderer Units ==== Za svaki Target u ''{TARGETS}'' kreirajte Renderer: === TUI Renderer === **Putanja:** ''~/sources/common/ui/targets/tui/renderers/WvdS.UI.TUI.Renderers.DateEdit.pas'' unit WvdS.UI.TUI.Renderers.DateEdit; {$mode objfpc}{$H+} interface uses WvdS.UI.TUI.Renderer.Base, WvdS.UI.Controls.Editors.DateEdit; type TWvdSTUIDateEditRenderer = class(TWvdSTUIRenderer) public procedure Measure(AControl: TWvdSControl; out AWidth, AHeight: Integer); override; procedure Paint(AControl: TWvdSControl; ACanvas: TWvdSTUICanvas); override; procedure HandleInput(AControl: TWvdSControl; AEvent: TWvdSInputEvent); override; end; implementation procedure TWvdSTUIDateEditRenderer.Measure(AControl: TWvdSControl; out AWidth, AHeight: Integer); begin AWidth := 12; (* [YYYY-MM-DD] *) AHeight := 1; end; procedure TWvdSTUIDateEditRenderer.Paint(AControl: TWvdSControl; ACanvas: TWvdSTUICanvas); var DateEdit: TWvdSDateEdit; begin DateEdit := AControl as TWvdSDateEdit; ACanvas.DrawText(0, 0, FormatDateTime(DateEdit.Format, DateEdit.Value)); end; procedure TWvdSTUIDateEditRenderer.HandleInput(AControl: TWvdSControl; AEvent: TWvdSInputEvent); begin (* Keyboard-Handling za promjenu datuma *) end; end. === Desktop Renderer === **Putanja:** ''~/sources/common/ui/targets/gui/renderers/WvdS.UI.Desktop.Renderers.DateEdit.pas'' === Web Renderer === **Putanja:** ''~/sources/common/ui/targets/web/renderers/WvdS.UI.Web.Renderers.DateEdit.pas'' ==== Korak 4: Pack Manifest ==== Kreirajte Pack-Manifest za PXAML-Resolver: **Putanja:** ''~/packs/controls/{control_id}/pack.wvds.json'' { "id": "dateedit", "vendor": "wvds", "version": "0.1.0", "xml": { "namespace": "wvds", "tag": "DateEdit" }, "model": { "unit": "WvdS.UI.Controls.Editors.DateEdit", "class": "TWvdSDateEdit" }, "renderers": { "tui": { "unit": "WvdS.UI.TUI.Renderers.DateEdit", "class": "TWvdSTUIDateEditRenderer" }, "desktop": { "unit": "WvdS.UI.Desktop.Renderers.DateEdit", "class": "TWvdSDesktopDateEditRenderer" }, "web": { "unit": "WvdS.UI.Web.Renderers.DateEdit", "class": "TWvdSWebDateEditRenderer" } }, "targetCaps": { "requires": ["keyboard"], "optional": ["mouse", "popup"] } } ==== Korak 5: Designer Metadata ==== Kreirajte Designer-Metapodatke za Toolbox i Properties: **Dodajte Descriptor u:** ''~/sources/common/core/meta/WvdS.Meta.Controls.Editors.pas'' procedure RegisterDateEditMeta(ARegistry: TMetaRegistry); var TypeMeta: TTypeMeta; begin TypeMeta := CreateTypeMeta('DateEdit', 'TWvdSDateEdit', 'Editors'); TypeMeta.Description := 'Polje za unos datuma s Kalender-Popupom'; TypeMeta.Icon := 'calendar'; (* Properties *) TypeMeta.AddProperty(CreatePropertyMeta('Value', pkDateTime, 'Trenutna vrijednost datuma')); TypeMeta.AddProperty(CreatePropertyMeta('Format', pkString, 'Format prikaza (npr. yyyy-mm-dd)')); TypeMeta.AddProperty(CreatePropertyMeta('MinDate', pkDateTime, 'Najraniji dozvoljeni datum')); TypeMeta.AddProperty(CreatePropertyMeta('MaxDate', pkDateTime, 'Najkasniji dozvoljeni datum')); TypeMeta.AddProperty(CreatePropertyMeta('ReadOnly', pkBoolean, 'Način samo za čitanje')); (* Events *) TypeMeta.AddEvent(CreateEventMeta('OnValueChanged', 'Aktivira se kada se Value promijeni')); TypeMeta.AddEvent(CreateEventMeta('OnValidating', 'Aktivira se prije promjene vrijednosti')); ARegistry.RegisterType(TypeMeta); end; ==== Korak 6: Registry-Registracija ==== Registrirajte Control u Runtime-Registries: === PXAML Resolver === ''pxamlc'' Compiler automatski čita ''pack.wvds.json'' iz ''~/packs/''. === Target Runtime Registry === Za svaki Target ažurirajte Renderer-Registry: (* U WvdS.UI.TUI.Render.Registry.pas *) procedure RegisterTUIRenderers; begin (* ... ostali Rendereri ... *) RegisterRenderer(TWvdSDateEdit, TWvdSTUIDateEditRenderer); end; ==== Korak 7: Dokumentacija ==== Kreirajte API-dokumentaciju za Control: **Putanja:** ''~/docs/api/controls/dateedit.md'' # TWvdSDateEdit Polje za unos datuma s opcionalnim Kalender-Popupom. ## Kada koristiti - Korisnik treba unijeti datum - Ograničavanje raspona datuma (MinDate/MaxDate) - Potreban formatirani prikaz datuma ## Properties | Property | Tip | Opis | |----------|-----|------| | Value | TDateTime | Trenutna vrijednost datuma | | Format | string | Format prikaza | | MinDate | TDateTime | Najraniji dozvoljeni datum | | MaxDate | TDateTime | Najkasniji dozvoljeni datum | | ReadOnly | Boolean | Način samo za čitanje | ## Events | Event | Opis | |-------|------| | OnValueChanged | Aktivira se kada se Value promijeni | | OnValidating | Omogućuje validaciju prije promjene vrijednosti | ## Primjer ```xml ``` ===== Completion Criteria ===== Control je završen kada: [ ] VS Code Designer može postaviti {PXAML_NS}:{PXAML_TAG} [ ] Properties se mogu uređivati u Designeru [ ] Preview u Designeru funkcionira [ ] Target Build (tui/desktop/web) kompilira uspješno [ ] Pack Manifest prisutan i prepoznat od Resolvera [ ] API-dokumentacija napisana ===== Vidi također ===== * [[.:pxaml-pipeline|PXAML-Pipeline]] * [[.:pack-struktur|Pack-Struktura]] * [[.:targets|Build-Targets]] * [[.:meta-api|Meta API]]