|
|
Другие темы раздела | |
Delphi Делфи стринг
https://www.cyberforum.ru/ delphi-beginners/ thread1946499.html Здравствуйте,подскажите пожалуйста как подсчитать в стринггриде сумма значений в строке и их среднее значение , и вывести это в другой стринггрид |
Delphi Форма поверх всех окон Windows Доброго времени суток! Пытаюсь сделать так, чтобы форма delphi выводилась поверх остальных окон: with form1 do SetWindowPos(Handle,HWND_TOPMOST,700,400,400,210,SWP_SHOWWINDOW); выводится как надо, но на форме не отображаются button и edit, только label, хотя все элементы visible.Если просто выводить форму в модальном режиме, всё видно. Пробовал установить свойство formstyle в fsStayOnTop,... |
Delphi Записать четные положительные элементы целочисленных массивов Х и Y в массив Z Ребят помогите написать программу на Делфи . Записать четные положительные элементы целочисленных массивов Х = (х1 , х2 , .... х15) и Y = (y1 , y2 , .... , y15) в массив Z . Массив Z вывести в окно сообщений . Значения элементов массива Х и Y вводяться с использованием компонента Edit . https://www.cyberforum.ru/ delphi-beginners/ thread1946450.html | Delphi Переставить элементы так чтобы они были расположены по возрастанию Ребят помогите написать программу на Делфи . Дан массив В , состоящий из n элементов . Элементы массива ввести с использованием компонента Edit .Переставить элементы так чтобы они были расположены по возрастанию .Вывести новый массив в окно сообщений . https://www.cyberforum.ru/ delphi-beginners/ thread1946448.html |
Переставить в обратном порядке элементы массива расположенные между минимальным и максимальным элементами Delphi Ребят помогите написать программу на Делфи . Дан массив В , состоящий из n элементов . Элементы массива ввести с использованием компонента Edit . Переставить в обратном порядке элементы массива расположенные между минимальным и максимальным элементами . Вывести новый массив в окно сообщений . |
Delphi Вставить число 300 перед всеми четными элементами массива Ребят помогите написать программу на Делфи . Дан массив В , состоящий из n элементов . Элементы массива ввести с использованием компонента Edit . Вставить число 300 перед всеми четными элементами массива . Вывести новый массив в окно сообщений . https://www.cyberforum.ru/ delphi-beginners/ thread1946446.html |
Delphi Вставить число 555 после максимального элемента массива
https://www.cyberforum.ru/ delphi-beginners/ thread1946445.html Ребят помогите написать программу на Делфи . Дан массив В , состоящий из n элементов . Элементы массива ввести с использованием компонента Edit . Вставить число 555 после максимального элемента массива . Вывести новый массив в окно сообщений . |
Delphi Удалить из массива все элементы больше данного числа А Ребят помогите написать программу на Делфи . Дан массив В , состоящий из n элементов . Элементы массива ввести с использованием компонента Edit . Удалить из массива все элементы больше данного числа А . Вывести новый массив в окно сообщений . Число А ввести с клавиатуры . |
Delphi Удалить из массива последний отрицательный элемент
https://www.cyberforum.ru/ delphi-beginners/ thread1946443.html Ребят помогите написать программу на Делфи . Дан массив В , состоящий из n элементов . Элементы массива ввести с использованием компонента Edit . Удалить из массива последний отрицательный элемент . Вывести новый массив в окно сообщений. |
Delphi Найти номер первого отрицательного элемента в массиве Ребят помогите написать программу на Делфи . Дан массив В , состоящий из n элементов . Элементы массива ввести с использованием компонента Edit . Найти номер первого отрицательного элемента . https://www.cyberforum.ru/ delphi-beginners/ thread1946442.html |
Delphi Работа с константами Имеются константы разные: const Cas = 'кек'; const hi = 'привет'; const Sel = 'хаю хай'; Потом эти константы будут искаться в соответстующем текстовом файле ,происходить определенное действие и соответственно удаляться... If Pos(Cas, k) > 0 then begin Delete(k,Pos(Cas,k), Length(Cas)); |
Delphi Папка ру символами Всем снова привет. Есть opedialog, который указывает путь к файлу. Путь записывается в ediy1.text. Не подскажите, как можно сделать, если конечная папка назвная русскими символами, то выдавало ошибку? пример: D:/prog/папочка/fio.txt - тут ошибка. так как конечная папка написана русскими символами, а именно "папочка". https://www.cyberforum.ru/ delphi-beginners/ thread1946350.html |
пофигист широкого профиля
4733 / 3167 / 859
Регистрация: 15.07.2013
Сообщений: 18,252
|
|
27.03.2017, 00:57 | 0 |
Програмное назначение обработчиков событий - Delphi - Ответ 1026118727.03.2017, 00:57. Показов 5090. Ответов 49
Метки (Все метки)
Ответ
И вот как раз количество параметров и не совпадает! В вашей регулярной процедуре
два параметра, а в методе класса
TCustomForm.OnClose параметров три! Помимо Sender и Action есть ещё неявный параметр Self. Неявный он только потому, что не прописан в списке параметров явно, но также как и прочие два параметра передается через стек. А в результате в стеке возникает нестыковка. В грамотном коде действительно не нужно Не только в Д7, но и в Д2. (Про Д1 не уверен на все 100, но вроде и там не было нужно). Но SeemaN_tm их использует для того чтобы компилятор Дельфи не увидел ошибку. Вернуться к обсуждению: Програмное назначение обработчиков событий Delphi
0
|
27.03.2017, 00:57 | |
Готовые ответы и решения:
49
Создание обработчиков событий Написание своих обработчиков событий Назначение событий на динамически создаваемое меню mainitem Програмное назначение принтера для печати |
27.03.2017, 00:57 | |
27.03.2017, 00:57 | |
Помогаю со студенческими работами здесь
0
Несколько обработчиков событий Создание обработчиков событий Несколько обработчиков событий Удаление обработчиков событий |