Incompatible types beim Zusammensetzen von WideChars

[kwhk]

So geht es mit Delphi 7, man muss die einzelnen Zeichen zunächst einer WideString-Variablen zuweisen, danach kann man sie verbinden.

Delphi-Quellcode:

program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
   s1, s2: WideString;
   s21, s22 : WideString;
   s : String;
begin
   s1  := 'abc';
   s21 := s1[1];
   s22 := s1[2];
   s2  := s21 + s22;

   WriteLn('s1=',s1);
   WriteLn('s1[1]=',s1[1]);
   WriteLn('s1[2]=',s1[2]);
   WriteLn('s21=',s21);
   WriteLn('s22=',s22);
   WriteLn('s2=',s2);

   ReadLn(s);
end.

Hier das Ergebnis

Code:

s1=abc
s1[1]=a
s1[2]=b
s21=a
s22=b
s2=ab