Accents dans fichier texte vers Windows
Bonjour,
Afin de transférer un fichier texte dans une base de données en conservant les accents, j'ai récupéré ce code dans la FAQ.
Lorsque j'utilise cette fonction j'ai un message disant que 'Char' et 'WideChar' sont incompatibles.
Si quelqu'un pouvait m'aider à résoudre ce problème.
Merci
BB
Code:
1 2 3 4 5
| function DosStrToWinStrW(Const StrDos: String): WideString;
begin
SetLength(Result,Length(StrDos));
OemToCharBuffW(pChar(StrDos),@Result[1],Length(StrDos));
end; |