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? :-D

Vielen Dank :thumb:

[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! :thumb:
eine andere sache...

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

Delphi-Quellcode:

List.Exchange(i-1,i+ StrToInt(Schluessellist[i-1]));

der fehler auftritt, dass das Listenmaximum überschritten wird.

[r2c2]

Zitat:

Zitat von mo_greene

Delphi-Quellcode:

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:

Zitat von r2c2

Zitat:

Zitat von mo_greene

Delphi-Quellcode:

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 :oops:
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

Delphi-Quellcode:

List.Exchange(i-1,i+ StrToInt(Schluessellist[i-1]));

und

Delphi-Quellcode:

List.Move(i-1,i+ StrToInt(Schluessellist[i-1]))

entsteht der gleiche Fehler! :gruebel:

[r2c2]

Debugger

mfg

Christian

[mo_greene]

Ich konnte nichts finden...die Variablen stimmen alle :gruebel:

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:

Delphi-Quellcode:

List.Exchange(0, 1 + {Ziffer im Element mit dem Index 0 in der Schluessellist});

Ich versteh das nicht?!