Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Pointer vom String übergeben und ändern (https://www.delphipraxis.net/88521-pointer-vom-string-uebergeben-und-aendern.html)

3_of_8 16. Mär 2007 22:06

Re: Pointer vom String übergeben und ändern
 
Müsste es nicht eigentlich @s[1] heißen?

himitsu 17. Mär 2007 01:17

Re: Pointer vom String übergeben und ändern
 
kommt drauf an ...

@S[1] gibt einen Zeiger auf den String (das erste Zeichen)

PChar(S) macht das "Selbe", nur daß hier keine Exception auftritt, wenn der String leer ist

PChar(Pointer(S))^ 's selbe wie @S[1] ... hier sollte wohl klar werden, warum eine Exception auftreten könnte (S = '' >> Pointer(S) = nil)

@S gibt einen Zeiger auf die Stringvariable wieder
welches hier korrekt wäre


Bei ShortStrings (welches in etwa einem Array[0..x] of Char entspricht) ist @S genau das Selbe wie @S[1], sodas dort beises auf das erste Zeichen / den Arrayanfang zeigt.

3_of_8 17. Mär 2007 11:25

Re: Pointer vom String übergeben und ändern
 
Achja, jetzt fällts mir auch wieder ein. Ich glaube Strings sollte man in DLLs nur intern benutzen, aber nicht in Signaturen, also nicht als Parameter oder Rückgabewerte. Dafür sollte man PChars verwenden.

So nebenbei glaube ich macht PChar(s) noch mehr, es erzeugt einen neuen "String" mit gleichem Inhalt, ohne Längenbytes aber mit terminierendem #0.

himitsu 17. Mär 2007 13:30

Re: Pointer vom String übergeben und ändern
 
nein tuts nicht:


Delphi-Quellcode:
function LStrToPChar(const s: AnsiString): PChar;
const
  EmptyString = '';
begin
  if Pointer(s) = nil then
    Result := @EmptyString
  else
    Result := Pointer(s);
end;


// beides gleich:
P := PChar(S);
P := LStrToPChar(S);
Besser wäre also
Delphi-Quellcode:
UniqueString(S);
P := PChar(S);
hier würde ein UniqueString automatisch aufgerufen:
Delphi-Quellcode:
P := @S[1]

[add]
Delphis Strings sind ine Kombination:
hinten die #0 und davor Längen- und Referenzzähler


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:42 Uhr.
Seite 2 von 2     12   

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