Vergleich von Delphi und Visual C++ - Inhalt

Vergleich von Delphi und Visual C++ - Kapitel 2B
#include
char KurzText[100];
char* PKurzText; // Zeiger
strcpy(KurzText, "Hallo Welt");
printf("%s\n", KurzText);
PKurzText = KurzText;
PKurzText = PKurzText + 3;
printf("%s\n", PKurzText);
*PKurzText = 'b';
PKurzText++;
*PKurzText = 'e';
printf("%s\n", KurzText);
KurzText[8] = '\0';
printf("%s\n", PKurzText-1);
Uses SysUtils;
var
KurzText: Array[0..99] of Char;
PKurzText: PChar; // Zeiger
StrCopy(KurzText, 'Hallo Welt');
writeln(KurzText);
PKurzText:= KurzText;
PKurzText:= PKurzText + 3;
writeln(PKurzText);
PKurzText^:= 'b';
inc(PKurzText);
PKurzText^:= 'e';
writeln(KurzText);
KurzText[8]:= #0;
writeln(PKurzText-1);
Ausgabe:
Hallo Welt
lo Welt
Halbe Welt
be We
Ausgabe:
Hallo Welt
lo Welt
Halbe Welt
be We
Als Alternativen zu den Char-Arrays und ihrer Zeiger-Arithmetik bieten beide Sprachen Ersatztypen an:
VC++ Object Pascal Länge in Win32 (Intel)
String-Klasse CString - 4 Byte
Stringzeiger - String = AnsiString 4 Byte
String, kurz - ShortString[xxx]
mit 1