![]() |
|
Другие темы раздела | |
Delphi При копирование должно появляться окно но оно не появляется
https://www.cyberforum.ru/ delphi-beginners/ thread1357625.html Ребят нужна помощь при копирование в делфи должно появляться окно но оно не появляется что делать? Текст программы Program pr1; const k = 10; Var FlagCh, FlagKr, FlagM : Boolean; a: array of integer; g,l,m,i,j, n: integer; |
Delphi Indy10 - исправить ошибки в коде Всем привет. Подскажите пожалуйста, почему не корректен данный код?: procedure TForm1.Button1Click(Sender: TObject); var i: integer; s: string; begin IdMessage1.Body.Text:=Memo2.Text; for i := 0 to IdMessage1.MessageParts.Count - 1 do begin |
Delphi Выделить некоторые строки файла Excel и вывести на экран их сумму Есть экселевский файл(либо csv - Файл). Представляет собой таблицу из двух столбцов. В первом буквы, во втором цифры. Нужно выделить некоторые строки и вывести на экран их сумму (по второму столбцу). Как такое осуществить? есть похожие исходники? https://www.cyberforum.ru/ delphi-beginners/ thread1357588.html | Delphi По клику строки в TreeView открывать соответствующую вкладку в PageControl Как связать, нужно по клику строки в TreeView- открывать соответствующую вкладку в PageControl. На кнопке я бы привязал к индексу и сделал бы так: PageControl1.ActivePageIndex:= 0; //открыть первую вкладку Но нужно по клику в PageControl и на какое потом событие поставить код что должен отработать. Добавлено через 32 минуты И скрыть все вкладки только в цикле можно и только при запущеной... https://www.cyberforum.ru/ delphi-beginners/ thread1357578.html |
Определить сколько орехов досталось последнему ребенку Delphi Здравствуйте! Помогите с задачей, одну задачу на 3 цикла for,while и repeat. Мама принесла домой N орехов. Дети приходили из школы по одном, каждый пришедший считал себя первым,отсчитывал свою долю и уходил(если поровну не делилось,то остаток никто не брал). Определить сколько орехов досталось последнему, если у мамы K детей. Сколько орехов осталось,когда ушел последний. |
Delphi Прием/передача значения из другого приложения Здравствуйте! Есть программа, в которой необходимо передать значение из edit в переменную для другого exe, который запустится, отработает и вернет результат, который тоже надо "подхватить" и отобразить в программе. На данный момент с этим справляется батник: @echo off set /P code="Please enter code: " echo Please select and enter (1 - Decode; 2 - Encode): set /P md="(1 or 2): " if... https://www.cyberforum.ru/ delphi-beginners/ thread1357474.html |
Delphi При прижатии и отпускании кнопки мыши не вызывается изменение шрифтов
https://www.cyberforum.ru/ delphi-beginners/ thread1357439.html Согласно задания нужно разработать приложение, после запуска которого происходит следующее: I. Вначале появляется заставка с картинкой. Эта картинка, исчезает после ввода пароля в соответствующее поле формы. II. После исчезновения заставки форма содержит редактор файлов. III. Во время работы приложения прижатие и отпускание кнопки мыши на свободном месте формы вызывает изменение... |
Delphi Найти производную (градиент) функции 2-х переменных, которая вводится в Edit Всем привет! Есть такая задача: Необходимо найти производную (градиент) функции 2-х переменных, которая вводится в Edit, в моём случае. Что такое градиент: Grad(x)=(\frac{Grad(x)}{dx1}, \frac{Grad(x)}{x2}) Пример функции: F(x1, x2) := x1^2 + x2^2 - x1*x2 + 2*x2,F(x1, x2) := x1^2 + x2^2 + 3*x1*x2, F(x1, x2) := x1 + x2^2 - 3*x2 |
Delphi Не работают кнопки Здравствуйте ! Подскажите, пожалуйста, почему у меня кнопки не работают в делфи? Что нужно исправить? Вот сам код: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,Unit2; https://www.cyberforum.ru/ delphi-beginners/ thread1357210.html |
Delphi Ошибка с потоком (закрытие потока)
https://www.cyberforum.ru/ delphi-beginners/ thread1357169.html Здравствуйте, вообщем суть проблемы в чём, включаю программу, она работает, всё хорошо, после закрытие формы, выдаёт ошибку (ошибка на скринах), что делать ? вылазит буквально после пары секунд после закрытие основной формы. Реализация потока в моей программе: procedure TForm1.Button3Click(Sender: TObject); begin MyThread:=TMyThread.Create(true); MyThread.FreeOnTerminate:=true;... |
Как сделать проверку принадлежности координат i,j к массивам stroka и stolb? Delphi Вопрос такой: есть таблица значений, есть два массива stroka, stolb, которые содержат в себе номера "вычеркнутых" строк и стобцов. Необходимо перебрать все элементы и если координаты элемента совпадают с числами, записанными в stroka, stolb, то этот элемент обнуляется. Другими словами как сделать проверку принадлежности координат i,j к массивам stroka и stolb? Добавлено через 1 час 40 минут... |
Delphi Определить наименьшее число полных минут до совпадения стрелок на циферблате
https://www.cyberforum.ru/ delphi-beginners/ thread1357103.html Даны целые числа n и m, указывающие момент времени"k часов m минут" определить наименьшее число полных минут, которые должны пройти до того момента,когда часовая и минутная стрелки совпадут на циферблате. |
0 / 0 / 0
Регистрация: 19.01.2013
Сообщений: 34
|
|||||||||||
0 | |||||||||||
Создание имитационной модели бензоколонки - Delphi - Ответ 712615120.01.2015, 01:37. Показов 1488. Ответов 0
Метки (Все метки)
Общий вид стартовой формы показан на рис. 1. Видно, что она включает ряд объектов управления, среди которых имеются три командные кнопки «Расчет», «Очистка» и «Выход».
После нажатия кнопки «Расчет» производится вычисление показателя эффективности при заданных исходных данных. При нажатии кнопки «Очистка» производится очищение текстового поля для вывода результата моделирования. Затем может быть произведено изменение исходных данных и проведение новых расчетов с использованием кнопки «Расчет». При нажатии кнопки «Выход» работа программы прекращается. Модель СМО с 1, 2, 3 С кнопкой «Расчет» связана процедура, которая выполняет следующие действия Оператор 1 осуществляет перевод исходных данных из символьной формы в числовую. Оператор 2 обнуляет глобальную переменную SNo6c — суммарное число обслуженных заявок. Оператор 3 начинает циклический перебор случайных реализаций. Оператор 4 в начале каждой случайной реализации обнуляет локальные переменные, к которым относятся: число заявок, поступающих в одной реализации Nz, число обслуженных заявок в каждом из имеющихся каналов Nобс.j (j= 1,Nk), начальные значения времени освобождения каналов Токj (J = 1,Nk). Оператор 5 обращается к автономной процедуре формирования потока заявок. В результате работы этой процедуры формируется массив значений времен: [Tз(1), Tз(2), Tз(3)… Tз(N3i)] где N3i — общее число поступивших заявок для i-й случайной реализации; Оператор 6 является началом цикла обслуживания заявок. Оператор 7 производит выбор номера канала, который характеризуется наименьшим значением времени освобождения от обслуживания заявки. Оператор 8 обращается к автономной процедуре обслуживания очередной заявки. На выходе этой процедуры определяется число обслуженных заявок в выбранном канале No6c(Jmin). Оператор 9 служит для расчета суммарного числа обслуженных заявок во всех каналах и всех случайных реализациях. После окончания цикла случайных реализаций оператор 10 выводит на экран значение выходной переменной — средней относительной прибыли по формуле Сотн.ср = Nобс -1 + 0,5Nк + 0,5Nк^2 Прошу помочь разобраться с данной программкой, за ранее большое спасибо всем откликнувшимся!! С делфи столкнулась в первый раз, поэтому наверное много ошибок вот, что у меня получилось:
Вернуться к обсуждению: Создание имитационной модели бензоколонки Delphi
0
|
20.01.2015, 01:37 | |
Готовые ответы и решения:
0
Создание простой модели атома Создание управляемой анимационной модели Создание модели игры в поддавки |
20.01.2015, 01:37 | |
Помогаю со студенческими работами здесь
0
Создание модели остывания металлической пластины Модификация имитационной модели технологического процесса Составить блок-схему имитационной модели
Построение имитационной модели системы массового обслуживания |
Новые блоги и статьи
![]() |
||||
Ошибка "Cleartext HTTP traffic not permitted" в Android
hw_wired 13.02.2025
При разработке Android-приложений можно столнуться с неприятной ошибкой "Cleartext HTTP traffic not permitted", которая может серьезно затруднить отладку и тестирование. Эта проблема особенно. . .
|
Изменение версии по умолчанию в NVM
hw_wired 13.02.2025
Node Version Manager, или коротко NVM - незаменимый инструмент для разработчиков, использующих Node. js. Многие сталкивались с ситуацией, когда разные проекты требуют различных версий Node. js,. . .
|
Переименование коммита в Git (локального и удаленного)
hw_wired 13.02.2025
Git как система контроля версий предоставляет разработчикам множество средств для управления этой историей, и одним из таких важных средств является возможность изменения сообщений коммитов. Но зачем. . .
|
Отличия Promise и Observable в Angular
hw_wired 13.02.2025
В веб-разработки асинхронные операции стали неотъемлимой частью почти каждого приложения. Ведь согласитесь, было бы странно, если бы при каждом запросе к серверу или при обработке больших объемов. . .
|
Сравнение NPM, Gulp, Webpack, Bower, Grunt и Browserify
hw_wired 13.02.2025
В современной веб-разработке существует множество средств сборки и управления зависимостями проектов, каждое из которых решает определенные задачи и имеет свои особенности. Когда я начинаю новый. . .
|
Отличия AddTransient, AddScoped и AddSingleton в ASP.Net Core DI
hw_wired 13.02.2025
В современной разработке веб-приложений на платформе ASP. NET Core правильное управление зависимостями играет ключевую роль в создании надежного и производительного кода. Фреймворк предоставляет три. . .
|
Отличия между venv, pyenv, pyvenv, virtualenv, pipenv, conda, virtualenvwrapper, poetry и другими в Python
hw_wired 13.02.2025
В Python существует множество средств для управления зависимостями и виртуальными окружениями, что порой вызывает замешательство даже у опытных разработчиков. Каждый инструмент создавался для решения. . .
|
Навигация с помощью React Router
hw_wired 13.02.2025
React Router - это наиболее распространенное средство для создания навигации в React-приложениях, без которого сложно представить современную веб-разработку. Когда мы разрабатываем сложное. . .
|
Ошибка "error:0308010C:digital envelope routines::unsupported"
hw_wired 13.02.2025
Если вы сталкиваетесь с ошибкой "error:0308010C:digital envelope routines::unsupported" при разработке Node. js приложений, то наверняка уже успели поломать голову над её решением. Эта коварная ошибка. . .
|
Подключение к контейнеру Docker и работа с его содержимым
hw_wired 13.02.2025
В мире современной разработки контейнеры Docker изменили подход к созданию, развертыванию и масштабированию приложений. Эта технология позволяет упаковать приложение со всеми его зависимостями в. . .
|