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. Показов 836. Ответов 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

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

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

Programming

Эксперт

94731 / 64177 / 26122

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

Сообщений: 116,782

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

IT_Exp

Эксперт

87844 / 49110 / 22898

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

Сообщений: 92,604

10.04.2016, 01:54

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

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

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

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

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

Наверх