Also einfach einander zuweisen. Habe ich verstanden!!!
Und diesen Teil muss ich gar nicht weiter verwenden.
Zitat von
neolithos:
In der
Dll:
Delphi-Quellcode:
function GetDataName(pStr : PChar; iStrLen : Integer) : Integer;
var sDataName : String;
begin
sDataName := 'Hallo Welt!'; // Irgentein Text
Result := Min(Length(sDataName), iStrLen - 1); // Passt die Zeichenkette in den Speicher ?
// wenn nicht kopiere was geht, sonst kopiere Text
// + setzen des Rückgabewertes der tatsächlich kopierten Zeichen
StrLCopy(pStr, PChar(sDataName), Result); // Sicheres kopieren in den Buffer
end;
In Prog z.B.:
Delphi-Quellcode:
SetLength(sStr, 1024); // Erstelle Buffer für 1024 Zeichen
SetLength(sStr,
GetDataName(
PChar(sStr), // Übergib Buffer
1024) // Sage wieviel Byte der Buffer hat
); // Lösche alle Überflüssigen Bytes, die Hintendranhängen
Buffer = Dynamischer Speicher