как поменять кодировку страницы отчета?

bars

Возникла такая трабла. Из моего отчета на принтер kyocera mita fs1020d русские буквы идут крякозябрами. Русификация принтера под дос не помогла.
На другой принтер (hp1200) все идет хорошо. Посоветуйте, кто знает, как сделать установку кодовой страницы отчета? Все, что нашел сам, это перед выполнением отчета можно задать frxReport1.Page.Font.Charset:=.
Но что при этом задавать и как? Шрифт в самом отчете у меня стоит ариал, тип кириллица.

Заранее спасибо.

gpi

Попробуй задать Charset=RUSSIAN_CHARSET для Memo

bars

извиняюсь перед всеми за дубликаты. Возникали ошибки при попытках создания темы. Просьба администратору удалить лишние (не нашел, как самому)

bars

не нашел, как сделать это для memo. у мемо нет таких свойств.
сделал это: frxReport1.Page.Font.Charset:=RUSSIAN_CHARSET;
не помогло, к тому же при выходе из проги еще и ошибку дает

Konst

Раньше я кидал мастера сюда с компонентами ФИБОВ
там был мастер поиска и замены он тебе поможет.

gpi

bars
Memo.Font.Charset

bars

sorry за слепоту. все мимо ходил, теперь нашел. Заработало!
Попутно, если вдруг кто здесь увидит. Еще вопрос. Как можно сделать, чтобы кнопка редактировать отчет заработала для пользователя проги. То есть он видит, что в одной колонке надо изменить цифру, кнопка едит на отчете есть вверху, но нажатие ничего не дает.

gpi

Добавь frxDesigner в проект

bars

Добавлял, но ничего не изменилось.
Вот нашел (в документации к 3.0 для программистов), что можно написать обработчик события. Вроде дело, но что-то не так для дельфи, да и нет таких строк там.
А именно в процедуре
procedure TFormECP.frxReport1ClickObject(Sender: TfrxView;
Button: TMouseButton; Shift: TShiftState; var Modified: Boolean);
begin
if view.name='memo9' then begin
tfrxmemoview(view).Text:=inputbox('edit',edit memo2 text:',tfrxmemoview(view).Text);
modified:=true;
end;
end;
компилятор ругается на if view.name, он не знает, что такое view.
Может, есть реально работающий пример?

gpi

Какой версией фаста пользуешься? Вообще-то заголовок обработчика должен иметь вид:

procedure TForm1.MainReportClickObject(View: TfrxView;
  Button: TMouseButton; Shift: TShiftState; var Modified: Boolean);
begin
  ...

Посмотри пример InteractiveReport.
Добавлено
Кнопка редактирование страницы вызывает дизайнер для редактирования всей страницы

bars

версия 3.10
код такой сам создался по клику на событие (именно sender).
вот щас догадался что в if можно подставить вместо view.name -
sender.Name, но вот что писать в присвоении текста-не знаю пока.

bars

компилятор не ругается теперь на это:
if sender.Name='memo22' then begin
tfrxmemoview(sender).Memo.Text:=inputbox('edit','edit memo22 text:',tfrxmemoview(sender).memo.Text);

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

gpi

Попробуй так:

if sender.Name='Memo22' then 
 begin
  tfrxmemoview(sender).Memo.Text:=inputbox('edit','edit memo22 text:',tfrxmemoview(sender).memo.Text);
  frxReport1.Preview.Refresh;
 end;

Обрати внимание: Memo22

bars

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

Спасибо!!

gpi

написал:

рефреш не нужен

В FR3.20 без рефреша страница не обновляется

написал:

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

А вот это уже не получится