Hallo alle...
brauche Eure Hilfe, da ich den Fehler nicht nachvollziehen kann...
Delphi-Quellcode:
SQL:= '
select ID,NUMMER,KUNDE,PREISBRUTTO,DATUM,BEZAHLT,OFFEN,VERKAUFER from VORGANG';
case FVorgang.ComboBox1.ItemIndex
of
0:
begin
SQL:=
SQL + '
where';
AbfrageBezahlt:= '
';
end;
1:
begin
SQL:=
SQL + '
where BEZAHLT = :bezahlt';
AbfrageBezahlt:= '
True';
SQL:=
SQL + '
and';
end;
2:
begin
SQL:=
SQL + '
where BEZAHLT = :bezahlt';
AbfrageBezahlt:= '
False';
SQL:=
SQL + '
and';
end;
end;
case FVorgang.ComboBox2.ItemIndex
of
0:
begin
SQL:=
SQL + '
DATUM > :Datum';
AbfrageDatum:= '
20.09.2007';
end;
1:
begin
SQL:=
SQL + '
DATUM > :Datum';
AbfrageDatum:= '
20.04.2007';
end;
2:
begin
SQL:=
SQL + '
DATUM > :Datum';
AbfrageDatum:= '
20.09.2006';
end;
3:
begin
AbfrageDatum:= '
';
end;
end;
case FVorgang.ComboBox3.ItemIndex
of
0:
begin
SQL:=
SQL + '
order by DATUM';
end;
1:
begin
SQL:=
SQL + '
order by KUNDE';
end;
2:
begin
SQL:=
SQL + '
order by NUMMER';
end;
end;
FVorgang.ZQuery1.SQL.Text:=
SQL;
if AbfrageDatum > '
'
then FVorgang.ZQuery1.ParamByName('
Datum').Value:= AbfrageDatum;
if AbfrageBezahlt > '
'
then FVorgang.ZQuery1.ParamByName('
bezahlt').Value:= AbfrageBezahlt;
FVorgang.ZQuery1.Open;
Der zusammengesetzte SQLText lautet z.B.
select ID,NUMMER,KUNDE,PREISBRUTTO,DATUM,BEZAHLT,OFFEN,VE RKAUFER from VORGANG where DATUM >
atum order by DATUM
Bei Open bekomme ich EZIBConvertError Meldung Convertion error .... was ist damit gemeint
Bitte um Hilfe, Denkanstöße...Danke
[edit]
ich hatte davor die
SQL Anweisung mit
SQL.Add zusammengesetzt, da hatte ich im SQLText nach jedem Add komische Sonderzeichen im String
...vieleicht kennt das ja jemand und hilft
[/edit]