Einzelnen Beitrag anzeigen

harfes

Registriert seit: 25. Jun 2006
Ort: Rand der Scheibe
197 Beiträge
 
Delphi 12 Athens
 
#1

StringList - merkwürdiges Verhalten

  Alt 25. Okt 2011, 07:49
Delphi-Version: XE
Hallo,

ich habe bisher unter D2007 folgenden Code problemlos eingesetzt:

Delphi-Quellcode:
procedure DatumInMemo(datum:String);
var
sl : TStringList;
begin
.....(hier wird kdname und tourtxt ermittelt)...
for i := 0 to sl.Count - 1 do
begin
    sldatum:=copy(sl.ValueFromIndex[i],3,10);
    if (sldatum=datum) then
    begin
        Memo1.Lines.Add(kdname+': '+tourtxt);
    end;
end;
end;
In der StringList sind definitiv 1202 Zeilen in folgender Form:

FR 06.02.2009 14:00 - 06.02.2009 15:45
FR 06.11.2009 14:00 - 06.11.2009 15:45
FR 13.11.2009 14:00 - 13.11.2009 15:45

Wie oben ersichtlich, möchte ich nun das erste Datum der jeweiligen Zeile in der
StringList (deshalb der copy-Befehl) mit einem vorgegebenem Datum vergleiche, wenn
das dann gleich ist, werden bestimmt Variablen in ein Memofeld geschrieben.
So weit so gut - unter D2007 läuft das völig problemlos! Wenn ich die selbe Routine
unter Delphi XE (NICHT XE2!) kompiliere, dann gibt es zwar keine Fehlermeldung...ABER
auch keine Einträge in dem Memofeld mehr. Wenn ich mir mit einem showmessage die
Variable sldatum anschaue, kommt da nix mehr an...

Hat da jemand eine Idee????

Hartmut
Hartmut

Geändert von mkinzler (25. Okt 2011 um 08:53 Uhr)
  Mit Zitat antworten Zitat