Brauche dringend HILFEEEE!!! String anschneiden

[Bine]

<b>Hallo Leute! </b>

Ich hab ein <b>dringendes Problem</b>!!!

Ich bilde einen sql string um ihn nachher (später in einer auswertung!) zu verwenden.

In einer Listbox kann der Kunde sich <b>verschiedene Auswertungsparameter</b> auswählen, leider hat mein gebildeter SQL string am ende ein AND und jetzt weiß ich nicht wie ich das <b>AND</b> jetzt wegschneiden kann

Das ist der CODE:
<pre>
dummystring:= '''';
for i := 0 to (gew_liste.Items.Count - 1) do
begin
sql_abfallwahl:= (sql_abfallwahl)+' e.e_bez = '+dummystring+gew_liste.Items.Strings[i]+dummystring+' AND ';
end;
</pre>
So kann der SQL String zum beispiel aussehen:

e.e_bez = 'abfall1' AND e.e_bez = 'abfall2' e.e_bez = 'abfall3' AND

und das letze <b>AND</b> möchte ich wegschneiden!!

Bitte helft mir schnell (chefi will heute die auswertungen sehen

BINE:=)

[Nico Bendlin]

wie wäre es mit dieser Lösung<p>
etwa so...<p>
<pre>

dummystring:= '''';<p>
<b>for</b> i := 0 <b>to</b> gew_liste.Items.Count - 1 <b>do</b>
<b>begin</b>
sql_abfallwahl := sql_abfallwahl + ' e.e_bez = ' + dummystring + gew_liste.Items.Strings[i] + dummystring;
<b>if</b> i < gew_liste.Items.Count - 1 <b>then</b>
sql_abfallwahl := sql_abfallwahl + ' AND ';
<b>end</b>;

</pre>

Es wird also nur bis zum vorletzten Durchlauf ein AND angehängt.<p>

Gruß Nic

[Bine]

dankkkkkkkkeeeeeeeeeeeeeee )))) habs noch nicht getestet ABER DANKEEEE

BINE:

[Bine]

PERFEKT!!!!! DANKE du hast mich vor Zeitproblemen befreit

BINE:

[Hagen Reddmann]

Hi

<pre>

begin
dummystring:= '''';
for i := 0 to (gew_liste.Items.Count - 1) do
begin
sql_abfallwahl:= (sql_abfallwahl)+' e.e_bez = '+dummystring+gew_liste.Items.Strings[i]+dummystring+' AND ';
end;
SetLength(sql_abfallwahl, Length(sql_abfallwahl) - Length(' AND '));
end;

</pre>

Gruß Hage

Hi,

kann alles etwas kürzer schreiben

For I := 0 To Gew_Liste.Items.Count - 1 do
begin
if I = 0
then SQL := 'E.E_Bez = ' + #39 + Gew_Liste.Items.Strings[0] + #39
else SQL := SQL+' and E.E_Bez = '+#39+Gew_Liste.Items.Strings[I]+#39;
end;
//Ascii 39 ist ein Hochkomma (etwas kürzer