Como mostrar vistas miniatura en un listview

[JoAnCa]

Un poco demorado para contestar, pero es que estaba ocupado con otras cosas

El problema es que hay que hacer algo con la conversion de tipos como se explica en este post

Código Delphi [-]
var
  Buffer      :Array [0..1000]of WideChar; 
  Direccion  :PWideChar;
  Addr        :String;

begin
   Addr:=edtCamino.Text + '\' + Tapiz;
   Direccion:= StringToWideChar(Addr,Buffer,Length(Addr)+1);
   StatusBar1.Panels[0].Text := WideCharToString(Direccion);
end;