Paradox Community

Items in pnews.paradox-programming

Subject:Re: Something like DropList
Date:Sat, 15 Jun 2019 05:14:45 -0400
From:Kevin Baker <shcsbaker@gmail.com>
Newsgroups:pnews.paradox-programming
The way I did this (I got lots of help from the folks here) is as follows:

I have a tableFrame with my data (TFMain)
I have a undefined field where the user can begin typing the value to 
begin the filtering process (field name is fldData).  In the keyPhysical 
of this field is the following code:

var
    FldFilter DynArray[] String
    fldData String
endvar

dodefault

fldData=self.value

delayScreenUpdates(Yes)

if fldData="" then
    TFMain.DropGenFilter()
else
    TFMain.DropGenFilter()
    if HowLocate = "L" then
       FldFilter["Last Name"] = self.value+".."
       TFMain.setGenFilter(FldFilter)
    else
       FldFilter["First Name"] = self.value+".."
       TFMain.setGenFilter(FldFilter)
    endif
endif

delayScreenUpdates(No)
endMethod

The HowLocate is a radio button to give the user the option to search by 
Last or First Name.

Hope this helps,
Kevin


Copyright © 2004 thedbcommunity.com