Scroll Buttons

RaFaeL писал(а): На прокрутке, уверен, мазать буду чаще ))

И справа две стрелки <> в которые вообще хрен попадешь

Игорь Столяров

kreator писал(а): При нажатии кнопки "Ещё" вываливается меню с недостающими ...

Не видел. Но мы для планшетных приложений "изобрели" вот такое иерархическое меню, после мата юзеров на обычное.
Большие кнопки, структура, помещаются все операции.

Сделано очень просто, на той схеме скрытых TAB, что я описал ниже.

kreator

Вот так в 1С выглядит:

Простенько, как и всё у них. Для ознакомления.

kreator писал(а): Вот так в 1С выглядит:
1.jpg
Простенько, как и всё у них. Для ознакомления.

У меня такая идея используется давно. Реализуется элементарно через Popup

Игорь Столяров

Губин Игорь писал(а): Реализуется элементарно через Popup

Ну да. Думаю, что и в 1С тоже особо не стали напрягаться.
К сожалению для планшетов PopUp мелковат и плюс убивает непредсказуемость направления его открытия.

kreator

Попап - не важно, главное - идея, в Windows Phone сейчас тоже есть кнопка типа "Ещё" (иконка - "Три точки"), при нажатии на которую появляются дополнительные возможности (Попапа нет, конечно). Тренд на упрощение интерфейса, однако.
По поводу 1С "Такси". Когда это "Такси" объявили, в 1С говорили - дизайнеры поработали, специалисты по юзабилити, типа аналог "Metro" от MS. Но сейчас я смотрю на этот экран - некий гибрид, есть элементы, которые удобны на планшете, есть которые не будут работать (в частности вот это мелкое попап меню). Правда, может, для планшета дизайн немного другой, не знаю.

Игорь Столяров

kreator писал(а): Когда это "Такси" объявили, в 1С говорили - дизайнеры поработали, специалисты по юзабилити

Ну это общая беда более или менее крупной фирмы, где продвижением продукта занимаются люди не связанные с его разработкой.
В результате появляются публикации о гениальности дизайна кнопки с тремя точками и popup, хотя скорее всего программисту
просто было вилы написать нормальный интерфейс доступа, много других, действительно нужных дел.

gopstop2007

в общем перепробовал 4 варианта, но клиентам ни один из вариантов не понравился

непростое дело тыкать пальцем

Игорь Столяров писал(а):Сделано очень просто, на той схеме скрытых TAB, что я описал ниже.

Интересная идея, только как увеличить площадку таб-а? там только вроде за счет шрифта регулируется высота таб

Игорь Столяров

gopstop2007 писал(а): там только вроде за счет шрифта регулируется высота таб

Возможно ... но в этом нет необходимости.
Если вопрос по моему рисунку, то слева Option, а справа Button.
При переключении Option, переключаются скрытые TAB (их не видно на рисунке), на каждом из которых 6 кнопок.
Вот и все. Сейчас бы сделал по другому.
Просто перерисовывал иконку и текст на кнопках при переключении Option и вообще не нужен SHEET & TAB.
А действие на кнопки определяется по текущему значению Option.
.

gopstop2007

ясно, а я подумал, что слева шапки таб-ов, тогда шрифт роли не играет

Сообщение **Admin** » 16 Ноябрь 2015, 3:14

Интересный сайтик этот ClarionHub.
По вашей теме на нем нашел красивое решение:

Код: Выделить всё

 PROGRAM
  MAP
  END    
Window WINDOW('Caption'),AT(,,395,224),GRAY,FONT('Segoe UI',8)
        IMAGE,AT(25,1,143,216),USE(?IMAGE1),VSCROLL
        IMAGE,AT(182,2,149,215),USE(?IMAGE2),VSCROLL
    END    
  CODE
  OPEN(Window)
  DO CreateControls
  ACCEPT
  END

CreateControls    ROUTINE
    DATA
Y        LONG(10)    
NewFEQ Signed,AUTO
    CODE
    LOOP 20 TIMES
      NewFEQ = CREATE(0,CREATE:Button) !, ?Image1)
      NewFeq{PROP:Parent} = ?Image1
      NewFEQ{PROP:Text} = 'Button ['& NewFeq &']'
      SETPOSITION(NewFeq, 10, Y, 60, 10) ; Y += 20
      NewFeq{PROP:Scroll} = TRUE
      NewFEQ{PROP:Hide}   = FALSE      
    END    

    Y = 10
    LOOP 20 TIMES
      NewFEQ = CREATE(0,CREATE:Button) !, ?Image2)
      NewFeq{PROP:Parent} = ?Image2
      NewFEQ{PROP:Text} = 'Button ['& NewFeq &']'
      SETPOSITION(NewFeq, 10, Y, 60, 10) ; Y += 20
      NewFeq{PROP:Scroll } = TRUE
      NewFEQ{PROP:Hide}=FALSE      
    END

kreator

Вот этот момент интересный:

Код: Выделить всё

NewFeq{PROP:Parent} = ?Image1

Интересно, а можно вот так?

Код: Выделить всё

NewFeq{PROP:Parent} = ?List

Сообщение **Admin** » 16 Ноябрь 2015, 7:59

kreator писал(а): Интересно, а можно вот так?

Можно, и сдвигаться будут. Только с перерисовкой проблемы. Контролы как бы под листом будут.

kreator · Сообщение **kreator** » 09 Июнь 2016, 16:37

Попробовал на Image положить не кнопки, а ещё Image. Не пошло. PROP:Parent своеобразно работает. Интересно бы узнать какие контролы могут быть родителями, а какие детьми.