Convertir un TString a PWideChar

[bustio]

Hola.... el codigo que me enviate si compila, pero cuando trato de visualizar la cadena convertida a PWideChar no es lo que se le entro. Esta es la implementacion.
Simplemente puse un edit, un boton y un label. En el edit entro el texto, en el OnClick del boton lo convierto y lo muestro con el label.

Cuando compilo me da este warning:
[Warning] strToPWideChar.pas(34): Suspicious typecast of String to PWideChar.

Supongo que ahi es donde esta el problema.. pero no lo deja hacer. Mi implementacion es esta:

procedure TForm1.Button1Click(Sender: TObject);
Var
Cadena : String;
Resultado : WideChar;
begin
Cadena := edit1.Text;
Resultado := PWideChar(Cadena)^;
Label1.Caption := Resultado;
end;


y cuando le entro la cadena LOLO, lo que me muestra en el label es: ??.

Saben por que es?? Agradezco cualquier sugerencia.

GRACIAS