method selected =
    match self#box#active_iter with
    | None     -> ""
    | Some row -> (self#box#model#get ~row ~column:self#col)