Ширина колонок в отчете для memo - бред какой-то

[Zelenhof]

Понятно, что мемо может быть и 5 символов и 125.. Если ставить фиксированную ширину колонки, а высоту Column height - страшно смотреть что получается. А хочется чтобы именно растягивалось по необходимости на те хх5 символов, сколько надо. В чем прикол? Да - в секции выводится и мемо и не мемо, в разных колонках иссесно.
Спасибо.

[PlasticinE]

<Зохавано мудератором>
за неуплату

[Zelenhof]

Ну-да, ну-да.. а если их три мемо и одна колонка фиксированной длины? Мне звездочки рисовать тогда? )

[PlasticinE]

<Зохавано мудератором>
за неуплату

[Zelenhof]

Можеь глупый вопрос, но я разработчик Аксапты зело начинающий - до супера, или после?

[PlasticinE]

<Зохавано мудератором>
за неуплату

[Андре]

Цитата:

В executeSection той секции отчета, где выводятся мемо можно узнать/изтменить высоту/ширину элементов секции и поправить их. Я вот только не помню (давно отчетами не занимался ) длина мемо видна или нет оттуда.

Сорри, если я не про то.... Но вот так я менял высоту всех элементов в накладной - в зависимости от длины выводимого текста(названия номенклатуры) секция отчета увеличиваласть в высоту:

PHP код:

public void executeSection()
{
    ReportStringControl        itemNameControl, stringControl;
    ReportShapeControl         shapeControl;
    str                        itemName;
    int                        newHeightChar;
    ;
    itemNameControl = this.controlName("Control_1");
    itemName        = element.dem_ItemName();
    newHeightChar   = itemNameControl.widthOfString100mm(itemName) / itemNameControl.width100mm() + 1;
    itemNameControl.height(newHeightChar, Units::CHAR);

    stringControl = this.controlName("Quantity_RU");
    stringControl.height(newHeightChar, Units::CHAR);
    stringControl = this.controlName("Qty_RU");
    stringControl.height(newHeightChar, Units::CHAR);
    stringControl = this.controlName("LineAmount_RU");
    stringControl.height(newHeightChar, Units::CHAR);
    stringControl = this.controlName("VATAmount_RU");
    stringControl.height(newHeightChar, Units::CHAR);
    stringControl = this.controlName("StrAmount_RU");
    stringControl.height(newHeightChar, Units::CHAR);
    stringControl = this.controlName("QtyNumber");
    stringControl.height(newHeightChar, Units::CHAR);
    stringControl = this.controlName("Control_10");
    stringControl.height(newHeightChar, Units::CHAR);

  .......................

     super(); 


[Zelenhof]

Спасибо огромное

[Zelenhof]

Извини еще пристану.

PHP код:

itemName        = element.dem_ItemName(); 


вот это самое element.dem_ItemName() - це метод чего? element я так понимаю возвращает контекст самого отчета, да?

[Андре]

Да.

Element это сам отчет.
dem_ItemName - метод этого отчета, который возвращает строку, которая печатается. В данном случае наименование номенклатуры.

PHP код:

itemNameControl = this.controlName("Control_1"); 


Это я получаю сам контрол на дизайне в который выводится строка, возвращаемая моим методом.

PHP код:

newHeightChar   = itemNameControl.widthOfString100mm(itemName) / itemNameControl.width100mm() + 1; 


Это я определяю новую высоту элементов в данной секции отчета. То есть я смотрю во сколько печатаемая строка превышает то, что реально уместится в данный контрол. Плюс 1 - получаем высоту (в символах) всех элементов данной секции отчета.

PHP код:

itemNameControl.height(newHeightChar, Units::CHAR);

stringControl = this.controlName("Quantity_RU");
stringControl.height(newHeightChar, Units::CHAR); 


А это, я перебираю все контролы в данной секции отчета и увеличиваю их высоту.

[Zelenhof]

Я знаю, что совсем обнаглею, но тебе не трудно будет прислать еще код метода, который возвращает наименование. Я попытался - не получилось (не привык я еще к методам работы аксапты с указателями.. точнее с их отсутствием).

Если не трудно - кинь на мыло MironovS@ryba.spb.ru

[Андре]

Код конечно показать могу, но не понимаю зачем он тебе нужен:

PHP код:

display str dem_ItemName()
{
   pit_SalesLineLiftPassport    pitPassport;
   dem_LiftPassport             demPassport;
   SalesLine                    salesLine;
   str                          result;
   ;

   select salesLine where ((salesLine.SalesId == purchId) &&
                            (salesLine.LineNum == dynamicData.LineNum));
   select pitPassport where pitPassport.InventTransId == salesLine.InventTransId;
   select demPassport where demPassport.LiftPassportId == pitPassport.LiftPassportId;

   result = dynamicData.ItemName;
   if (demPassport.HeightLift != 0) result = result +  " H=" + any2str(demPassport.HeightLift) + " ì ";
   if (demPassport.StopAmount != 0) result = result +  " îñò." + int2str(demPassport.StopAmount);
   if (demPassport.FactoryNumber !=0) result = result + "  " +  int2str(demPassport.FactoryNumber);

   return  result;
} 


Вообще это должен быть любой метод, возвращающий строку.
Например :

PHP код:

display str dem_ItemName()
{
   str result;
   ;
   result = "Hello";
   return result;
} 


Вместо строки

PHP код:

   result = "Hello"; 


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

Будут вопросы - спрашивай.

[Zelenhof]

Есть вопрос. У меня по сути три поля мемо в строке и мне нужно определить максимальный и по его ширине откоректировать все колонки. С определением максимального я справлюсь. У меня проблема с получением самих значений, которые должны будут выводиться.
И еще - в проперти высоты колонки должно стоять авто, или все равно что, если я потом в executesection устанавливаю высоту?

[Андре]

Цитата:

У меня проблема с получением самих значений, которые должны будут выводиться.

А откуда они у тебя выводятся в контролы - из таблицы, из метода ? Щелкни на Memo и посмотри его Property. Какие могут быть проблемы - поясни ?

Цитата:

И еще - в проперти высоты колонки должно стоять авто, или все равно что, если я потом в executesection устанавливаю высоту?

У меня там стоят конкретные числа, но наверное, это без разницы.

[Zelenhof]

Извини - вопрос про получение даных отпал.. Сам разобрался. Ступил.

[Zelenhof]

Все получилось. Спасибо огромное

[Zelenhof]

мда.. есть еще одна "тонкость".. метод widthOfString100mm возвращает длину строки до первого символа перевода строки. Как можно забороть?

[Андре]

Так сразу не скажу, но может стоить вырезать из строки передаваемой в эту функцию символы перевода строки ?

[Zelenhof]

Сейчас пробую strreplace

[Zelenhof]

Извини - на форуме не нашел.. как код ASCII ввести в Аксапте?