Запрашивает кодовую страницу, отображая на экране диалоговое окно Code Page, а затем возвращает номер выбранной кодовой страницы.

GETCP([nCodePage] [, cText] [, cDialogTitle])

Параметры

nCodePage

Задает номер кодовой страницы, которая будет изображена выбранной в диалоговом окне Code Page. Если nCodePage равен 0 или опущен, при отображении диалогового окна Code Page никакая страница не будет выбрана.

cText

Задает текст выводимый в диалоговым окном Code Page. Если аргумент cText, опущен, Visual FoxPro отобразит следующую подпись: "Please select a code page for cross-platform data sharing."

cDialogTitle

Задает титульный заголовок, который появится в строке заголовка диалогового окна Code Page. Если аргумент cDialogTitle опущен, используется заголовок "Code Page".

Expand imageВозвращаемое значение

Числовое

Expand imageПримечания

Если выйти из диалогового окна Code Page, нажав клавишу ESC или кнопку Cancel или выбрав команду Close в меню Control, функция GETCP( ) возвратит 0.

Кодовые страницы, которые приводятся в диалоговом окне Code Page, определяются содержимым файла FOXPRO.INT ѕ файла поддержки кодовых страниц Visual FoxPro International.

Функцию GETCP( ) можно включать в такие команды, как MODIFY COMMAND, APPEND FROM и COPY TO, поддерживающие предложение AS nCodePage Появляющееся диалоговое окно Code Page дает возможность задать кодовую страницу для открываемого, присоединяемого или создаваемого файла. Поскольку кодовой страницы 0 не существует, нужно учесть вариант возвращения значения 0, когда пользователь нажимает клавишу ESC, кнопку Cancel или выбирает команду Close в меню Control.

Expand imageПример

В следующем примере отображается диалоговое окно Code Page, в котором выбрана кодовая страница 1252 (Windows ANSI). В качестве названия диалогового окна Code Page отображается фраза "Select a Code Page" , а в строке заголовка этого диалогового окна стоит "Code Page Selection".
  CopyCode imageCopy Code
? GETCP(1252, "Select a Code Page", "Code Page Selection")

Expand imageСмотрите также