Re: filer table by a word ....

From: sew crazy (sew.crazy_at_webmail.co.za)
Date: 03/20/05

  • Next message: Pat_C: "Re: drawing graphics directly on the desktop wallpaper" 
    Date: Sun, 20 Mar 2005 09:32:41 +0200

    thanks for the help on the previous problem ...
    new problem ??

    procedure TForm1.BitBtn4Click(Sender: TObject);
    var
      distancegone : integer;

    begin
     if radiobutton5.Checked = true then
      Begin
       distancegone := 300;

       ADOTable1.Filter := '(typeoftransport = ''pad'') and (distance >
    300 )';

     //why does the next one not work???

    // ADOTable1.Filter := '(typeoftransport = ''pad'') and (distance >
    distancegone)';

      end;
      adotable1.Filtered := True;
    end;

  • Next message: Pat_C: "Re: drawing graphics directly on the desktop wallpaper"