on updateTextStylesCard theFont,theStyle,theAlignment,theSize,theHeight
  set lockScreen to true
  --------------------------------------------------------------------------
  -- FONT
  find theFont in fld "textFonts"
  put word 2 of the foundLine into x
  if the result is empty then select line x to x of fld "textFonts"
  --------------------------------------------------------------------------
  -- SIZES & SIZE & LINEHEIGHT
  put theSize into fld "textSize"
  put theHeight into fld "lineHeight"
  find theSize in fld "textSizes"
  put word 2 of the foundLine into x
  if the result is empty then select line x to x of fld "textSizes"
  --------------------------------------------------------------------------
  -- ALIGN RADIO BUTTONS
  click at the loc of bg btn theAlignment
  --------------------------------------------------------------------------
  -- STYLE CHECK BOXES
  repeat with x = 1 to 8
    set hilite of bg btn x to the short name of bg btn x is in theStyle
  end repeat
  --------------------------------------------------------------------------
  -- DISPLAY SAMPLE TEXT
  set the textFont of fld "sample" to theFont
  set the textSize of fld "sample" to theSize
  set the textHeight of fld "sample" to theHeight
  set the textAlign of fld "sample" to theAlignment
  set the textStyle of fld "sample" to theStyle
  --------------------------------------------------------------------------
end updateTextStylesCard