Аудио файлы лекции Н.Вирта на Oberon Day @ CERN доступны с адреса

http://cern.ch/oberon.day/talks/wirthaudio.htm

Ну вот приходится опять обращаться за помощью. Необходимо проиграть простейший звук (Dialog.Beep не подходит). Выходит нужно использовать функцию WinAPI - PlaySound(...). Но у нее такие типы данных, которые я не знаю как переводятся в компонентный паскаль - LPCSTR, HMODULE, DWORD. Если кто-нибудь знает, как их перевести в комп. паскаль - подскажите пожалуйста.

Ответ на »сообщение 1792« (Ирина)
___________________________
WinAPI уже функции описаны в подситеме Win.

DEFINITION WinMM ["WINMM.dll"];
....
PROCEDURE PlaySound (pszSound: WinApi.PtrSTR; hmod: WinApi.HMODULE; fdwSound: INTEGER): WinApi.BOOL;

Ответ на »сообщение 1793« (Trurl)
___________________________
Может у вас свежая версия ЧЯ? Если так, то подскажите, где взять, потому как у меня такое описание отсутствует.

Ответ на »сообщение 1794« (Ирина)
___________________________
Попробуйте выделить в тексте WinMM и выполнить Interface.

На »сообщение 1784«
Проблемы с русскими символами вызваны тем, что BlackBox не переводит в Unicode, а просто дополняет 0. Строки из коротких символов выводятся нормально (DrawSString).
Чтобы перевести в Unicode, можно воспользоваться Info21sysConv.ToUnicode (»сообщение 1787«), но "более правильной" будет такая процедура.

PROCEDURE SStringToString (IN a: ARRAY OF SHORTCHAR;
      OUT w: ARRAY OF CHAR; OUT res: INTEGER);
BEGIN
res:= WinApi.MultiByteToWideChar(WinApi.CP_ACP,WinApi.MB_PRECOMPOSED,
a,-1,w,LEN(w));
END SStringToString;

К сожалению, исправить SqlControls.Table, StdStamps.StdView и т.п. без исходников невозможно.

На »сообщение 1780«
>>> Соединяюсь с нужной БД, и прошу отобразить список доступных баз. Но в таблице ничего не меняется. Тоже происходит, если прошу отобразить список таблиц или саму таблицу. Update использую везде.

Для таблиц, как и для списков, надо использовать UpdateList

From: support@oberon.ch (Tech-Support (BlackBox))
To: Blackbox Mailing-List [blackbox@oberon.ch]
Cc: Blackbox Tech-Support [support@oberon.ch]
Subject: BlackBox 1.5 BETA
Time: 2004-12-30 at 17:55
Message:
Dear BlackBox developers,

today, we released the beta version of BlackBox 1.5 for download from our Web site. Basically, this is BlackBox 1.4 plus service pack 1 plus some additional patches plus the Direct-To-COM compiler extensions, consolidated into a new release.
The major new aspect of BlackBox 1.5 is the added source code for the entire system, governed by an open source license.

The new release is a beta release.
We will make the final release available within the first quarter of 2005.

We hope that our contribution enables open source projects based on BlackBox, to take it to places that we would not be able to reach with our new strategic direction and the limited resources we have.
Oberon microsystems will continue to use BlackBox in some customer projects, and thus is interested first and foremost in a stable code base, with as few changes and additions as possible.
Nevertheless, there may be new releases from time to time, which we will provide as open source as well.

Starting now, technical support for BlackBox will be strictly limited to existing ASPAK tokens and to support contracts.
If you are interested in a support contract, or have questions regarding the new open source license, please contact info@oberon.ch.

With these open source arrangements,
new perspectives for the future development of BlackBox as a highly reliable and light-weight development platform are opened, right in time for the new year.

We wish you all a Happy New Year,

your Oberon microsystems crew

Хороший подарок! Теперь бы разобраться с ним :)

Всех с наступающим! Желаю всем всего, и пусть в новом году родится раздел (или Сайт 8)) по Оберону!

Всех поздравляю с Новым Годом!
Желаю здоровья и успехов в работе!

Ответ на »сообщение 1797« (info21)
___________________________
Ух ты! Не обманули. А я уже начал подумывать "Но давно прошел обед/А обещанного нет". :)

Всех c Новым Годом! :)))