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

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

Войти

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

Другие темы раздела
Delphi Дан ряд 1+2+3+4+.+n+. какое дан ряд 1+2+3+4+..+n+.. какое минимальное число членов ряда нужно сложить чтобы их сумма привысила 100. Помогите решить на паскале через оператор цикла. https://www.cyberforum.ru/ delphi-beginners/ thread667200.html	Ужасный запоминатель Delphi Помогите составить программу. На форме текстовое поле едит и кнопки запомнить и вывести. Пишешь что-то в текстовом поле потом нажимаешь кнопку запомнить и написаный в едит текст стирается и запоминается, и так много раз, а потом нажимаешь вывести и он выводит все то что до этого стер в мемо. пришлите код
Delphi Шифрование цезаря, с периодическим ключом и лозунговый шифр Всем доброго времени суток, к завтрешнему дню нужно написать 3 шифра: Шифр Цезаря, Шифрование с периодическим ключом и лозунговый шифр. Почти работает шифр цезаря, но есть некие непонятные мне проблемы, про остальные шифры ничего вообще не знаю. Поиск в гугл не помог( Помогите пожалуйста. procedure TForm1.Button1Click(Sender: TObject); var alfa,x,y: string; k,i: integer; c: char; begin... https://www.cyberforum.ru/ delphi-beginners/ thread667138.html	Delphi Ходя конем 5. Дана доска n x n. Конь, который ходит согласно шахматным правилам, помещается на поле с начальными координатами x0, y0. Нужно покрыть всю доску ходами коня, т.е. вычислить обход доски (если он существует), из n2 – 1 ходов такой, что каждое поле посещается ровно один раз. Напишите программу, которая промаркирует клетки доски номерами ходов. В начальную клетку поставьте 0. Она работает... https://www.cyberforum.ru/ delphi-beginners/ thread667136.html
Delphi Вычислить сумму ряда для заданного N Вычислить выражение для заданного n: Y=\sum_{k=1}^{n}(\frac{1}{C_{n}^{k}}) Добавлено через 1 час 35 минут :cry: Добавлено через 24 минуты Помогите составить текст программы с помощью подпрограмм. Аааа?:( Добавлено через 10 секунд	Delphi В ListBox нет события OnChange. Чем его можно заменить? https://www.cyberforum.ru/ delphi-beginners/ thread666961.html Мне необходимо при добавлении/удалении строк в ListBox выводить кол-во строк в Edit. Подскажите как это реализовать.
Delphi Как обратиться к ScrollBar в StringGrid? Когда соотв. св-во выставлено, и он таки появляется, это же контрол на форме? Как его проперти получить? нужна ширина в пикселях https://www.cyberforum.ru/ delphi-beginners/ thread666934.html	Delphi Переделать программу из оконного режима в консольный помогите переделать программу чтобы она была с консолями var Mem1, Mem2 : TMemoryStream; Bol : Boolean; begin Bol := False; Mem1 := TMemoryStream.Create; Mem2 := TMemoryStream.Create; try
Delphi Программное создание XML-файла и его редактирование https://www.cyberforum.ru/ delphi-beginners/ thread666849.html Надо из дельфи создать xml файл (заполнить) Как это сделать??? Добавлено через 2 часа 50 минут НЕУЖЕЛИ НЕ КТО НЕ ЗНАЕТ?? ИЛИ ЭТО НЕ ИНТЕРЕСНО НЕ КОМУ???	Delphi Открытие той или иной формы в зависимости от выбора в DBLookupComboBox https://www.cyberforum.ru/ delphi-beginners/ thread666801.html Люди помогите, пожалуйста. Надо построить логику так, чтобы: 1) Есть Forma1 в ней есть DBLookupComboBox из двух строк; 2) Есть Forma2 на ней кнопка, при нажатии должно выполняться логическое действие: если DBLookupComboBox = 1 строка, то должна открыться Forma3; если DBLookupComboBox = 2 строка, то должна открыться Forma4. Помогите, у меня не получается
Delphi Матрица: найти сумму нижнего треугольника включая главную диагональ Можете написать часть кода, где находится сумма нижнего треугольника включая главную диагональ?	Delphi В фиксированную ячейку StringGrid'a записать две строки программно https://www.cyberforum.ru/ delphi-beginners/ thread666715.html Всем привет! У меня воникла проблемка, надо в фиксированную ячейку StringGrid'a запихнуть две строки программно. Т.е. чтобы в фиксированной ячейке было не: 1111 2222 а так: 1111 2222 Забыл, это надо сделать в Delphi.

volvo

Супер-модератор

32835 / 21172 / 8148

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

Сообщений: 36,431

Записей в блоге: 8

09.10.2012, 17:36

Удаление из ListBox-а элементов, стоящих на четных местах - Delphi - Ответ 3539319

09.10.2012, 17:36. Показов 1047. Ответов 2

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

Сообщение было отмечено ritavishneva как решение

Решение

Delphi

procedure TForm1.Button1Click(Sender: TObject);
var i : integer;
begin
  i := ListBox1.Items.Count;
  if Odd(i) then Dec(i); // Если количество элементов нечетное - то последний не трогаем
  while i >= 0 do
  begin
    ListBox1.Items.Delete(i);
    Dec(i, 2);
  end;
end;

Учти, что отсчет позиций начинается с нуля, а не с 1-цы

Вернуться к обсуждению:
Удаление из ListBox-а элементов, стоящих на четных местах Delphi

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

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

Programming

Эксперт

94731 / 64177 / 26122

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

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

09.10.2012, 17:36

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

Вычислить сумму элементов матрицы, стоящих на четных местах и произведение элементов, стоящих на нечетных местах
Здравствуйте. Помогите пожалайсту, используя двумерные массивы, написать программу решения задачи:...

Найти сумму элементов, стоящих на четных местах и произведение элементов, стоящих на нечетных местах
Дан одномерный массив y=(-1; 5,03; 6,2; -8,4; 0,7; 2,6). Найти сумму элементов, стоящих на четных...

Написать программу, находящую сумму элементов, стоящих на четных местах и максимум среди элементов, стоящих на нечетных местах.
Всем привет! Помогите, пожалуйста, решить две задачи по программированию. Задача 1: Задан массив...

Вычислить сумму элементов, стоящих на чётных местах и произведение элементов, стоящих на нечётных местах
Для массива X(X1, X2......Xn), имеющего положительные и отрицательные элементы, вычислить сумму...

	09.10.2012, 17:36

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

09.10.2012, 17:36

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

Определить отношение суммы элементов массива, стоящих на нечетных местах, к сумме элементов на четных местах
Определить отношение суммы элементов массива, стоящих на нечетных местах, на сумму элементов,...

Вычислить сумму элементов массива, стоящих на четных местах и произведение элементов, стоящих на нечетных
в Массиве целых чисел что складывается из 20 элементов,узнать сумму элементов,что стоят на первых...

Найти количество строк, в которых все элементы, стоящие на четных местах, больше среднего арифметического элементов, стоящих на нечетных местах.
Дана матрица натуральных чисел А(N,N). Найти количество строк, в которых все элементы, стоящие на...

Найти сумму всех чётных элементов массива, стоящих на чётных местах
1. Найти сумму всех чётных элементов массива, стоящих на чётных местах, то есть имеющие чётные...

Наверх