|
|
Другие темы раздела | |
Delphi ListView, иконка слева от текста Прошу подсказать. Делаю почтовик, нужно вложить прилепляемый файл. Вкладываю его в ListView. Как сделать так, чтобы иконка была слева от текста, а то она идет по центру. При условии, что ViewStyle := vsIcon; WrapText := False; https://www.cyberforum.ru/ delphi-beginners/ thread2208044.html |
Переход по строкам ListView при нажатии стрелок вверх и низ Delphi Прошу подсказать, что нужно сделать, чтобы сработало событие OnClick в ListView при нажатии стрелок вверх и низ. Вот мой код: procedure TForm_Pochta.ListView1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = 38 then ListView1.Click; //нажатие кнопки по клавише "Стрелка вверх" end; procedure TForm_Pochta.ListView1KeyUp(Sender: TObject; var Key: Word; |
Delphi Не могу перенести Type в другой Unit
https://www.cyberforum.ru/ delphi-beginners/ thread2207965.html Хочу перенести код из одного Unit в другой, но при переносе ругается на первый Array в OpenArray = Array of Char и на границу в Symbols: Array of Integer. Как правильно перенести данные? interface uses SysUtils, Windows, Math, Classes; |
Delphi Найти произведение элементов массива, которые расположены между одинаковыми элементами
https://www.cyberforum.ru/ delphi-beginners/ thread2207951.html Помогите пожалуйста. Даны натуральное число N и одномерный массив A1, A2, …, AN целых чисел. Найти произведение тех элементов массива, которые расположены между одинаковыми элементами. У меня всё работает, но вот нужна задание выполнить , очень сложное Задание которое нужно выполнить((((( Методы белого ящика 1. Метод покрытия операторов Критерием этого метода является выполнение... |
Объясните листинг программы по игре морской бой Delphi (Перенесено из Turbo Pascal) Объясните листинг программы по игре морской бой. Программа во вложении. Делфи |
Delphi Не могу разобраться с текстовыми файлами
https://www.cyberforum.ru/ delphi-beginners/ thread2207937.html Доброго времени суток уважаемые гуру Delphi! Я пока еще только немного учусь и хотел бы у вас попросить помощи вот в чем. Есть некий код: procedure TForm1.Button1Click(Sender: TObject); begin openDialog1.InitialDir := GetCurrentDir; if OpenDialog1.Execute then Memo1.Lines.LoadFromFile(OpenDialog1.FileName); end; |
Delphi Сортировка
https://www.cyberforum.ru/ delphi-beginners/ thread2207887.html Добрый вечер! учусь сортировать по алфавиту,в одном из примеров,нашел такую сортировку: MyList:=TStringList.Create; MyList.Clear; for i:=1 to Dictionary.Strings.Count do MyList.Append((Dictionary.Keys)+'='+(Dictionary.Values)])); // формируем список в виде ключ=значение MyList.Sorted:=True; // сортируем его Dictionary.Strings.Clear; //... |
Delphi Вывод в Ворд содержимого формы Подскажите. Накидал несколько Edit, Stringrid, Panel на форму. Теперь и нужно вывести в ворд для распечатки. Подскажите как это сделать. |
Delphi Вычисление перестановок в строках матрицы. Ошибка в функции
https://www.cyberforum.ru/ delphi-beginners/ thread2207601.html function Perestan(a: mtr; n, i: integer): boolean; // Нахождение перестановок var j: integer; o: set of byte; // объявление множества begin o:=; // множество содержит числа от 1 до n for j:=1 to n do // проход по столбцам If a in o then // если число есть во множестве, o:=o-]; // оно исключается из множества Perestan:=o=; // присвоение функции значения пустого... |
Delphi Запрет "наезда", "наложения" image на image
https://www.cyberforum.ru/ delphi-beginners/ thread2207331.html Реализованная часть программы: 1. Нажимаю на кнопку - создаётся изображение под указателем мыши и над которым есть мини-кнопка. 2. Зажимаю изображение - двигаю его и мини-кнопку, которая над изображением. 3. Нажимаю на мини-кнопку, которая над передвигаемым изображением - кнопка пропадает, а изображение более нельзя двигать. 4. Повторяю пункт 1, 2 и 3, после чего понимаю, что можно... |
Методом итераций вычислить с точностью eps корень уравнения Delphi Помогите решить задание чайнику , пожалуйста Методом итераций вычислить с точностью eps корень уравнения. Начальное приближение к корню равно 0. Пример x-(sin(x)/2)-1=0 Код: procedure TForm1.Button1Click(Sender: TObject); var y,z,eps:real; function f(x:real): real; begin |
Delphi Разработать программу для автоматизации работы администратора гостиницы
https://www.cyberforum.ru/ delphi-beginners/ thread2207267.html Разработать программу для автоматизации работы администратора гостиницы. Программа должна выполнять следующие функции: 1. Вывод сведений о номерах. Исходные данные: номер. Выводимые данные: стоимость в сутки, характеристика номера, когда занят, до какого числа занят, кем занят 2. Регистрация клиентов. Исходные данные: фамилия имя отчество, № паспорта, дата, до какого числа, занятый номер,... |
Почетный модератор
64300 / 47595 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
|
||||||
10.03.2018, 15:52 | 0 | |||||
Арифметический тренажер - Delphi - Ответ 1219908010.03.2018, 15:52. Показов 877. Ответов 11
Метки (Все метки)
Ответ
Вернуться к обсуждению: Арифметический тренажер Delphi
1
|
10.03.2018, 15:52 | |
Готовые ответы и решения:
11
Арифметический тренажер Арифметический знак Арифметический расчет прямо из поля EDIT - как? Тренажер на делфи |
10.03.2018, 15:52 | |
10.03.2018, 15:52 | |
Помогаю со студенческими работами здесь
0
Тренажер очередь Программа-тренажер Клавиатурный тренажер Тренажёр для чтения |