Thema: Delphi Letztes Zeichen im Memo

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.167 Beiträge
 
Delphi 12 Athens
 
#7

AW: Letztes Zeichen im Memo

  Alt 8. Apr 2012, 20:59
Zitat:
auf Lines.String[1] zugreife bekomme ich auch die erste hinzugefügte Zeile raus.
Das kann aber nicht stimmen.
Nja, die 1. Eingefügt vieleicht, aber nicht die Erste, welche im Memo drinsteht.
Du hast bestimmt den Komponentennamen vergessen, welchen die VCL standardmäßig als Inhalt einfügt, wenn du ein Memo auf die Form pappst.

Indize beginnen fast immer bei 0 (der erste Ausgangswert in der Zählung).
Das ist auch bei dynamischen Arrays so ... Offset 0 ist der Anfang.


Nur die Delphi-Strings fangen bei 1 an, aber eigentlich fangen sie auch bei 0 an, wenn man sich mal die Geschichte ansieht.
Siehe Delphi-Referenz durchsuchenShortString:
An Position 0 sitzt das Längenbyte und danach folgen die Zeichen.

Wegen der Abwärtskompatibilität hat man dann die neueren Strings (AnsiString) dann auch mit 1 anfangen lassen.
Intern fangen sie aber mit 0 an (Delphi zieht dort intern immer 1 ab).

Delphi-Quellcode:
var
  S: String;
  P: PChar;

S := '123';
P := PChar(S);
Memo1.Lines.Add(S[1] + ' ' + P[0]); // an Position 0 ist das 1. Zeichen
Memo1.Lines.Add(S[2] + ' ' + P[1]);
Memo1.Lines.Add(S[3] + ' ' + P[2]);
Memo1.Lines.Add(Memo1.Lines[0]); // 0 gibt die 1. Zeile zurück
Memo1.Lines.Add(Memo1.Lines[1]);
Memo1.Lines.Add(Memo1.Lines[2]);
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu ( 8. Apr 2012 um 21:07 Uhr)
  Mit Zitat antworten Zitat