[] werden weggelassen.

[Masterof]

Hallo!

Ich habe einen String eingelesen und suche jetzt nach '[Pk]', leider wird dieser Ausdruck beim lesen aus dem Memo weggelassen.
Warum ist das so, und wie lese ich den String besser aus?

Delphi-Quellcode:

for i:= 0 to memdaten.Lines.Count-1 do
begin
 zeichen:= memdaten.Lines.ValueFromIndex[i];
 zeig:= pos('[Pk]', zeichen);

MfG Master

[marabu]

An deinem Code ist der vermeintliche Fehler nicht ablesbar. Eventuell passt deine Methode nicht zu den Daten.

marabu

[sniper_w]

Der Fehler ist sehr wohl da. So dürfte es gehen (zumindest bei mir):

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
 var mys:string;
    i, d:Integer;
begin
  for i:=0 to Memo1.Lines.Count-1 do
  begin
    mys := Memo1.Lines.Strings[i];
    mys := LowerCase(mys);
    d := Pos('[pk]',mys);
    if d<>0 then
    begin
      Caption := 'Line:' + IntToStr(i+1) +'  Position:'+IntToStr( d );
      Break;
    end;
  end;
end;

[edit=alcaeus]quote- durch delphi-Tags ersetzt. In Zukunft bitte die richtigen Tags verwenden. Mfg, alcaeus[/edit]

[Zettuu]

Das Problem liegt bei dem ValueFromIndex, welches bewirkt, dass vermutlich die erste Klammer weggelassen wird. Benutze einfach das Strings[] wie in dem Beispiel von sniper_w und es sollte funktionieren.

[barf00s]

kannst du nich einfach so tun?

wenn in deinem memo es wie folgt steht..

Key=Value

Delphi-Quellcode:

var
  xSL: TStringlist;

begin
  xSL := TStringlist.Create;
  xSL.Assign(Memo1.Lines);
  iValue := StrToIntDef(xSL.Values['Key'], 0); 
  FreeAndNil(xSL);
end;

wenn Value ne zahl ist :)

[Masterof]

Hallo!

danke, es hat funktioniert

MfG Master

[barf00s]

welche der varianten hat jetz funktioniert? ~neugierig~ :)

[marabu]

Wenn die Daten nicht gezeigt werden, kann man keinen Fehler im Code erkennen. Dass der Code für sich genommen korrekt funktioniert zeigt folgender Test:

Delphi-Quellcode:

memDaten.Lines[i] := 'key=abc[Pk]def';
zeichen := memdaten.Lines.ValueFromIndex[i];  // zeichen = 'abc[Pk]def';
zeig:= pos('[Pk]', zeichen);                  // zeig = 4;

Warum sollte ValueFromIndex nicht funktionieren?

marabu

[Zettuu]

Wenn das [pk] am Anfang der Zeile steht gibt das ValueFromIndex nur ein pk] zurück

[Masterof]

Hallo!!

Habe die Version von sniper_w verwendet.
Danke nochmal für die anderen Lösungen.

MfG Master