Den richtigen Computernamen ändern

[RWarnecke]

Hallo zusammen,

ich danke allen, die hier mir geholfen haben. Ich habe dann letzte Nacht das Problem gefunden. Ich hatte eine Funktion bekommen, mit der ich die Variable Seriennummer gefüllt habe. Habe ich die Variable dann angewendet um den Inhalt in einem Label oder so anzuzeigen, dann hatt alles wunderbar funktioniert, nur halt bei der Funktion SetComputerNameEx nicht. Grund dafür war, der Inhalt der Variable wurde durch die Funktion mit der folgenden Zeile zurückgegeben :

Delphi-Quellcode:

  result := StrPas(PChar(serie));

Habe ich nun das StrPas rausgenommen :wall: , so funktioniert es auch. Das Ergebnis der Funktion ist ja ein AnsiString. Deshalb hat es nicht funktioniert. :wall: