164 / 50 / 36
Регистрация: 13.04.2012
Сообщений: 595
|
|||||||||||
1 | |||||||||||
Объединить 2 процедуры в одну23.07.2020, 19:25. Показов 1199. Ответов 20
Ребят, есть 2 процедуры:
1я - не даёт закрыть, свернуть, развернуть форму; 2я - добавляет 2 дополнительных меню в правой кнопки мыши; Если объявить обе эти процедуры:
Если объявить только (var Msg:TMessage) - то в строке 63: case Message.wParam of ему неизвестна команда Message.wParam Попытался объединить их в одну, но делфи опять ругается 14: E2138 Invalid message parameter list Подскажите как их объединить?
0
|
23.07.2020, 19:25 | |
Ответы с готовыми решениями:
20
Можно ли объединить процедуры для идентичных элементов формы в одну подпрограмму? Объединить 2 программы в одну Объединить две программы в одну. Объединить две операции в одну и задать повтор |
Модератор
3628 / 2149 / 759
Регистрация: 15.11.2015
Сообщений: 8,623
|
|
25.07.2020, 16:52 | 21 |
Действительно, этот exe не добавляет пункты меню. Перекомпилировал программу, не меняя код и пункты меню стали добавляться. Но окно стало появляться в левом верхнем углу, то есть, присвоение Left и Top не срабатывает из-за своей же блокировки.
0
|
25.07.2020, 16:52 | |
25.07.2020, 16:52 | |
Помогаю со студенческими работами здесь
21
Объединить три сортировки (выбором, Шелла, пирамидальная) в одну программу Ввести 3 строки, объединить их в одну, сосчитать, сколько букв ‘A’ содержит объединенная строка Две процедуры на одну кнопку Объединить две процедуры Как объединить два-три проекта в одну группу проектов в lazarus? Как объединить две процедуры в одну Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |