TGtkBindingArg

type TGtkBindingArg = record

  arg_type: TGtkType;

  d: record

    case LongInt of

      0: (

          long_data: glong;

        );

      1: (

          double_data: gdouble;

        );

      2: (

          string_data: Pgchar;

        );

  end;

end;