Завепшай одну программу по соц исследованию. в одной из форм есть grid в столбце которого вставлен combo.
controlsourse = v_f3.icd10
rowsoursei =cd10.icd10+' '+ icd10.diagnosis
rowsousetype = 6
columnwith=100
stile=2

структура icd10
icd10 - с 8
diagnosis - с96


Я немогу задать ширину выпадающегосписка. Он выпадает слишком широким и начальные буквы строк оказываются за пределами экрана. Менял значения columnwith, не помогло.

Я нашел вход.

Как я понял фокс сам строит ширину выпадаюшего combo по необходимости, и ему не важно вписывается ли он в экран.

В rowsourse прописал alltrim(icd10.icd10)+' '+left(icd10.diagnosis,75) и уменшил до 7 пунктов размер шрифта. И все увидел

Спасибо большое

Попробывал оба ваших варианта

Анатолий ваш вариант работае нормально


Вариант Hel!Riser

непошол, появилась проблем обсуждавшееся в топике про использование ключей

Спасибо за помощь.

Я показывал свойства только для ширины combo. А bound column у меня задейсвован изначально. в interactivechenge у меня стоит

REPLACE V_f3.icd10 WITH This.Value
oldid = V_f3.id
=REQUERY('V_f3')
LOCATE FOR V_f3.id = m.oldid
ThisForm.grd_KP.Refresh

а в column9

rousourse=v_f3.diagnosis

v_f3 это обновляемый wiev с параметром в котором V_f3.icd10 - Integer обновляемое поле а V_f3.diagnosis поле readonly из справочника

Прошу прошение за это собшение, хочется попробыват выделение кода кнопкой code. Ато впредыдущем вроде пытался выделить и не получилось.

проба1





проба2