|
|
| Другие темы раздела | |
|
Delphi Можете ли вы мне, объяснить каждую строчку. "Зачем?" и "для чего?". Спасибо!
https://www.cyberforum.ru/ delphi-beginners/ thread1974073.html unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) |
Вычитание элементов массива Delphi Доброго времени суток,уважаемые форумчане! Возникла заминка. В верхнюю таблицу ввожу значения для массива Xt с данными (любые 6 чисел), далее во вторую таблицу ввожу числа 1-6(номера элементов Xt) следующим образом: \begin{vmatrix}1 & 2 & 3\\ 4 & 5 & 6\end{vmatrix} Далее нажимаю на кнопку и нахожу разности элементов массива Xt, пробегая по таблице 2 таким образом: \begin{vmatrix}1\Rightarrow ... |
|
Delphi Можно ли, перевести, то что написано в Едите, на действие нажатия кнопки
https://www.cyberforum.ru/ delphi-beginners/ thread1974045.html Можно ли, перевести, то что написано в Едите, на действие нажатия кнопки. То есть, в едит пропишу = (PlaySound('D:\1.wav', 0, SND_ASYNC);) и нажму на кнопку, и начнет проигрывать звук. Edit1.Text:=PlaySound('D:\1.wav', 0, SND_ASYNC); Edit1.Text:=Form1.Events.OnCreate; |
Delphi Создаю переводчик, с голосовыми ответами Создаю переводчик, с голосовыми ответами. Как, в программе, можно добавить, звуковые ответы? https://www.cyberforum.ru/ delphi-beginners/ thread1974018.html |
|
Перехват API, SetWindowTextW Delphi var OrgCreateMutexA: function(lpMutexAttributes: PSecurityAttributes; bInitialOwner: BOOL; lpName: PAnsiChar): THandle; stdcall; function NewCreateMutexA(lpMutexAttributes: PSecurityAttributes; bInitialOwner: BOOL; lpName: PAnsiChar): THandle; stdcall; begin ShowMessage(lpName); end; HookProc('kernel32.dll', 'CreateMutexA', @NewCreateMutexA, @OrgCreateMutexA); Так перехватываю создание... |
Delphi Игра Помогите пожалуйста сделать что бы в DrawGrid при удалении блока одинакового цвета, квадраты которые находились на верху падали вниз, тем самым заполняли пустое пространство https://www.cyberforum.ru/ delphi-beginners/ thread1973986.html |
| Delphi Delphi + Яндекс карты Здравствуйте. Есть задача получить карту яндекса определенного размера. Static API не подходит в виду ограничения 650*450 у бесплатной версии. Отыскал способ получения необходимой карты путём открытия html файла следующего содержания: <!DOCTYPE html> <html> <head> <title>Yandex Map</title> <meta charset="utf-8"> <script... https://www.cyberforum.ru/ delphi-beginners/ thread1973972.html |
заполнение одинаковыми цифрами диапазон в delfi Delphi Здравствуйте всем как можно вот этому диапазону(обведенным) задать значение 1 |
| Delphi Сделать программу шифрации сообщения в азбуку Морзе и обратно Вот само задание Разработать программу шифрации сообщения в азбуку Морзе и обратно. Предусмотреть вариант настройки интерфейса, с запоминанием его при выходе из программы. Программа должна иметь интуитивный пользовательский интерфейс, иметь защиту от некорректного ввода и сопровождать действия пользователя всевозможными подсказками и сообщениями об ошибках. https://www.cyberforum.ru/ delphi-beginners/ thread1973872.html |
Delphi При сортировке не учитываются отрицательные элементы
https://www.cyberforum.ru/ delphi-beginners/ thread1973825.html Доброго времени суток! При написании кода возникло 2 проблемы: 1) При сортировке не учитываются отрицательные элементы; 2) Необходимо также организовать сортировку по возрастанию. Сам код: procedure TForm2.Button1Click(Sender: TObject); const str=12; var a:array of real; i,j:integer; buf,summ:real; s,prob:string; |
|
Delphi Реализация системы счисления Как можно реализовать систему счисления 2,8,10 и 16 системы для калькулятора. Перевод системы должен производится по нажатию на RadioButton, короче чтоб так же работала как у "Калькулятора Windows". Только исходник вот этого калькулятора, который показан ниже на скриншоте не кидайте, я там программный код разобрать не могу. |
Delphi Где объявляется MAPVK_VK_TO_VSC? (Delphi 2009/Windows 7)
https://www.cyberforum.ru/ delphi-beginners/ thread1973785.html Получаю ошибку везде где в моем коде используется MAPVK_VK_TO_VSC Undeclared identifier: 'MAPVK_VK_TO_VSC' Собственно, MapVirtualKey()в котором это значение используется,объявлено в модуле Windows и не вызывает ошибки.Так в каком же модуле объявлено MAPVK_VK_TO_VSC? Привожу листинг кода: LCNTRL.Itype := INPUT_KEYBOARD; LCNTRL.ki.wVk := VK_LCONTROL; LCNTRL.ki.dwFlags := 0; LCNTRL.ki.wScan... |
|
Почетный модератор
64304 / 47599 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
|
||||||
| 04.05.2017, 10:58 | 0 | |||||
Определить максимальный элемент массива и элемент, являющийся максимальным без учета этого элемента - Delphi - Ответ 1039993004.05.2017, 10:58. Показов 5193. Ответов 13
Метки (Все метки)
Ответ 
Сообщение от Matan!
В паскале.
Сообщение от Bakamokara
Добавлено через 1 минуту Наверное в Lazarus? Вернуться к обсуждению: Определить максимальный элемент массива и элемент, являющийся максимальным без учета этого элемента Delphi
0
|
||||||
| 04.05.2017, 10:58 | |
|
Готовые ответы и решения:
13
Определить максимальный элемент массива и элемент, являющийся максимальным без учёта этого элемента
Определить номер первого отрицательного элемента, по абсолютной величине превышающего максимальный элемент этого массива |
| 04.05.2017, 10:58 | |
Наверх