[Lazarus-es] problema con Unicode y CreateFileW

[J.Alejandro Martinez Linares]

Hola estoy tratando de reparar una versión de supercopier que es un 
programa para copiar archivos y carpetas pero justo en la seccion que 
les pongo abajo cada vez que el sitema se encuentra una carpeta con 
tildes el sistema me da una excepción notificandome que no tiene acceso, 
y justo en el fragmento que les muestro es donde el sistema se engancha
,
en "HSrc<>INVALID_HANDLE_VALUE" se supne que no varien y varía y es solo 
cuando encuntra como dije antes una carpeta con tilde ya he probado con 
archivos con tilde y no pasa, al igual que con ñ  y tampoco nada, solo 
las carpetas con tildes son lo que estropea todo, ayudeneme a entender 
que es lo que sucede acá, gracias,

HSrc:=Windows.CreateFileW(PWideChar(UTF8Decode(SourceFile)),
                             GENERIC_READ,
                             FILE_SHARE_READ or FILE_SHARE_WRITE,
                             nil,
                             OPEN_EXISTING,
                             FILE_ATTRIBUTE_NORMAL or FILE_FLAG_OVERLAPPED
                             or 
IfThen(SourceIsNetwork,0,FILE_FLAG_NO_BUFFERING),
                             0);
         RaiseCopyErrorIfNot(HSrc<>INVALID_HANDLE_VALUE);



Saludos A todos y gracias de antemano.

--
Nunca digas nunca, di mejor: gracias, permiso, disculpe.

Este mensaje le ha llegado mediante el servicio de correo electronico que ofrece Infomed para respaldar el cumplimiento de las misiones del Sistema Nacional de Salud. La persona que envia este correo asume el compromiso de usar el servicio a tales fines y cumplir con las regulaciones establecidas

Infomed: http://www.sld.cu/