andre19@ngs.ru
Joined: 08 Dec 2003
Posts: 11
Location: Андрей
Occupation: фест, сис админ
Interests: новосибирск
|
 Posted: 25 Dec 2003 14:45 Post subject: Генератор отчетов по WIndows |
 |
|
Вопрос такой.
Не могу приделать к форме множественный фильтр, те чтобы в одном забросе два лист бокса было.Скажу сразу, код взял из примеров и его изменил немного
| Code: | var
VariableStatus :TppAutoSearchField;
Field: TppAutoSearchField;
begin
if VariableStatus() not empty then
begin
If dialog1.execute Then
begin
if Report.AutoSearchFieldCount = 0 then
Field := Report.CreateAutoSearchCriteria('pl', 'shortname', soEqual, '@par', True)
else
Field := Report.AutoSearchFields[0];
if dialog1['NP']<>'' then
begin
assignparameter('par', trim(dialog1['NP']));
Field.ShowAllValues := False;
end
else
begin
assignparameter('par', '%');
Field.ShowAllValues := True;
end;
end;
end
else
begin
If dialog1.execute Then
begin
if Report.AutoSearchFieldCount = 0 then
Field := Report.CreateAutoSearchCriteria('pl', 'fam', soEqual, '@par', True)
else
Field := Report.AutoSearchFields[0];
if dialog1['mol']<>'' then
begin
assignparameter('par', trim(dialog1['mol']));
Field.ShowAllValues := False;
end
else
begin
assignparameter('par', '%');
Field.ShowAllValues := True;
end;
end;
end;
end; |
а получается так что работает только один из двух листбоксов.... |
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
