Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Unwichtige Frage zu Char - string[1] (https://www.delphipraxis.net/171721-unwichtige-frage-zu-char-string%5B1%5D.html)

ATS3788 21. Nov 2012 18:11

Unwichtige Frage zu Char - string[1]
 
Hallo
Mir fällt gerade mal wieder auf warum

ein Char kein String[1] ist, gibt es dafür einen Grund

Delphi-Quellcode:
var
ch : char;       // geht nicht
ch : string[1];  // geht
ch := copy(S , pos('%', S ) , 1);

Furtbichler 21. Nov 2012 18:12

AW: Unwichtige Frage zu Char - string[1]
 
Jo.
Sach ma.
Was machst Du eigentlich, wenn Pos('%',s) 0 zurückliefert?

Popov 21. Nov 2012 19:27

AW: Unwichtige Frage zu Char - string[1]
 
Ein String kann auch leer sein, dh keine Zeichen enthalten, ein Char enthält immer 1 Zeichen.

Somit klappt das auch nicht

s := '';
c := s[1];

Mit der Copy-Methode stehst du auf der sicheren Seite. Zu Not kommt da ein leerer String zurück.

himitsu 21. Nov 2012 19:37

AW: Unwichtige Frage zu Char - string[1]
 
Die frage hätte sich auch selber klären lassen.
Copy gibt immer einen String zurück (unabhängig davon wie lang der ist),
also kann man das Result von Copy auch nur an einen String übergeben, oder an etwas, wo auch ein String reinpasst, wie z.B. ein Variant.
Aber man kann einen String niemals an einen Char übergeben ... mankann sich höchstens aus einem String einen Char rausnehmen und diesen kann man dann an einen Char übergeben.

Und ein String[1] ist ein String (ShortString) mit einer Maximallänge von 1.


PS: Wenn Pos nichts findet, dann gibt es 0 zurück,
da aber Copy unter 0 aufrundet, wird dann das erste "Char" zurückgegeben (wenn mindestens 1 Zeichen vorhanden ist.

Delphi-Quellcode:
var
  ch: Char;

ch := Copy(S, Pos('%', S), 1)[1];

ch := S[Pos('%', S)];
Achtung: Diese Codes funktionieren nur, wenn mindestens 1 Zeichen im String vorhanden ist und wenn Pos auch etwas findet.

ATS3788 22. Nov 2012 09:07

AW: Unwichtige Frage zu Char - string[1]
 
Danke für die Antworten


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:30 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz