Autor Beitrag
Hänsel
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 154



BeitragVerfasst: Mo 29.09.08 13:35 
Hallo
ich habe folgendes Problem.

wenn ich mit

ausblenden Delphi-Quelltext
1:
2:
3:
If MainForm.ADOTable3['Name']='Hansen' then
Begin
.....


kann es sein,dass hinter dem Namen "Hansen" noch ein Leerzeichen ist. Wie bekomme ich die Leerzeichen weg?

danke im voraus.

Hänsel

Moderiert von user profile iconTino: Delphi-Tags hinzugefügt
DeddyH
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mo 29.09.08 13:41 
Entweder beim Vergleich entfernen
ausblenden Delphi-Quelltext
1:
If Trim(MainForm.ADOTable3['Name'])='Hansen' then					

oder in der DB
ausblenden SQL-Anweisung
1:
UPDATE Tabelle SET Name = TRIM(Name)					

Je nach DBMS könntest Du das Trimmen auch gleich in einem Einfüge-Trigger übernehmen.
Hänsel Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 154



BeitragVerfasst: Di 30.09.08 05:20 
Danke,
habe es ausprobiert und fuktioniert.

Hänsel
Diamond
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 64
Erhaltene Danke: 1

Windows 7 Prof, OS X 10.8
Delphi XE Architect, XCode 4.4
BeitragVerfasst: Do 04.12.08 10:37 
Hi

Wollte dafür nicht noch extra wieder ein Topic aufmachen. :wink:
Habe ein ähnliches Problem, nur habe ich zwei CSV Dateien.
Ich denke damit erübrigt sich die Lösung über die Datenbank.
Zudem befinden sich in der Tabelle über 60.000 Einträge, was Lösung 1 auch nicht grad akzeptabel macht, wenn ich das richtig verstanden habe.
StringReplace fällt schonmal weg weil dort auch Namen wie "Irgendwas GmbH" auftauchen.
Gibt es eine andere möglichkeit evtl über eine Eigenschaft der TStringlist?

edit: Hat sich erledigt! Die Funktion "Trim()" hat abhilfe geschaffen :wink: