[Sm1t1k]

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

Заранее благодарен.

[Aristarh Dark]

База данных спасет гиганта мысли.

[Sm1t1k]

Сообщение от Aristarh Dark

База данных спасет гиганта мысли.

Я вас не понял, конкретней выражайтесь пожалуйсто

[NumLock]

загнать данные в ClientDataSet и отображать их в DBGrid, используя свойство Filter (у ClientDataSet).

[Sm1t1k]

Сообщение от NumLock

загнать данные в ClientDataSet и отображать их в DBGrid, используя свойство Filter (у ClientDataSet).

У меня не DBGrid, а именно StringGrid.

З.Ы. Почти все сделал, осталось только фильтр по возрасту сделать. Помогите пожалуйста.

[Alegun]

Чтоб упростить последующие вычисления хорошо бы добавить к таблице колонку "Возраст" и заполнять её данными из поля "Дата рождения" с помощью вот этого:

Код:

function CalculateAge(Birthday, CurrentDate: TDate): Integer;
var
Month, Day, Year, CurrentYear, CurrentMonth, CurrentDay: Word;
begin
DecodeDate(Birthday, Year, Month, Day);
DecodeDate(CurrentDate, CurrentYear, CurrentMonth, CurrentDay);
if (Year = CurrentYear) and (Month = CurrentMonth) and (Day = CurrentDay) then
Result:= 0 else
 begin
   Result:= CurrentYear - Year;
   if (Month > CurrentMonth) then Dec(Result) else
   if (Month = CurrentMonth) and (Day > CurrentDay) then Dec(Result);
 end;
// ©Drkb::04233
 end;

Пример вызова:

Код:

Label1.Caption:= Format('Петров М.А. 12.03.1978 (%d)', [CalculateAge(StrToDate('12.03.1978'), Date)]);

Фильтровать будет проще, да и нагляднее так юзеру.

[poli-smen]

Сообщение от Sm1t1k

З.Ы. Почти все сделал, осталось только фильтр по возрасту сделать. Помогите пожалуйста.

Ты сделал реализацию всех фильтров, кроме фильтра по возрасту? А в чём загвоздка добавить фильтр по возрасту?