Bestimmtes Zeichen aus Stringlist

[mo_greene]

Hallo,

wie kann ich ein bestimmtes Zeichen aus einem bestimmten Element einer Stringlist auslesen?

Beispiel:

3. Zeichen im Element mit dem Index 6.

Wie mache ich das?

Vielen Dank

[Dax]

Du hast eine indizierte Liste von Strings, und ein String ist eine indizierte Liste von Chars. Was also spricht gegen StrList[5][3]?

[peschai]

Hallo

Bitte beachte die 5 um an den 6.String der StringListe zu kommen, da der index hier 0 basiert ist. (0..5). Desweiteren ist aber in einem String der Zeichenindex 1 basierend!
Auch solltest du am besten vorher checken, daß die positionen auch besetzt sind.

Delphi-Quellcode:

function MyGetChar(Const aStrings:tStrings; iLine,iPos:integer):Char;
var
  sTmp:String;
begin
  { Safety }
  Result := #0;
  sTmp := '';
  { Mainwork }
  If (iLine>=0) and (iLine<aStrings.Count) then
    begin
      sTmp := aStrings[iLine];
      if (Length(sTmp)>=iPos)
        then Result := sTmp[iPos];
    end;
end;

[mo_greene]

okay vielen dank!
eine andere sache...

kann ich innerhalb der stringlist die elemente einfach verschieben?
warum ich frage ist die sache, dass bei

List.Exchange(i-1,i+ StrToInt(Schluessellist[i-1])); der fehler auftritt, dass das Listenmaximum überschritten wird.

[r2c2]

Zitat von mo_greene:

List.Exchange(i-1,i+ StrToInt(Schluessellist[i-1])); der fehler auftritt, dass das Listenmaximum überschritten wird.

Ich schätze mal i+ StrToInt(Schluessellist[i-1]) wird zu groß...
der Debugger hilft...

mfg

Christian

[mo_greene]

Zitat von r2c2:

Zitat von mo_greene:

List.Exchange(i-1,i+ StrToInt(Schluessellist[i-1])); der fehler auftritt, dass das Listenmaximum überschritten wird.

Ich schätze mal i+ StrToInt(Schluessellist[i-1]) wird zu groß...
der Debugger hilft...

mfg

Christian

verstehe ich nicht ganz
debugger? was kann ich tun, damit das listenmaximum nicht überschritten wird?

[Namenloser]

Hallo,

TList und alle ihre Nachfahren beiten die Methode Move an, mit der du Elemente verschieben kannst.

[mo_greene]

Bei

List.Exchange(i-1,i+ StrToInt(Schluessellist[i-1])); und
List.Move(i-1,i+ StrToInt(Schluessellist[i-1])) entsteht der gleiche Fehler!

[r2c2]

Debugger

mfg

Christian

[mo_greene]

Ich konnte nichts finden...die Variablen stimmen alle

Ich verstehe auch nicht warum das zu groß ist?

Delphi-Quellcode:

  for i := 1 to length (Schluessel) do
  begin
    List.Exchange(i-1,i+ StrToInt(Schluessellist[i-1]));
    List.Sort;
  end;

Das Programm macht ja schon beim ersten Durchlauf (i=1) einen Fehler.
Folgendes steht ja dann da:

List.Exchange(0, 1 + {Ziffer im Element mit dem Index 0 in der Schluessellist}); Ich versteh das nicht?!