Adam wrote:

> --- In firebird-support@yahoogroups.com, "delphigurusam" <shunt@n...>
> wrote:
> > FB 1.5.2 B:4731
> >
> > sql.strings[2]:='where
> > upper(Last_Name)='+#39+uppercase(dbeditLastName.Text)+#39+' ';
> >
> > errors when dbeditLastName.Text contains an apostrophe (single quote)
> > in the name, as in O'Connor. The query reports that "Connor" is an
> > unknown token.
> >
> > I know I should be able to figure this out, but I'm feeling brain dead
> > and I need this tonight (if possible). Anyone out there want to help
> > a "delphidummy"?
> >
> > Thx
> > Sam Hunt
>
> Sam, use parameters, it takes care of that for you.
>
> In the Query Component.
>
> select id, name, blah
> from employee
> where Upper(LastName) = :LastName
>
> Go to params, select LastName and make the field type ftString, and
> ParamType = ptInput.
>
> Now to your other routine, instead of stuffing around with string
> manipulations
>
> qry.parambyname('lastname').value := UpperCase(dbeditLastName.Text);
>
> Then you can run the query.
>
> If you do need to dynamically build the query, then you will need to do
> a stringreplace to replace all #39 with #39+#39, but the param route is
> a better (and safer) way to go.
>
> Adam

More great help.
Thx to all.
Sam