Verständnisfrage: String nach Pointer kopieren

[uligerhardt]

Zitat von gmc616:

Jupp, richtig verstanden.

Jetzt sagt mir der Complier:

Code:

[DCC Fehler] Unit1.pas(117): E2010 Inkompatible Typen: 'PWideString' und 'WideString'

Dann mach noch'n Haken hin: PWideString(APointer)^ := AText;

[gmc616]

Die Idee hatte ich auch.
Jetzt bekomme ich eine EOutOfMemory-Exception mit "Zu wenig Arbeitsspeicher."

Mein Test-Code aktuell:

Delphi-Quellcode:

procedure fktCopy (APointer : Pointer ; AText : WideString);
  begin
   // CopyMemory(APointer,PChar(AText),2*length(AText)+1);
    PWideString(APointer)^  := AText;
  end;
var
  sStr , sData : WideString;
  pStr : Pointer;
begin
  sData := '123';
  sStr := 'Hallo Welt';
  pStr := PWideChar(sStr);

  fktCopy (pStr,sData);

  ShowMessage (sStr);

Ändere ich alle WideString in String und alle PWideChar in PChar, was mir lieber wäre, komme ich eine Schutzverletztung.

Das geht mir nicht in den Kopf

[uligerhardt]

Ändere mal  pStr := PWideChar(sStr); in   pStr := @sStr; ab. Du willst ja nicht casten, sondern die Adresse deiner Variablen übergeben.

[gmc616]

Zitat von sirius:

Du machst try and error ohne nachzudenken. Glaub mir, das wird nix.

Ja, mittlerweile schon.

Zitat von uligerhardt:

Ändere mal  pStr := PWideChar(sStr); in   pStr := @sStr; ab. Du willst ja nicht casten, sondern die Adresse deiner Variablen übergeben.

Das ist die Lösung!

Ich dachte mal gelesen zu haben, das PChar(sStr) und @sStr das gleiche wären, ist es aber offensichtlich nicht.

BonusFrage: Aber PChar(sStr) und @sStr[1] ist das gleiche oder?
Das würde mir meinen Denkfehler erklären ...

Danke euch für die Hilfe

[uligerhardt]

Zitat von gmc616:

BonusFrage: Aber PChar(sStr) und @sStr[1] ist das gleiche oder?

Halbwegs - wenn sStr = '' ist, müssten sie sich unterscheiden. Aber die Regel ist ganz einfach: Wenn du nicht genau weißt, was du tust, nimm PChar(sStr) statt @sStr[1] .

[sirius]

Du hast einen Widestring. Der hat eine feste länge im Speicher. Und daran kannst du mit deinen Speicherkopieraktionen nichts ändern. Du müsstest schon die Länge aktiv ändern. Das geht aber nicht mehr, wenn du nicht mehr weißt, auf was dein Zeiger eigentlich zeigt.

Achso und Delphi(Compiler) beschwert sich natürlich nicht bei deinen Kopieraktionen. Der kopiert einfach (wie in ANSI C) aber du musst wissen was du tust.


Edit:

Zitat:

Ändere ich alle WideString in String und alle PWideChar in PChar, was mir lieber wäre, komme ich eine Schutzverletztung.

Du machst try and error ohne nachzudenken. Glaub mir, das wird nix.