String nach array[0..1024] of Char

[Hawkeye219]

Zitat von turboPASCAL:

Es gibt ja auch die Windowsfunktionen

Das ist richtig, aber hast du Beitrag #9 gelesen?

Delphi-Quellcode:

{$R+}
Temp := '';
{Windows.}lstrcpy(MyArray, @Temp[1]);
{$R-}

Bei eingeschalteter Bereichsüberprüfung wirft dieser Code sehr zuverlässig eine Exception
Falls Leerstrings auftreten können, würde ich die Delphi-Funktion bevorzugen.

Gruß Hawkeye

[turboPASCAL]

Oder so:

windows.lstrcpyn() Es ist halt eine Frage ob diese SysUtils verwendet werden soll oder nicht.

[Hawkeye219]

Das wäre ein Ersatz für die Delphi-Funktion StrPLCopy - mit den gleichen Schwierigkeiten bei Leerstrings.

Das Problem bei den Windows-Routinen ist ja, daß der Fehler bereits vor dem eigentlichen Call auftritt. Der Zugriff auf das erste Zeichen über Temp[1] führt bereits zu einer Exception. Da hilft leider auch die beste Windows-Routine nicht mehr...

Gruß Hawkeye

[turboPASCAL]

Du kannst aber eine Funktion schreiben mit deren Hilfe so etwas ausgeschlossen wird, zB. mit if, then und else.

if Temp = '' then Temp := #0;