Delphi для начинающих

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Delphi Исходник программы "Обучающий комплекс по математике" Нужен исходник... https://www.cyberforum.ru/ delphi-beginners/ thread1707550.html	Разбор Html в Memo Delphi Приветик всем !!! Делаю курсовую работу и вопрос стал клином. Код HTML в MemoTestHTTP ,а затем спарсеный в MemoOutput. Помогите пожалуйста!! Как сделать чтобы код в MemoOutput выглядел красиво без лишних тэгов и пробелов как на скрине. Буду признателен за помощь!!!) 2015-11-25 <span id="GridInfo_ctl02_Label1">Отправка отправления</span> ...
Delphi TPS в Delphi или SQL кто-нибудь может помочь как-нибудь ввести TSP-файл (clarion) в SQL или в delphi https://www.cyberforum.ru/ delphi-beginners/ thread1707540.html	Delphi Данные Сохраняются в StringGrid некорректно https://www.cyberforum.ru/ delphi-beginners/ thread1707537.html Данные сохраняются в стринггрид и после выхода при следующей регистраций данные перезаписываются на прошлую сохранённую регистрацию и выводит только последнюю запись, а нужно чтобы выводило всех зарегистрировавшихся пользователей.
Delphi DBChart: изменить программно свойство "Dark Bar 3D Sides" В настройках компонента TDBChart есть такая опция: "Dark Bar 3D Sides" Вопрос к знатокам: Как включить (или отключить) её программно?	Delphi Пользователь вводит в многострочный редактор целые числа https://www.cyberforum.ru/ delphi-beginners/ thread1707495.html Разработать приложение для решения следующей задачи: Пользователь вводит в многострочный редактор целые числа (не более 5). Программа определяет, есть ли среди этих чисел кратные K, где K вводится в поле редактирования. Организовать проверку вводимых данных.
Delphi Программа вычисляет количество каждой оценки Пользователь вводит в многострочный редактор свои оценки (построчно) произвольное количество. Программа вычисляет количество каждой оценки и выводит результат в многострочный редактор: количество оценок "5"-7 "4"-10 "3"-1 "2"-нет организовать ввод соответствующего сообщения,если пользователь не вел не одной оценки https://www.cyberforum.ru/ delphi-beginners/ thread1707494.html	Delphi Динамические компоненты, удаление при закрытии формы У меня при нажатии на кнопку открывается вторая форма, на ней создаётся панель, на панеле создаются кнопка и label, надо, что б при закрытии формы ВСЕ созданные компоненты удалились
Delphi разработать приложение,которое позволяет при выделений из списка формы нескольких чисел https://www.cyberforum.ru/ delphi-beginners/ thread1707451.html разработать приложение,которое позволяет при выделений из списка формы нескольких чисел производить суммирование,находить произведение или среднее значение в зависимости от выбранного действия. результат должен вычисляться при щелчке по переключателю и выводиться в поле редактирования.прекдесмотреть проверку того что в списке есть не менее двух выделеных чисел.	Delphi Поворот кнопки Недавно делал программу, где было нужно, чтобы кнопка при поворачивании поворачивалась на 180 градусов. Я сделал это, меняя местами значения длины и широты кнопки. Но проблема в том, что кнопка поворачивает относительно своей левой части, а мне нужно чтобы она поворачивалась относительно своего центра. Не подскажете, что нужно изменить? procedure TForm1.Button1Click(Sender: TObject); begin... https://www.cyberforum.ru/ delphi-beginners/ thread1707418.html
Delphi Как передать значения grid.cells в описание кнопки? Как передать значение grid.cells (данные получил с екселя) и передать данные grid.cells в процедуру нажатия кнопки?	Delphi Стек и StringGrid https://www.cyberforum.ru/ delphi-beginners/ thread1707329.html Мне нужно пройти по stringgridу и найдя в нём значение занести его в стек. Но проблема в том, что занести мне нужно только первое встреченное значения(т.е. в стеке будет 1 элемент). procedure make(var steki: PNode; x: titem); begin new(steki); steki^.Data:=x; steki^.Next:=nil; end;

Black412

0 / 0 / 0

Регистрация: 31.03.2016

Сообщений: 13

10.04.2016, 01:54 [ТС]

Неправильно работает цикл - Delphi - Ответ 9001608

10.04.2016, 01:54. Показов 850. Ответов 8

Метки (Все метки)

Ответ

Быстро писал не заметил... ошибку . вот так подходит ?

Delphi

procedure TForm1.Button1Click(Sender: TObject);
var
i,R,k:Integer;
s:string;
begin
k:=200;
R:=0;
if edit1.GetTextLen>0 then
Begin
s:='';
for i := 0 to Edit1.GetTextLen do
R:=Ord(edit1.Text[i]);
R:=k-R;
dec(R);
 
Edit2.Text:=IntToStr(R);
 
 
End else showMessage('BBB');
 
 
 
end;
 
end.

Вернуться к обсуждению:
Неправильно работает цикл Delphi

Следующий ответ

Заказать работу у эксперта

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

10.04.2016, 01:54

Готовые ответы и решения:

Неправильно работает цикл FOR ?!
В представленном ниже коде цикл FOR - НЕ останавливается при достижении значения - 1, тем самым...

Цикл: как работает цикл в цикле
Не могу понять как работает цикл в цикле например: repeat begin lalalala if что-то1<>100 then...

Now работает неправильно
if RadioButton3.Checked = true then begin t1:=now; ShowMessage('int = '+FloatToStr(t1)); ...

Неправильно работает ..класс....
Нужно было создать класс "домашняя библиотека" Чтобы осуществлялось: поиск книги в биб-ке,...

	10.04.2016, 01:54

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

10.04.2016, 01:54

Помогаю со студенческими работами здесь

Неправильно работает функция
Не могу понять почему в результате работы функции Seach всегда получается 0( Помогите разобратся...

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

Программа работает неправильно
При вводе правильных данных все нормально. Но при вводе неправильных после вывода сообщения об...

Неправильно работает StringGrid1
Суть проблемы такова что мы вводим кол-во вкладываемых средств от 3, и далее нажимаем кнопку...

Новые блоги и статьи
Как проводить научные вычисления на Python InfoMaster 15.01.2025 Python стал одним из наиболее востребованных языков программирования в области научных вычислений благодаря своей простоте, гибкости и обширной экосистеме специализированных библиотек. Научные. . .	Создание игры типа Minecraft на PyGame/Python: пошаговое руководство InfoMaster 15.01.2025 В данном руководстве мы рассмотрим процесс создания игры в стиле Minecraft с использованием библиотеки PyGame на языке программирования Python. Этот проект идеально подходит как для начинающих. . .	Как создать свою первую игру в стиле Doom на Unreal Engine InfoMaster 15.01.2025 Разработка шутера от первого лица в стиле классического Doom представляет собой увлекательное путешествие в мир игрового программирования, где сочетаются творческий подход и технические навыки. . . .	Параллельное программирование: основные технологии и принципы InfoMaster 15.01.2025 Введение в параллельное программирование Параллельное программирование представляет собой фундаментальный подход к разработке программного обеспечения, который позволяет одновременно выполнять. . .	Как написать микросервис на C# с Kafka, MediatR, Redis и GitLab CI/CD InfoMaster 15.01.2025 В современной разработке программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот подход позволяет разделить сложную систему. . .	Что такое CQRS и как это реализовать на C# с MediatR InfoMaster 15.01.2025 Концепция CQRS и её роль в современной разработке В современном мире разработки программного обеспечения архитектурные паттерны играют ключевую роль в создании масштабируемых и поддерживаемых. . .
Как настроить CI/CD с Azure DevOps InfoMaster 15.01.2025 CI/ CD, или непрерывная интеграция и непрерывное развертывание, представляет собой современный подход к разработке программного обеспечения, который позволяет автоматизировать и оптимизировать процесс. . .	Как настроить CI/CD с помощью Jenkins InfoMaster 15.01.2025 Введение в CI/ CD и Jenkins В современной разработке программного обеспечения непрерывная интеграция (CI) и непрерывная доставка (CD) стали неотъемлемыми элементами процесса создания качественных. . .	Как написать микросервис на Go/Golang с Kafka, REST и GitHub CI/CD InfoMaster 14.01.2025 Определение микросервиса, преимущества использования Go/ Golang Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .	Как написать микросервис с нуля на C# с RabbitMQ, CQRS, Swagger и CI/CD InfoMaster 14.01.2025 В современном мире разработки программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот архитектурный подход предполагает. . .	Как создать интернет-магазин на PHP и JavaScript InfoMaster 14.01.2025 В современном мире электронная коммерция стала неотъемлемой частью бизнеса. Создание собственного интернет-магазина открывает широкие возможности для предпринимателей, позволяя достичь большей. . .	Как написать Тетрис на Ассемблере InfoMaster 14.01.2025 Тетрис – одна из самых узнаваемых и популярных компьютерных игр, созданная в 1984 году советским программистом Алексеем Пажитновым. За прошедшие десятилетия она завоевала симпатии миллионы людей по. . .

Наверх