AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Einzel-Zeichen eines Strings Delphi 10.3 -> Delphi 10.4.1

Einzel-Zeichen eines Strings Delphi 10.3 -> Delphi 10.4.1

Ein Thema von skoschke · begonnen am 8. Feb 2021 · letzter Beitrag vom 8. Feb 2021
Antwort Antwort
skoschke

Registriert seit: 6. Jan 2009
322 Beiträge
 
Delphi 10.4 Sydney
 
#1

Einzel-Zeichen eines Strings Delphi 10.3 -> Delphi 10.4.1

  Alt 8. Feb 2021, 10:10
Delphi-Version: 10.4 Sydney
Hallo,

unter D 10.3 musste ich beim Durchlaufen eines Strings

Delphi-Quellcode:
k1 : string;
nz : char;

    for i := 1 to length(k1) do
    begin
{$IFDEF MSWINDOWS}
      nz := k1[i];
{$ENDIF}
{$IFDEF ANDROID}
      nz := k1[i - 1];
{$ENDIF}
Windows und Android anders handeln.
Nun unter D 10.4.1 funktioniert das nicht mehr, die Zeichenzählung ist jetzt unter Windows und Android gleich!
(so wie ich das damals eigentlich auch erwartet hätte, aber beim Debuggen eines besseren belehrt wurde)

Kann das jemand so bestätigen?

Ciao
Stefan

Geändert von skoschke ( 8. Feb 2021 um 10:18 Uhr)
  Mit Zitat antworten Zitat
Der schöne Günther

Registriert seit: 6. Mär 2013
5.658 Beiträge
 
Delphi 10 Seattle Enterprise
 
#2

AW: Einzel-Zeichen eines Strings Delphi 10.3 -> Delphi 10.4.1

  Alt 8. Feb 2021, 10:20
Das scheint sich tatsächlich in 10.4 geändert zu haben. Ich hätte erwartet dass so etwas in "Was ist neu" [1] steht, tut es aber leider nicht. Auch in der deutschsprachigen Hilfe [2] steht, mobile Plattformen würden bei Null anfangen zu zählen. Schaut man aber in die englische Hilfe [3], entdeckt man folgendes:

Zitat:
Compilers (desktop and mobile) have as predefined {$ZEROBASEDSTRINGS OFF} indicating the use 1-based string indexes.

Note: Previous to Delphi 10.4 the mobile compilers used by default 0-based indexing for strings.
[1] http://docwiki.embarcadero.com/RADSt...n/What%27s_New
[2] http://docwiki.embarcadero.com/RADSt...ings_)(Delphi)
[3] http://docwiki.embarcadero.com/RADSt...ings_)(Delphi)
  Mit Zitat antworten Zitat
bcvs

Registriert seit: 16. Jun 2011
563 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: Einzel-Zeichen eines Strings Delphi 10.3 -> Delphi 10.4.1

  Alt 8. Feb 2021, 10:38
In meinem 10.4 hat sich da nichts geändert:

Delphi-Quellcode:
  s:='Hallo';
  Label1.Caption:=s[1];
Im Label steht 'H'. (Windows)

Vielleicht ist da bei dir irgendwo das {$ZEROBASEDSTRINGS} verstellt.

Besser ist sowieso

Delphi-Quellcode:
for i := low(k1) to high(k1) do
begin
  nz := k1[i];
  Mit Zitat antworten Zitat
Der schöne Günther

Registriert seit: 6. Mär 2013
5.658 Beiträge
 
Delphi 10 Seattle Enterprise
 
#4

AW: Einzel-Zeichen eines Strings Delphi 10.3 -> Delphi 10.4.1

  Alt 8. Feb 2021, 10:44
Es geht ja auch darum, was sich unter Android und iOS geändert hat, nicht unter Windows.
  Mit Zitat antworten Zitat
skoschke

Registriert seit: 6. Jan 2009
322 Beiträge
 
Delphi 10.4 Sydney
 
#5

AW: Einzel-Zeichen eines Strings Delphi 10.3 -> Delphi 10.4.1

  Alt 8. Feb 2021, 11:24
Hallo,

hätte ich damals
for i := low(k1) to high(k1) do verwendet, wäre mir das vielleicht gar nicht aufgefallen...

Ciao
Stefan
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
38.387 Beiträge
 
Delphi 10.4 Sydney
 
#6

AW: Einzel-Zeichen eines Strings Delphi 10.3 -> Delphi 10.4.1

  Alt 8. Feb 2021, 12:25
Low(string) liefert auch den passenden StartIndex.
So wie es Low(S) und High(S) auf einer String-Variable tun.


Man könnte auch den StingHelper nutzen.
Die Methoden daran sind immer 0-basierend.

S.Chars[i] statt S[i] (auch wenn ich es funktionell eher bissl Krank empfinde, mit einem Funktionsaufruf dazwischen)
oder S.Length statt Length(S) .

Demo aus Delphi-Referenz durchsuchenTStringHelper.Chars :
Delphi-Quellcode:
var
  I: Integer;
  MyString: String;

begin
  MyString := 'This is a string.';

  for I:= 0 to MyString.Length - 1 do
    Write(MyString.Chars[I]);
end.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
Delphi-Tage 2005-2014
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +2. Es ist jetzt 04:23 Uhr.
Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf