Contains the code page of a file in a project. Read-only at design time and run time.
The code page is a numeric value indicating the character set used for the file. Code pages usually correspond to different platforms and languages and are used in international applications.
This example counts how many project files are using code page 1252 (ANSI Windows).
nCode1252=0 MODIFY PROJECT myproject NOWAIT FOR i = 1 TO _VFP.ActiveProject.Files.Count IF _VFP.ActiveProject.Files(i).CodePage = 1252 bCode1252=nCode1252+1 ENDIF ENDFOR ?nCode1252 && Show the count in the Visual FoxPro screen.
Applies To: File Object