OberonCore • - Какой параметр передавать в Dialog.Update?

Сообщения без ответов | Активные темы

Список форумов » Проект Информатика-21 » Для начинающих

Часовой пояс: UTC + 3 часа

Какой параметр передавать в Dialog.Update?

Страница 1 из 1

[ Сообщений: 6 ]

Версия для печати

Пред. тема | След. тема

Автор

Сообщение

Александр К

Заголовок сообщения: Какой параметр передавать в Dialog.Update?

Добавлено: Суббота, 14 Октябрь, 2017 07:58

Зарегистрирован: Воскресенье, 06 Август, 2017 19:33
Сообщения: 95

Какой параметр передавать в Dialog.Update?

Код:

MODULE MyGu;
IMPORT Dialog;

VAR myString*: ARRAY 64 OF CHAR;

PROCEDURE A*;(**)
BEGIN
myString := "кнопка была нажата";
Dialog.Update(myString)(*В этой строке ошибка: передача неправильного параметра*)
END A;

END MyGu.

Вернуться к началу

Иван Денисов

Заголовок сообщения: Re: Какой параметр передавать в Dialog.Update?

Добавлено: Суббота, 14 Октябрь, 2017 11:27

Зарегистрирован: Четверг, 08 Октябрь, 2009 15:00
Сообщения: 3806

Dialog.UpdateString

Вернуться к началу

prospero78

Заголовок сообщения: Re: Какой параметр передавать в Dialog.Update?

Добавлено: Суббота, 14 Октябрь, 2017 11:35

Зарегистрирован: Воскресенье, 12 Апрель, 2015 18:12
Сообщения: 1135
Откуда: СССР v2.0 rc 1

По правой кнопочке мыши на "Dialog" можно выбрать пункт меню "Интерфейс". Там, все доступные процедуры обновлений представлены (а также доступные типы, переменные, константы). Генерация информации по интерфейсу берётся из актуального состояния соответствующего модуля. Файл символьных ссылок (если не путаю). Рекомендую))

Вернуться к началу

Александр К

Заголовок сообщения: Re: Какой параметр передавать в Dialog.Update?

Добавлено: Суббота, 14 Октябрь, 2017 14:18

Зарегистрирован: Воскресенье, 06 Август, 2017 19:33
Сообщения: 95

Код:

MODULE Gu;
IMPORT Dialog;
VAR age*: BYTE;
PROCEDURE ageNotifier* (op, from, to: INTEGER);(*Эта процедура не даёт ввести возраст более 120 лет*)
BEGIN
   IF age > 120 THEN
         age := 120;(*то ли присваивание не работает*)
         Dialog.UpdateByte(age);(*то ли обновление*)
         Dialog.Beep
      END
END ageNotifier;
END KnyshGu.

Код:

MODULE Gu;
IMPORT Dialog;
VAR age*: INTEGER;
PROCEDURE ageNotifier* (op, from, to: INTEGER);(*Эта процедура не даёт ввести возраст более 120 лет*)
BEGIN
   IF age > 120 THEN
         age := 120;
         Dialog.UpdateInt(age);
         Dialog.Beep
      END
END ageNotifier;
END KnyshGu.

Почему первый код не работает, а второй работает?

Вернуться к началу

Илья Ермаков

Заголовок сообщения: Re: Какой параметр передавать в Dialog.Update?

Добавлено: Суббота, 14 Октябрь, 2017 14:25

Зарегистрирован: Понедельник, 14 Ноябрь, 2005 18:39
Сообщения: 9459
Откуда: Россия, Орёл

Скорее всего, Вы вводите число > 127, сразу получаете переполнение байта (т.е. значение становится отрицательным), и IF > 120 уже ложно.
(Хотя, по идее, поле ввода само не должно позволять для байта ввод с переполнением.)

Зачем Вам байт? Он в основном для чисто технических нужд (или для экономии памяти при обработке очень больших объёмов данных в ОЗУ), уж никак не для хранения конкретного прикладного значения из задачи.

Вернуться к началу

Александр К

Заголовок сообщения: Re: Какой параметр передавать в Dialog.Update?

Добавлено: Суббота, 14 Октябрь, 2017 15:14

Зарегистрирован: Воскресенье, 06 Август, 2017 19:33
Сообщения: 95

Всем большое спасибо за ответы.

Вернуться к началу

Страница 1 из 1

[ Сообщений: 6 ]

Список форумов » Проект Информатика-21 » Для начинающих

Часовой пояс: UTC + 3 часа

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1

Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения