String Problem

[blaky]

Code:

var
readline: string;
ATLN: string;

if ((Pos('33', readline) = 1) and (readline[4] = '2')) then // Langrufnummer kommenden Amtsl.
    begin
      readline_identifiziert:= true;
      for I := 11 to 34 do
        begin
          if readline[I] =' ' then break else
             ATLN:=ATLN+readline[I];
        end;
       showmessage(datetostr(date)+' '+timetostr(time)+'-> kommender Anruf von RufNr: ' + ATLN + 'auf Amtsleit.: ' + readline[6] + readline[7] + readline[8] + readline[9] );
    end;

habe bei obigem Code das Problem das mir die showmessage alles was NACH der Variabel ATLN steht nicht mit ausgibt.
Weise ich ATLN etwas statisches zu (also wird nicht durch die for schleife gefüllt) wird mir die gesamte showmessage angezeigt.

stehe grad voll auf dem schlauch

[Bernhard Geyer]

Wie wäre es mit Berücksichtigung der Compilerwarnung das ein nicht initialisierte Variable verwendet wird?

[DeddyH]

Steht vielleicht ein #0 in ATLN?

[Luckie]

Guck dir im Debugger mal die variable an. Steht am Ende eventuell ein #0 oder ein anders Steuerzeichen?

Delphi-Quellcode:

ATLN := Trim(ATLN);

[blaky]

Zitat:

Zitat von Luckie (Beitrag 1124072)

Guck dir im Debugger mal die variable an. Steht am Ende eventuell ein #0 oder ein anders Steuerzeichen?

Delphi-Quellcode:

ATLN := Trim(ATLN);

... shit zu früh gefreut klappt doch nicht

[blaky]

Code:

    if ((Pos('33', readline) = 1) and (readline[4] = '0')) then // Langrufnummer kommenden Tln.
    begin
      readline_identifiziert:= true;
      for I := 11 to 34 do
        begin
          if readline[I] =' ' then break else
             ATLN:=ATLN+readline[I];
        end;
       ATLN := Trim(ATLN);
       showmessage(datetostr(date)+' '+timetostr(time)+'-> kommender Anruf von RufNr: '+ ATLN +' auf Nst: ' + readline[6] + readline[7] + readline[8] + readline[9]);

    end;

selbst mit Trim funktioniert es nicht ??? nach ATLN ist schluss

[himitsu]

Ist readline überhaubt mit genug Zeichen gefüllt?

Schalte mal die Bereichsprüfung an, in den Projektoptionen.

Zitat:

Zitat von Bernhard Geyer (Beitrag 1124068)

Wie wäre es mit Berücksichtigung der Compilerwarnung das ein nicht initialisierte Variable verwendet wird?

Strings sind immer initialisiert, da dieses automatisch geschieht.

[Bernhard Geyer]

Zitat:

Zitat von himitsu (Beitrag 1124089)

Zitat:

Zitat von Bernhard Geyer (Beitrag 1124068)

Wie wäre es mit Berücksichtigung der Compilerwarnung das ein nicht initialisierte Variable verwendet wird?

Strings sind immer initialisiert, da dieses automatisch geschieht.

Stimmt. Habs mit allen anderen lokalen Variablen verwendet :wall:

[blaky]

die readline ist immer genug gefüllt..

habe gerade festgestellt das es sporadisch mit

Code:

Trim(ATLN);

funktioniert aber nur sporadisch

das bringt mich zum Schluss das in der readline außer Leer und Steuerzeichen sporadisch noch andere Zeichen sind

jemand ne Idee wie ich alles außer Zahlen 0-9 rausfiltere?

[Klaus01]

.. da gab es vor kurzem mal einen Thread dazu

Grüße
Klaus