FreePascal.ru

Конечно интересно,.. давай ссылку в студию! Думаю что такой проект будет востребован в образовательном процессе, там где перегруженная функциями и закладками IDE будет только мешать.

Вы должно быть что-то путаете,.. паскаль - это язык программирования, а не музыкальный редактор. Боюсь ошибиться, но такой функционал во freepascal не предусмотрен. Для работы со звуком следует использовать сторонние библиотеки.

Абалдеть,.. Троли на форуме по FreePascal )

XakeR писал(а):Давайте что нибудь напишем ? За деньги.

А давайте!... Можешь начинать, мы посмотрим и возможно поддержим.

Я эту статью писал сто лет назад, с тех пор много воды утекло и версий fpc сменилось...
Какой Lazarus и Indy у тебя?

Мультимедийный таймер использовать совместно с PostMessage и SendMessage не имеет смысла. Для этих целей есть системный таймер, который как раз отсылает Message. Мультимедийный таймер предназначен как раз для многопоточных задач, когда по нему выполняется некий функционал с заданной периодичностью ...

Если просто нужно замерять временные интервалы под виндой, то используйте: GetTickCount - выдает в мсек. А лучше GetSystemTimeAsFileTime - там вообще с более чем 1 мксек точностю идет замер и нет переполнения, как в GetTickCount.
В том то все и дело, что мне не нужно замерять интервалы, а нужно ...

Brainenjii писал(а):Есть ещё такая штука - http://wiki.lazarus.freepascal.org/EpikTimer

Да, я ставил этот компонент, но так толком и не разобрался, как привязать к срабатыванию какое-то действие... там нет события onTimer. В демонстрационном примере акцент сделан на точное измерение временных интервалов, а не на обработку события по таймеру.

Вызовите API GetCurrentThreadId при запуске события (на кнопке) и в процедуре TimeCallBack. Если возвращаются разные значения, то контекст потоков разный и принципиально неверно вызывать код из библиотеки LCL в обработчике таймера, причем как в Delphi, так и в Lazarus.
Значения разные. Исключил из ...

Всем доброго времени суток! Перерыл весь Интернет, но проблему так и не решил... каким образом следует реализовать мультимедийный таймер в среде Lazarus? В Delphi это делается так:


var
Form1: TForm1;
mmResult : integer;

...

procedure TimeCallBack(uTimerID, uMsg: UINT ...

Mr.Smart писал(а):Смотрите свойство Modified.

Спасибо, теперь буду знать о столь полезном свойстве!

Сегодня столкнулся с нестандартной задачкой: имеется форма, а на ней куча всяких разных компонентов (Edit'ы, Check/ComboBox'ы и т.д.).
Нужно при закрытии формы определить, внёс ли пользователь какие либо изменения (поставил флажок в CheckBox, отредактировал надпись в Edit), а если изменения были, то ...

Да, именно то, что нужно! Еще раз спасибо. Тему можно считать закрытой.

Nik писал(а):Или что вы имеете в виду под "сеточкой"? Может у вас goHorzLine / goVertLite = true?

Имелось в виду наличие/отсутствие синего (или какого-либо другого) цвета заливки выбранной строки.