Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.28;
Скачать: CL | DM;

Вниз

InterBase и Fast Report   Найти похожие ветки 

 
Kent ©   (2003-04-09 13:45) [0]

Всем привет !
Кто-нибудь работал с Fast Report в плане создания master-detail отчетов ??
Напишите, пожалуйста, как это сделать ?

А то у меня ничего не выходит ... наверное совсем крыша съехала ..

Respect всем ! ;)


 
AlexSerp ©   (2003-04-09 13:47) [1]

RTFM


 
Kent ©   (2003-04-09 14:01) [2]

To AlexSerp<b/>

Если можно - чуть подробнее!!
RTFM - сайт имеешь в виду ??
Если да, то у них поиск не работает - 500-я ошибка .. :(

Вот такие делищи !!!


 
AlexSerp ©   (2003-04-09 14:07) [3]

RTFM - read the fucking manual.
Извини, конечно, по-русски - "Читай гребаное руководство".
Не обижайся, но чтение документации к средствам производства
помогает лучше плавать в программировании, чем получение ответов
от дядь.
Твой вопрос как раз говорит о том, что ее вообще в глаза не видел.
Если у тебя ее нет, то скачай из инета.


 
AlexSerp ©   (2003-04-09 14:13) [4]

Если хочешь, я тебе хэлпы по ФАСТ-репорту вышлю.


 
Kent ©   (2003-04-09 14:31) [5]

Если ты про руководство, которое на сайте FastReport"а, то уже надо изъежжены вдоль и поперек ... вот уж действительно Fucking manual ....
Про конкретно InterBase там ничего нету, как и про использование IBX компонентов ...
А хелпы вышли если не сложно aspgroup@newmail.ru (если до 1,5 МБ размером). Может чо полезное наковыряю..

А по поводу RTFM я честно говоря правда думал, что это сайт.. :))

СПАСИБО.


 
AlexSerp ©   (2003-04-09 14:42) [6]

Леша, пардон, у меня версия 2.3 до Делфей5.
Для 7-ых нету.


 
Kent ©   (2003-04-09 14:45) [7]

Эх, жаль ... ну ладно .. буду искать, а мож кто чем еще поможет ! :))

Все равно, СПАСИБО !!!


 
alxx ©   (2003-04-09 14:46) [8]

В чем конкретно проблема то?
Именно с Интербейз не работает, а с остальными работает?


 
alxx ©   (2003-04-09 14:50) [9]

Там очень просто.

Примерно так нужно:

Detail3 и Master3 - frUserDataSet.


procedure TFSvod.Detail3CheckEOF(Sender: TObject; var Eof: Boolean);
begin
EOF:=EOF or
(ClaGrup<>(ADOStoredProc1.FieldByName("NameCs").AsString)) or
ADOStoredProc1.Eof;
end;

procedure TFSvod.Detail3First(Sender: TObject);
begin

end;

procedure TFSvod.Detail3Next(Sender: TObject);
begin
ADOStoredProc1.Next;
end;

procedure TFSvod.Master3Next(Sender: TObject);
begin
ClaGrup:=ADOStoredProc1.FieldByName("NameCs").AsString;
end;

procedure TFSvod.Master2CheckEOF(Sender: TObject; var Eof: Boolean);
begin
EOF:=EOF or ADOStoredProc1.EOF;
end;

procedure TFSvod.Master2First(Sender: TObject);
begin
ADOStoredProc1.First;
ClaGrup:=ADOStoredProc1.FieldByName("NameCs").AsString;
end;



 
Kent ©   (2003-04-09 14:59) [10]

Просто пошагово опиши, если не ломает, как именно заставить FR выводить Master Detail по двум Interbase таблицам, желательно через IBX компоненты, причем прямо в дизайнере отчетов FR.

Сейчас в дизайнере имеем Database (соединение работает), два Query к таблицам PROJECTS и STDOCUMENTS (в STDOCUMENTS есть foreing key по полю project_id на поле id таблицы PROJECTS). Вот простой список проектов из PROJECTS он делает отлично, но мне нужен список проектов с принадлежащими им документами. Вот и хочу узнать как заставить как из STDOCUMENTS выводить документы для каждого из отчетов ...

FR ни разу до сего момента не использовал, документацию почитал - там особо ничего и нет про IBX компоненты ..


 
Kent ©   (2003-04-09 15:00) [11]

alxx
Упс поста не видел пока свой набивал !! :)) Счас почитаю ...


 
Kent ©   (2003-04-09 15:05) [12]

Если не в дизайнере FR делать, то в Delphi я себе небольшой мастер генерации отчетов сделал :)) (мне еще тогда master-detail не нужен был) , но хотца не править каждый раз код в Delphi, когда боссам очередной репорт подавай, а делать это все через дизайнер FR ... Вот это возможно ???


 
alxx ©   (2003-04-09 15:54) [13]

Возможно.

1. Делаешь два юзердатасета. Один - детайл, другой мастер.
2. Обработчики событий задаешь так, как я написал. Если используются два разных датасета, то еще проще:

procedure TForm.DetailCheckEOF(Sender: TObject; var Eof: Boolean);
begin
EOF:=EOF or IBQuery.Eof;
end;

procedure TForm.DetailFirst(Sender: TObject; var Eof: Boolean);
begin
IBQuery.First;
end;

procedure TForm.DetailNext(Sender: TObject; var Eof: Boolean);
begin
IBQuery.Next;
end;

Мастер точно также.

Ставишь бэнды в дизайнере MasterData и DetailData - ставишь им источники данных соответственно мастер и дата. Ну и поля на них втюхиваешь. Поэкспериментируй с OnCheckEof на детайл дата - если оно еоф - то берется следующая запись детайла - в зависимости от того, что тебе надо.



 
Kent ©   (2003-04-09 16:09) [14]

Нашел !!!!! Ура !!!

Короче, сообщаю на всякий пожарный - взял с сайта Fast Report пакет для кроссплатформенной разработки - 3-й версии !!

Вот там то у меня все и заработало !!! Прямо из дизайнера !

САЛЮТ и RESPECT всем, кто мне ответил !



Страницы: 1 вся ветка

Текущий архив: 2003.04.28;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.02 c
6-91438
Berzercer
2003-03-06 15:02
2003.04.28
Узнать имя ЮЗЕРа, изменивщего файл


3-91160
Senator
2003-04-09 12:46
2003.04.28
запрос


7-91577
Ifrit
2003-03-09 13:37
2003.04.28
Народ, помогите!!! Как определить установлен ли Word в системе?


1-91366
Oleg1
2003-04-15 14:29
2003.04.28
Free Report 3.2


1-91332
Woland.hexed
2003-04-14 23:18
2003.04.28
Построение отчетов в стиле 1С (Excel)