Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Комментарии https://www.cyberforum.ru/ delphi-beginners/ thread600835.html
Приветствую. Нужны более подробные комментарии к коду программы, или если есть возможность - упростить код. Задачи из курсача, все работает, но не все понятно.. Буду премного благодарен! 1) Найти наименьшее значение функции y=(sin(x))/(1+x) и значение аргумента, при котором оно получено, если x изменяется от 0 до 10 с шагом 0.1.Для найденного x подсчитать сумму членов ряда:...
Delphi progress bar
Вообщем суть в этом у меня есть 3 формы в первой форме заполняются эдит1 потом открывается идет отправка этого сообщения на мэйл и открывается форм2 в форм2 прогресс бар и по окончании загрузке открывается третья форма где пишется что все норм вот код 1)тут отправка письма и Form2.showmodal; 2)procedure TForm2.Timer1Timer(Sender: TObject); begin i:=i+1; ...
Delphi Изменение алгоритма Морского боя https://www.cyberforum.ru/ delphi-beginners/ thread600789.html
Прошу Всех помочь с игрой морской бой, которая отличается от традиционных. Дан проект dll библиотеки моего корабля, исходники кораблей противников нет, исходник самой игры тоже нет. Вот задание, надо выполнить один из них. Изучить код проекта в директории Ship4. 1. Усовершенствовать алгоритм принятия решений, реализованный классе TShip, для обеспечения уверенной победы (3 победы...
Delphi ShowMessage или MessageDlg по таймеру https://www.cyberforum.ru/ delphi-beginners/ thread600781.html
Добрый вечер! Пытаюсь сделать программу которая выводит окна ShowMessage и MessageDlg по таймеру. Идея такова, что при нажатии кнопки, появляется окно сообщения, а затем с заданным интервалом появляются окна сообщений автоматически, не требующие нажатия кнопки Ок или ещё какой-то кнопки. А когда например появилось 5 окон сообщений, то всё идёт в обратном порядке, т.е. начия с последнего...
Delphi Эмуляция нажатие клавиш в Windows 8
Доброго времени суток! Очень нуждаюсь в вашей помощи... Есть данный код: hwndb := FindWindow(nil, PChar('Название окна')); if hwndb <> 0 then begin Sleep(1000); label1.Caption:=label1.Caption+'go'; keybd_event(69, 0, 0, 0);
Delphi Приложение без формы Как убрать стандартное окно windows с программы? что бы без окошки был вообще https://www.cyberforum.ru/ delphi-beginners/ thread600726.html
Delphi Работа с прокси https://www.cyberforum.ru/ delphi-beginners/ thread600723.html
Привет всем! Есть ли у кого то пример работы браузера с прокси? Суть в том что мне нужна программа переходящая на определённый сайт через прокси, не для всякого там бредового заработка, а в личных целях, дабы накрутить популярность своей страницы на 1 сайте.. По сути программа уже готова (Кол-во потоков и т.д) всё это есть, осталось только подключить прокси.. Но как это сделать я увы не знаю=(...
Подпрограммы в Delphi Delphi
Всем привет! Я недавно начал изучать подпрограммы в Delphi, так вот при компилировании у меня были такие ошибки: когда я создавал свою процедуру, и начал компилировать, Delphi мне выдавал что, потипа "Edit1 - необъявленный тип" и т.д, так вот значит: procedure cup; begin for i:=1 to 3 do lin:=strtoint(sg1.cells); for i:=1 to 3 do lin:=strtoint(sg1.cells); for i:=1 to 3 do...
Delphi От заданного слова оставить только первые 3 символа https://www.cyberforum.ru/ delphi-beginners/ thread600661.html
От заданного слова оставить только первые 3 символа.
Delphi Поиск в файле через поле Edit Привет всем. Есть программа которая записывает введенные данные в поле Edit в файл. Вот сам код: procedure TForm1.Button2Click(Sender: TObject); var f: TextFile; begin if (Edit1.Text = ' ') or (Edit1.Text = '') then ShowMessage ('Вы же ничего не ввели! Введите данные') else https://www.cyberforum.ru/ delphi-beginners/ thread600660.html
сложность с B- деревом Delphi
Не хочет добавлять элемент в B-дерево. unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
Delphi Передать значение Label.Caption в отчет FastReport Доброго времени суток.. Подскажите, пожалуйста, как из Label.Caption на форме в Делфи 7 передать значение в Memo в отчет FastReport ? Базу не использую. Спасибо.. https://www.cyberforum.ru/ delphi-beginners/ thread600606.html
Мишка Косолапый :)
284 / 254 / 86
Регистрация: 15.02.2012
Сообщений: 1,511
08.06.2012, 18:49 0

Нахождение наименьшего числа в stringgrid и вывод в edit - Delphi - Ответ 3142438

08.06.2012, 18:49. Показов 2726. Ответов 14
Метки (Все метки)

Ответ

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm1.Button1Click(Sender: TObject);
var
a:array[1..4] of integer;
i,min:integer;
begin
for i:=1 to 2 do
a[i]:=strtoint(inputbox('ââåäèòå çíà÷åíèÿ','ââîîä',''));
min:=a[1];
for I:=1 to 2 do
if a[I]<min then min:=a[I];
showmessage('наименьший элемент=' + inttostr(min));
end;
Тут все правильно было, да вот забыл + поставить нт=' + intt

Вернуться к обсуждению:
Нахождение наименьшего числа в stringgrid и вывод в edit Delphi
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.06.2012, 18:49
Готовые ответы и решения:

Нахождение наибольшего и наименьшего числа в stringgrid
Доброго времени суток! В общем имеется Srtinggrid величина которого меняется, по нажатию кнопки....

Нахождение наименьшего числа
Задача программы в определении наименьшего числа из 4-х, но нужно сделать это так чтобы второй...

Нахождение наименьшего числа
Помогите перевести эту программу находящую максимальное число n-го размера из данного числа, так...

Нахождение наименьшего числа (С++)
Здравствуйте. Всех с наступающим праздником. Нужно, чтобы программа спрашивала, сколько чисел...

14
08.06.2012, 18:49
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.06.2012, 18:49
Помогаю со студенческими работами здесь

Нахождение наименьшего натурального числа
Составьте программу для нахождения наименьшего натурального числа, куб которого начинается с цифр...

Нахождение наименьшего числа в массиве
Почему тут находит мин число int n; int a; cin &gt;&gt; n; for (int i = 0; i &lt; n; i++) cin...

нахождение наименьшего натурального числа n
никак не могу сообразить как решить задачу: найти наименьшее натуральное число n, представимое...

Нахождение номера наименьшего числа
Необходимо найти номер наименьшего числа. Написал такой батник, но ничего не выводит. Не могу найти...

Нахождение в масивах наибольшего,наименьшего числа.
Доброго времени суток.Скажите пожалуйста,как найти наибольший элемент в двумерном масиве,и как...

Нахождение наименьшего делителя натурального числа
Составьте программу нахождения наименьшего делителя М(М&gt;1) натурального числа N, взаимно простого с...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru