cap-height ( gadget -- y )

Vocabulary

ui.baseline-alignment

Inputs

gadget

an object

Outputs

y

an object

Definition

IN: ui.baseline-alignment

GENERIC: cap-height ( gadget -- y )

Methods

USING: accessors kernel ui.baseline-alignment ;

M: aligned-gadget cap-height
    [ cap-height>> ] [
        [ cap-height* ] [ ] [ layout-state>> ] tri
        [ drop ] [ dupd cap-height<< ] if
    ] ?unless ;


USING: accessors ui.baseline-alignment ui.gadgets.debug ;

M: baseline-gadget cap-height cap-height>> ;


USING: accessors ui.baseline-alignment ui.gadgets.editors
ui.text ;

M: editor cap-height font>> font-metrics cap-height>> ;


USING: kernel ui.baseline-alignment ui.gadgets ;

M: gadget cap-height drop f ;


USING: accessors ui.baseline-alignment ui.gadgets.grids.private
;

M: grid-cell cap-height cap-height>> ;


USING: ui.baseline-alignment ui.gadgets ui.gadgets.wrappers ;

M: wrapper cap-height gadget-child cap-height ;