Jeder Parameter braucht einen eigenen Namen! Zwar nicht schön, ist aber leider so.
SQL-Code:
select tab1.title from tab1,tab2
where tab1.id=tab2.id and tab1.cod=:cod1
union
select tab1.title from tab1,tab3
where tab1.id=tab3.id and tab1.cod=:cod2
Delphi-Quellcode:
Meinwert:='
titel';
MyQuery.Close;
// Zur Sicherheit, falls die Query noch aktiv ist
MyQuery.Parameters.ParamValues['
cod1']:=Meinwert;
MyQuery.Parameters.ParamValues['
cod2']:=Meinwert;
MyQuery.Open;