[Tokariy]

а можно как нибудь по подробнее? примерный текст набросайте, если не сложно

если имеете ввиду так

Код:

if  RadioGroup1.ItemIndex=0 then
   begin
     if Datamodule4.Query4.FieldByName('Data_okon').IsNull then
     Datamodule4.Query4.Filtered:=true;
     Form17.QuickRep1.Preview;
   end;

     if  RadioGroup1.ItemIndex=1 then
   begin
     if not Datamodule4.Query4.FieldByName('Data_okon').IsNull then
     Datamodule4.Query4.Filtered:=true;
     Form18.QuickRep1.Preview;
   end;

Админ: Пользуемся тегами для оформления кода!

то не вышло