Вывод на матричный принтер

отредактировано 18:06 Раздел: FastReport 3.0
Печать на матричный принтер длинных полей со свойством Stretch.
Просмотр работает нормально, но при выводе на печать некоторые значения не переносятся на другую строку, хотя она (строка) и добавляется, но пустая:
написал:
                            │
                    Clown                    Clown Triggerfish                        <  ок
                    Triggerfi
                    sh
                    Red                      Red Emperor                                <  ок
                    Emperor
...................................
                    Great                    Great Barracuda                          <  ок
                    Barracuda
                    French                  French Grunt                                <  ок
                    Grunt
                    Dog Snapper              Dog Snapper                          <  фигня

                    Nassau                  Nassau Grouper                          <  ок
                    Grouper
                    Bluehead                Bluehead Wrasse                      <  ок
                    Wrasse
                    Yellow Jack              Yellow Jack                              <  фигня

                    Redtail                  Redtail Surfperch                        <  ок
                    Surfperch
                    White Sea                White Sea Bass                      <  ок
                    Bass
                    Rock                    Rock Greenling                          <  ок
                    Greenling
                    Senorita                Senorita                                  <  ок
                    Surf Smelt              Surf Smelt                              <  фигня

                            │
(скопируйте вывод и вставьте в текстовый редактор с шрифтом Courier, чтобы было видней)

Таблица biolife.db из DBDEMOS


Отчет:
написал:
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" DotMatrixReport="True" EngineOptions.MaxMemSize="10000000" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="оН СЛНКВЮМХЧ" ReportOptions.CreateDate="38287,5976341667" ReportOptions.Description.Text="" ReportOptions.LastChange="38310,3552705324" ScriptLanguage="PascalScript" ScriptText.Text="begin

end." PropData="044C656674023803546F70023808446174617365747301010C3400000020446174615365743D22667278444244617461736574312220446174615365744E616D653D2266727844424461746173657431220000095661726961626C65730100055374796C650100">
  <TfrxDMPPage Name="Page1" PaperWidth="210,819863845505" PaperHeight="296,862308276426" PaperSize="9" LeftMargin="2,53999835958439" RightMargin="2,53999835958439" TopMargin="4,49791376176403" BottomMargin="4,49791376176403" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="" FontStyle="0">
    <TfrxReportTitle Name="ReportTitle1" Height="17" Left="0" Top="17" Width="777,6">
      <TfrxDMPMemoView Name="DMPMemo3" Left="172,8" Top="0" Width="96" Height="17" Frame.Typ="2" Memo.Text=""/>
    </TfrxReportTitle>
    <TfrxMasterData Name="MasterData1" Height="17" Left="0" Top="68" Width="777,6" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDataset1" DataSetName="frxDBDataset1" RowCount="0" Stretched="True">
      <TfrxDMPMemoView Name="DMPMemo1" Left="182,4" Top="0" Width="86,4" Height="17" StretchMode="smActualHeight" DataSet="frxDBDataset1" DataSetName="frxDBDataset1" Memo.Text="[frxDBDataset1."Common_Name"]"/>
      <TfrxDMPMemoView Name="DMPMemo2" Left="422,4" Top="0" Width="240" Height="17" DataField="Common_Name" DataSet="frxDBDataset1" DataSetName="frxDBDataset1" Memo.Text="[frxDBDataset1."Common_Name"]"/>
    </TfrxMasterData>
    <TfrxReportSummary Name="ReportSummary1" Height="17" Left="0" Top="119" Width="777,6">
      <TfrxDMPMemoView Name="DMPMemo4" Left="172,8" Top="0" Width="96" Height="17" Frame.Typ="2" Memo.Text=""/>
    </TfrxReportSummary>
  </TfrxDMPPage>
</TfrxReport>

Комментарии

  • отредактировано 18:06
    не знаю, что за глюк с форумом - я два раза тыкал <просмотр> и раз <отправить>
  • отредактировано 18:06
    Обнаружил интересную вещь:
    Когда печатаю рапорт:
    report.prepareReport;
    report.print;
    глюки эти наблюдаются.
    То же происходит, когда делаешь preview, то глюки наблюдаются в той области, которую не видел, а если просмотреть весь отчет, то глюков нет !
    ;)
  • отредактировано 18:06
    Это поправил, будет в 3.07. 3.07 будет скоро.
  • отредактировано 18:06
    Нашел лекарство ;) :
    frxDMPExport.pas
    procedure TfrxDotMatrixExport.DrawMemo .....
    .....
    begin
      Lines := TStringList.Create;
    
      Memo.CalcHeight;                                         <- эту строку добавить
    

    Привет земляку (AlexTZ) с Украины ;)

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.