Это фильтр по году рождения.
Переделать этот фильтр по фамилии, который разрешает фильтровать данные по некоторым начальными буквами.Записать код который будет вмещать процедура которая обробатывает событие onFilterRecord компонента Table1
Код:
Form2.Label1.Caption:= Введіть рік народження:';
Form2.ShowModal;
If Form2.ModalResult=mrOk then Begin
Table1.Filter:='RN='+Form2.Edit1.Text;
Table1.Filtered:=True;
N4.Enabled:=True;
Админ: Пользуемся тегами для оформления кода, иначе последуют санкции!