|
|
| Другие темы раздела | |
| Delphi Как закрыть окно MessageBox программно в скрытой форме без закрытия программы Я скачал исходники многопользовательского чата и решил их переделать под другие цели. Отправка сообщений MessageBox всем пользователям(запуск поверх всех окон). Я переделал их, но теперь появилась следующая проблема мне нужно закрыть окно MessageBox отправкой сообщения клиенту "Закрыть окно". procedure TForm1.FormCreate(Sender: TObject); begin Application.ShowMainForm:=false; end; ... https://www.cyberforum.ru/ delphi-beginners/ thread2270782.html |
Delphi На какой версии Delphi вы программируете? Говорят, пришло время уходить с Delphi 7 на что-то более новое. На какой версии Delphi вы программируете? И заодно, параллельно несколько вопросов: На новых версиях будут работать проекты от Delphi 7? А сторонние компоненты не будут? А строки взаимодействия с Excel, mdb? Самая новая Delphi - это Delphi 10.2? На ней тоже можно делать программы под Windows 32 ? На некоторые вопросы ответы... |
|
Delphi Переставить строки матрицы так, чтобы элементы первого столбца были упорядочены по невозрастанию
https://www.cyberforum.ru/ delphi-beginners/ thread2270761.html Заданная матрица,Х(n,n),n<=20. Разработать программу, которая переставляет строки матрицы так, чтобы элементы первого столбца были упорядочены по невозрастания. |
Delphi Составить программу нахождения суммы всех натуральных чисел кратных 3 от 10 до 50 включительно
https://www.cyberforum.ru/ delphi-beginners/ thread2270733.html Составить программу нахождения суммы всех натуральных чисел кратных 3 от 10 до 50 включительно |
|
Составить программу нахождения наибольшего элемента и суммы заданной числовой последовательности Delphi Составить программу нахождения наибольшего элементов и суммы заданной числовой последовательности 23,6,12,89,22,34,56 |
Delphi Перевести код из Паскаля в Делфи Помогите, пожалуйста 1.На обработку поступает последовательность из четырёх целых чисел. Нужно написать программу, которая выводит на экран количество неотрицательных чисел последовательности и их произведение. Если неотрицательных чисел нет, требуется вывести на экран «NO». Известно, что вводимые числа по абсолютной величине не превышают 10. var p,i,x,count: integer; begin count := 0;... https://www.cyberforum.ru/ delphi-beginners/ thread2270674.html |
|
Delphi Как правильно скрывать пункты главного меню
https://www.cyberforum.ru/ delphi-beginners/ thread2270671.html После авторизации необходимо чтобы пункт "Настройка" в главном меню был доступен пользователю который авторизовался как Admin. Я реализовал это так: procedure TForm3.N3Click(Sender: TObject); begin DataModule2.ADOQuery1.SQL.Clear; DataModule2.ADOQuery1.SQL.Add('SELECT Password FROM Users WHERE login='+#39+'Admin'+#39); DataModule2.ADOQuery1.Open; if DataModule2.ADOQuery1.FieldByName... |
Delphi Файл: Студенты: Фамилия, курс, адрес, стипендия... Не логичное задание дали Условие Студентов: Фамилия, курс, адрес, стипендия На рисунке пример формы. Help! пик |
| Delphi Массивы и процедуры Приветствую! Есть такой код процедуры: procedure turn (a: array of real;b: array of real;c:array of real;d:array of real;cor:real;r:real;cen:array of real); var noll:real; begin noll:=arcsin(a/r)+cor; a:=cos(noll)*r+cen; a:=sin(noll)*r+cen; b:=cos(noll+PI/2)*r+cen; b:=sin(noll+PI/2)*r+cen; https://www.cyberforum.ru/ delphi-beginners/ thread2270506.html | Delphi Файл: Почему-то игнорируются на вывод 2 строки из файла, не зависимо от их расположения. Как исправить? Приветствую, есть цикл, который почемуто игнорирует на вывод 2 строки из файла(вообще случайных), не зависимо от их расположения. Есть идеи как исправить? Код прилагается, цирк с 29 строки procedure TForm1.Button1Click(Sender: TObject); var readfile:TextFile; Loine:Liine;delta:real; way:string; rowcount,i,a:integer; c:shortstring; d:TStringList; begin d:=TStringList.Create; https://www.cyberforum.ru/ delphi-beginners/ thread2270448.html |
|
Delphi И Excel Доброго дня всем. Трудность возникла с выводом данных. Есть необходимость выводить один и тот же заголовок для таблицы через определенный диапазон. Когда колонок было меньше и проблем не было: cel:=4; i:=ord('A');//первая колонка v:=ord('V');//последняя колонка while i<v do begin DMF.xSheet.Range.Formula:='Нужные данные'; i:=i+4; end; |
Delphi Неисправный цикл Помогите! Не могу разобраться с циклом (строка 28): procedure TForm1.Button1Click(Sender: TObject); var readfile:TextFile; Loine:Liine;delta:real; way:string; rowcount,i,a:integer; c:shortstring; d:TStringList; begin d:=TStringList.Create; d.Delimiter:=' '; Loine.Name:=''; https://www.cyberforum.ru/ delphi-beginners/ thread2270386.html |
|
Модератор
|
|
| 30.06.2018, 16:00 | 0 |
Класс: Нужно написать класс,который будет вычислять заданную функцию... - Delphi - Ответ 1251287230.06.2018, 16:00. Показов 1143. Ответов 12
Метки (Все метки)
Ответ 
Сообщение от Puporev
Да и при отрицательном х и нечетном n значение y переходит в область мнимых чисел... Вернуться к обсуждению: Класс: Нужно написать класс,который будет вычислять заданную функцию... Delphi
0
|
|
| 30.06.2018, 16:00 | |
|
Готовые ответы и решения:
12
Работа с функциями. Написать программу, которая будет с отрицательными(положительными) значениями вычислять функцию по следующей формуле Нужно написать КЛАСС.программа окрывает и закрывает дисковод.а так же определяет его наличие Написать программу в которой нужно составить класс "Студент" Нужно сделать класс который будет разбирать пакет с данными формата Json |
| 30.06.2018, 16:00 | |
| 30.06.2018, 16:00 | |
|
Помогаю со студенческими работами здесь
0
Нужно создать класс или метод в который будет служить для загрузки и инициализации переменных Класс, полиморфизм (Написать класс, который хранит в себе некий номер ''nip'', проверит его на правильность и вывести результат) Написать скрипт который по введенной дате будет вычислять количество дней по сегодняшнее число Написать функцию, которая будет вычислять интеграл методом Симпсона вручную Определить класс Rectangle и класс Point. Объявить массив из n объектов класса Point. Написать функцию, определяющ |
