TWideChar To String

[eks-s]

Здравствуйте! Вопрос может глупый. Есть переменная user типа TWideChar, хочу её содержимое вывести в Label.Caption. Как это сделать?
Пробовал
Label.Caption := TCaption(user)
Label.Caption := String(user)
выводит закорючки.

[Баламут]

TWideChar? Что-то не припомню такого типа. Может все-таки PWideChar?

В этом случае
s: PWideChar;
....
s := 'Превед, медвед';
Label1.Caption := s;

Все прекрасно работает

[Stilet]

+1
function WideCharToString(Source: PWideChar): string;

[eks-s]

Не получается чё то у меня. Проблема в строчках 14,15.

type
  TMyRegKey = record
    user  : PWideChar;
    passw : PWideChar;
  end;

...
procedure TForm1.Button1Click(Sender: TObject);
var
  reg : TRegIniFile;
  MyRegKey : TMyRegKey;
begin
  MyRegKey.user := PWideChar(Edit1.Text);
  MyRegKey.passw := PWideChar(Edit2.Text);
  label1.Caption := WideCharToString(MyRegKey.user);
end;

Пробую вот так,

MyRegKey.user := ' ';
StringToWideChar(Edit1.Text,MyRegKey.user,SizeOf(MyRegKey.user));

выдаёт исключение.
Подскажите где не правильно делаю

[BOBAH13]

PWideChar(Edit2.Text); так нельзя... вы просто говорите что по указателю Edit2.Text: String находится PWideChar хотя там всего PAnsiChar ! Надо конвертировать StringToWideChar ! И вообще если не сильно понимаите используйте типа WideString = String; И дельфи все сделает за Вас ( p.s. я так редко делаю )

[eks-s]

Сообщение от BOBAH13

PWideChar(Edit2.Text); так нельзя... вы просто говорите что по указателю Edit2.Text: String находится PWideChar хотя там всего PAnsiChar ! Надо конвертировать StringToWideChar ! И вообще если не сильно понимаите используйте типа WideString = String; И дельфи все сделает за Вас ( p.s. я так редко делаю )

Спасибо! Почитал справку про совмещение типов String-PChar и WideString-PWideChar.
То что хотел сделать получилось.

Но как работать с StringToWideChar всё равно не понятно, справка не помогает