tStringExtend

type tStringExtend = record

  Font: pTextFont;

Must be an open Font (not TextAttr)

  Pens: array [0..1] of Byte;

Color of text/background

  ActivePens: array [0..1] of Byte;

Colors when gadget is active

  InitialModes: LongWord;

Initial mode flags (e.g. Checked, ISDRAWN, HIGHITEM, ITEMENABLED, MENUTOGGLE, COMMSEQ, ITEMTEXT, CHECKIT)

  EditHook: pHook;

If non-nil, must supply WorkBuffer

  WorkBuffer: PChar;

Must be as large as StringInfo.Buffer

  Reserved: array [0..3] of LongWord;

Set to 0

end;

GFLG_STRINGEXTEND

Flag for TGadget.SpecialInfo. this String Gadget has PStringExtend

GACT_STRINGEXTEND

Activation flag for TGadget.Activation. this String Gadget has PStringExtend

TStringInfo

String Gadget structure