1 (edited by Slava.Pepper 2015-02-25 13:41:48)

Topic: Скрипт в отчете FastReport

Какой скрипт написать в FastReport, чтобы преобразовать столбцы (Фамилия), (Имя), (Отчество) из запроса в одну ячейку (Фамилия И.О.)

Re: Скрипт в отчете FastReport

Поместите в отчет компонент Text Object и создайте для него событие OnBeforePrint, пример:

procedure Memo1OnBeforePrint(Sender: TfrxComponent);
begin
       Memo1.Text := <Report."lastname"> + ' ' + Copy(<Report."firstname">, 1, 1) + ' ' +  Copy(<Report."surname">, 1, 1) ;                                                                          
end;
Dmitry.

3 (edited by Slava.Pepper 2015-02-25 20:36:05)

Re: Скрипт в отчете FastReport

Чего-то ругается - 'BEGIN' expected.

Я пробовал скрипт из примера про ФИО - тоже не работает.

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

Re: Скрипт в отчете FastReport

Возможно вы удалили блок

begin

end.

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

procedure Memo1OnBeforePrint(Sender: TfrxComponent);
begin
       Memo1.Text := <Report."lastname"> + ' ' + Copy(<Report."firstname">, 1, 1) + ' ' +  Copy(<Report."surname">, 1, 1) ;                                                                          
end;

begin
end.
Dmitry.

5 (edited by Slava.Pepper 2015-02-25 19:20:18)

Re: Скрипт в отчете FastReport

Ругаться перестал, разобрался. Большое спасибо за науку.

6 (edited by Slava.Pepper 2015-02-25 20:50:59)

Re: Скрипт в отчете FastReport

А как пронумеровать автоматом строки таблицы в FastReport ?
А-А-А разобрался Line#. Помощь очень расслабляет, но без неё - никак.

Re: Скрипт в отчете FastReport

Slava.Pepper wrote:

А как пронумеровать автоматом строки таблицы в FastReport ?

http://myvisualdatabase.com/forum/misc.php?action=pun_attachment&amp;item=663&amp;download=0

Post's attachments

Attachment icon line.png 31.05 kb, 324 downloads since 2015-02-25 

Dmitry.