Hello,
Je suis en train de me faire peur, j'ai aps retouché Delphi depuis 2 ans et j'ai tout oublié
Code :
- var
- WinDir: PChar;
- Result: string;
- begin
- GetMem(WinDir, 144);
- GetWindowsDirectory(WinDir, 144);
- Result:= StrPas(WinDir); {Returns ?:\...}
- FreeMem(WinDir, 144);
- DeleteFile(Result+'\pouet.txt');
- end;
|
voilà, il me fait une erreur de Pchar String pas compatibles au niveau du DeleteFile(Result+'\pouet.txt');
Pourquoi ???
Merci
---------------
Des trucs - flickr - Instagram