Та же проблема возникла. Подскажите решение, пожалуйста.

2

(9 replies, posted in Russian)

Там описание большое, я воспользовался отправкой в почту support@drive-software.com.
Спасибо за поддержку.

3

(9 replies, posted in Russian)

Или так?
procedure frmGroupADD_List01_OnClick (Sender: string; var Cancel: boolean);
var
   a,c: integer;
   sSQL: string;
begin

     if frmGroupADD.TableGridList.SelectedCount = 0 then exit; // in no selected items then exit

     sSQL := 'SELECT LastName, FirstName, FasName, Groups.GroupNumber, Uchenik.id FROM Uchenik '+
     'LEFT OUTER JOIN Groups ON Groups.id = Uchenik.id_Groups ' +
     'WHERE ';

     c := frmGroupADD.TableGridList.RowCount - 1; // count of records in TableGrid
     for a :=0 to c do
         if frmGroupADD.TableGridList.Selected[a] then // if record selected
            sSQL := sSQL + 'Uchenik.id = ' + IntToStr(frmGroupADD.TableGridList.dbIndexToID(a));
            frmGroupADD.List01.dbReportFile:='ListVojdenB.fr3';
Тоже не таботает

4

(7 replies, posted in Russian)

Тип поля в базе должен быть не "Текст" а "Целое число" и все подровняется.

5

(9 replies, posted in Russian)

Аууу!!!! Помогите!!!!!

6

(9 replies, posted in Russian)

Спасибо, заработало.
Далее хочу вывести на печать определенные в таблице данные
через множественный выбор строк. Подсмотрел скрипт про удаление
и переписал для запроса, но не работает. Ошибка запроса (near " ": syntax error) .
Подскажите, пожалуйста, где ошибка:

procedure frmGroupADD_List01_OnClick (Sender: string; var Cancel: boolean);
var
   a,c: integer;
   iColumn: integer;
begin
     iColumn := frmGroupADD.TableGridList.Columns.Count-1;
     c := frmGroupADD.TableGridList.RowCount - 1;
     for a :=0 to c do
         if frmGroupADD.TableGridList.Selected[a] then
         SQLExecute('SELECT LastName, FirstName, FasName, Uchenik.id, Groups.GroupNumber FROM Uchenik ' +
         'LEFT OUTER JOIN Groups ON Groups.id = Uchenik.id_Groups ' +
         'WHERE Uchenik.id = ' + frmGroupADD.TableGridList.Cells[iColumn, a]); //похоже, ругается на id = не понимает какие строки таблицы выбраны
         frmGroupADD.List01.dbReportFile:='ListVojdenB.fr3';
end;

begin
    frmGroupADD.TableGridList.Options := frmGroupADD.TableGridList.Options + goMultiSelect;
end.

7

(9 replies, posted in Russian)

В таблицу необходимо вывести данные по условию.
Применил фильтр
Groups.GroupNumber = '{GroupNumberList}'
где GroupNumberList - TextBox с условием фильтрования.
Не работает. Подскажите, как отфильтровать по условию,
находящемуся в TextBox на форме.
Я так понимаю в фильтре условие это WHERE...

Здравствуйте, Дмитрий!

В процессе отладки и тестирования программы выяснил, что скрипт
обработки выбора бланков печати не верный.
Выбор происходит по номеру группы, а надо по категории, присвоенной этой группе.
Ошибка вылезает одинаковая, когда бланк печатается через обработку.
Понял это, когда ID группы стал больше 5. Сразу не вычислил, потому, что
работал с одной группой.
Прошу помощи в исправлении. Выслал заготовку на support@drive-software.com

Спасибо.

Разобрался - уроки не прошли даром + много хороших примеров. Удобный сервис.

9

(2 replies, posted in Russian)

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

Класс!!!!!!!! Вот то, что надо.
Спасибо. Очень выручили. Завтра, т.е. сегодня, надо запускать в работу.

Поспешил с выводом - выбор как у свидетельства не смог запустить
if frmMetod.GroupNumber.dbItemID=1 then frmMetod.ПриказОЗСДД.dbReportFile := 'PrikOZSDD.fr3';
    frmMetod.ПриказОЗСДД.Click;
Что-то не так?

ОГРОМНОЕ СПАСИБО.
Такое красивое решение проблемы. Завидую.
Категории прикрутил - выбор работает.

Отправил, спасибо за помощь.

Вот накопал в документации метод TfrxReport.PrepareReport и скрипт
frxReport1.LoadFromFile('1.fr3');
frxReport1.PrepareReport;
frxReport1.LoadFromFile('2.fr3');
frxReport1.PrepareReport(False);
frxReport1.ShowPreparedReport;

но как применить в реалии - не знаю (учусь медленно).
Если сможете, помогите разобраться.

Возможно ли скриптом вывести на печать сразу несколько отчетов fr3,
условия которых уже заданы (была Ваша помощь) ?

Ex:
if frmUchADD.GroupNumber.dbItemID=1 then frmUchADD.Свидетельство.dbReportFile:='SvidB.fr3';

что дописать в скрипте для других форм - например SpravkaB.fr3?

Возможно ли создать отчет из нескольких похожих листов
и в каждом свои блоки ReportTitle, MasterData, Footer.
Засада в том, что на новом листе (page2) данные в ReportTitle
из запроса не отображаются а только в новом MasterData.
Задача сделать несколько бланков отчета в одном,
но каждый бланк может содержать несколько страниц (разный
объем данных).

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

Бланки договоров 2-х и 3-х стороннего и актов сдачи-приема выводят категорию обучения
без использования вычисляемого поля, путем выбора в отчете id одной таблицы (группы),
связанной с основной, а потом id другой (категории) не связанной напрямую с основной (ученики).
И, как не странно, это работает. Но так уже было с другими отчетами и перестало работать.
Эти отчеты пока выводят правильную категорию обучения.
Вычисляемое поле работает как часы в любом запросе.
Нужно-ли все отчеты где нужна категория переделать через вычисляемое поле?
Или есть какая-то хитрая возможность сквозного запроса (через id-id - так проще).

С уважением, Вячеслав.

Интересная особенность - в бланках договоров проекта Автошкола
категория определяется насквозь через таблицу группы.
В бланке заявления напрочь отказывается - вывел через вычисляемое поле.
Стоит-ли переделывать договоры?
Как привязать при переделке часы обучения,
если не удалили - проверьте, пожалуйста.

Спасибо, учту в дальнейшей работе.
С уважением, Вячеслав.

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

Можно в почту?

В определенном поле есть набор символов (номер группы) первые из которых - категории обучения.
Логику проверки и скрипт связать не получается.
Help Me Please, Please Help Me! (The Beatles 1965)

Подскажите, есть ли возможность автоматического выбора бланка из заготовок .fr3,
по условию проверки наличия определенного символа в поле таблицы.
Задача - печать свидетельства об окончании автошколы после проверки категории (B,C,D).
Содержимое у всех разное, а перепутать легко.

24

(6 replies, posted in Russian)

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

25

(6 replies, posted in Russian)

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