Try using normal brackets instead of the square ones
note syntax of TextFieldText$ should be
Double(TextFieldText$(gadget))
note syntax of TextFieldText$ should be
Function TextFieldText$( textfield:TGadget )