С Новым годом! Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Проверить, имеется ли в данном массиве хотя бы одна пара чисел, совпадающих по величине https://www.cyberforum.ru/ delphi-beginners/ thread1158415.html
проверить, имеется ли в данном массиве хотя бы одна пара чисел, совпадающих по величине.если имеется, вывести их сумму. в Делфи:)
Delphi Построение траектории брошенного тела
Доброе время суток, у меня есть задачка, которую очень хотелось бы решить, уже все формулы которые нашел перепробывал, но это чудо(программа) не хочет работать так как надо... вот собственно сама задача: Нарисовать траекторию полета тела брошенного под углом к горизонту, в принципе входные выходные данные могут быть любыми, но я пытался использовать только скорость и угол броска, на 45 градусах и...
Delphi Дан массив. Найти его минимальный по модулю элемент https://www.cyberforum.ru/ delphi-beginners/ thread1158413.html
дан массив.найти минимальный по модулю элемент.в делфи, плииз, помогите решить;)
Delphi "Забить" алфавит по порядку в stringgrid Мне нужно просто, чтобы когда ты запускаешь программу в ячейках stringgrid-а показывается русский алфавит по порядку https://www.cyberforum.ru/ delphi-beginners/ thread1158398.html
Импорт данных из Tstringgrid в Word Delphi
Ребят, прошу вашей помощи, я физически не успеваю этого сделать, так как на мне висит еще две процедуры, суть в том, чтоб подстроить этот код (он же есть во вложении) под стринггрид моей программы, код нашел в недрах интернета, и не успеваю в нем разобраться, а суть в том, чтобы вывести данные таблицы и tdatetimepicker (с последнем еле справился) в документ ворда. Очень на вас надеюсь, помогите...
Delphi Фактический параметр процедуры как указатель Необходимо передать параметр в качестве параметра по умолчанию как указатель в процедуру, что бы менять значение переменной в основной программе. То бишь в таком формате: procedure BubleSort (var Arr:TMyArray; n:integer; var swapCount :integer; var Time: real = 0); Компилятор ругается на то, что я передаю указатель. Как реализовать правильно? https://www.cyberforum.ru/ delphi-beginners/ thread1158316.html
Delphi Ошибка при пустом Edit Ребят, что не так? Это процедура поиска. Собственно ошибку должно выдавать, когда вводим значение и если оно не верно, то вылетает ошибка. Но ошибка также вылетает и когда Edit пустой((( procedure TForm1.Edit23Change(Sender: TObject); Var strField:string; begin case RadioGroup1.ItemIndex of 0: strField:='kod_client'; 1: strField:='Surname'; 2: strField:='name'; 3: strField:='second_name';... https://www.cyberforum.ru/ delphi-beginners/ thread1158292.html Delphi Как перенести процедуру из Паскаля в Делфи
вот собственно сама процедура: var ma:m; s2,s3:string; j,i,kj,kols:integer; f,yy,y11: boolean; procedure Pars1(s1: string;var s2: string); var n1,n2:Integer; begin n1:=ma;
Delphi Обработчик событий для нескольких компонентов https://www.cyberforum.ru/ delphi-beginners/ thread1158219.html
В моей программе есть несколько компонентов TEdit, а так же StringGrid. Суть в том, чтобы разрешить вводить в Edit и в ячейки StringGrid только вещественные числа. Код уже есть, вопрос в том, как не писать его для каждого Эдит/Грид отдельно, а записать в виде процедуры, к примеру. procedure TF_MainForm.ED_RangeMinChange(Sender: TObject); var i:integer; begin for i := 1 to...
Delphi Подскажите, как примерно должна выглядеть программа в Delphi? Дан файл SCHOOL, в котором содержится информация о школьниках: 1) Ф.И.О.; 2) Число, месяц, год рождения; 3) Оценки экзаменов; а) отсортировать записи по возрастанию среднего экзаменационного балла; б) по запросу на Ф.И.О.- выдавать средний балл; в) распечатать ведомость школьников со средним баллом меньше 3. https://www.cyberforum.ru/ delphi-beginners/ thread1158194.html
из dblookupcombobox в dbgrid Delphi
Подскажите, пожалуйста, как передать значения из dblookupcombobox в dbgrid не IDишками, а словами (а именно чтобы в dbgrid было не id налогоплательщика, а его ФИО)
Delphi Программа "создатель тестов" Здравствуйте! Прошу оценить программу-тест и указать на его недостатки (кроме шифрования файлов, решаю проблему шифром замены, почти доделал) в планах создать три режима программы: текстовый тест, тест с картинками, смешанный тест, но минус в том, что нет (пока) кнопки назад, тоже решаю этот вопрос, и нет возможности множественного выбора, может-быть кому-то пригодиться) https://www.cyberforum.ru/ delphi-beginners/ thread1158162.html
Аналитик
80 / 80 / 63
Регистрация: 24.04.2014
Сообщений: 465
Записей в блоге: 15
27.04.2014, 13:49 0

Определить номера строк, содержащих только положительные элементы - Delphi - Ответ 6094591

27.04.2014, 13:49. Показов 1993. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено ZaRinKa97 как решение

Решение

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
...//заполнение матрицы
for i:=1 to stringgrid1.rowcount -1 do
 begin
 bul[i]:=true;
 for j:=1 to stringgrid1.colcount -1 do 
   begin
     if striggrid1.cells[j,i]<=0 then bul[i]:=false;
   end;
   if bul[i] = true then 
   begin
      listbox1.items.add(i);
      inc(e);  
   end; 
   if e=0 then memo1.text:='нет строк не имеющих  не положительных элементов';
end;


Вернуться к обсуждению:
Определить номера строк, содержащих только положительные элементы Delphi
0
Заказать работу у эксперта
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
27.04.2014, 13:49
Готовые ответы и решения:

Определить номера строк массива, содержащих только положительные элементы
Добрый вечер,помогите, пожалуйста, исправить ошибку в программе и не знаю как еще условие добавить...

Определить номера строк матрицы, содержащих только положительные элементы
определить номера строк, содержащих только положительные элементы, если их нет- вывести об этом...

Определить номера строк двумерной матрицы, содержащих только положительные элементы
Вроде как все сделал но работает не правильно. Вот код: procedure TForm1.Button1Click(Sender:...

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

2
27.04.2014, 13:49
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
27.04.2014, 13:49
Помогаю со студенческими работами здесь

Поменять местами столбец матрицы с номером 1 и последний из столбцов, содержащих только положительные элементы
Помогите пожалуйста. Delphi 7 Преобразование матрицы Дана матрица размера M * N. Поменять...

В двумерном массиве определить номера строк, содержащих только положительные элементы
№2 В двумерном массиве определить номера строк, содержащих только положительные элементы....

Массив размером m*n. Заполнить его с клавиатуры. Определить номера строк, содержащих только положительные элементы
Дан двумерный массив размером m*n. Заполнить его с клавиатуры. Определить номера строк, содержащих...

Определить номера строк массива, содержащих только положительные элементы и найти среди них наименьший
дано задание: Дан двумерный массив размером n*m, заполненный случайными числами из заданного...

Определить номера столбцов содержащих только положительные элементы
Добрый день. Задание:определить номера столбцов содержащих только положительные элементы, вычислить...

Вывести номера первой и последней строк таблицы, содержащих только положительные элементы
Дана таблица 5x10 заполненная целыми числами. Вывести номера первой и последней строк, содержащих...

0
Новые блоги и статьи
Как написать микросервис на Go/Golang
InfoMaster 14.01.2025
Определение микросервиса, преимущества использования Go/ Golang Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .
Как написать микросервис с нуля на C#
InfoMaster 14.01.2025
В современном мире разработки программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот архитектурный подход предполагает. . .
Как создать интернет-магазин на PHP и JavaScript
InfoMaster 14.01.2025
В современном мире электронная коммерция стала неотъемлемой частью бизнеса. Создание собственного интернет-магазина открывает широкие возможности для предпринимателей, позволяя достичь большей. . .
Как написать Тетрис на Ассемблере
InfoMaster 14.01.2025
Тетрис – одна из самых узнаваемых и популярных компьютерных игр, созданная в 1984 году советским программистом Алексеем Пажитновым. За прошедшие десятилетия она завоевала симпатии миллионы людей по. . .
Как создать игру "Танчики" на Unity3d и C#
InfoMaster 14.01.2025
Разработка игр – это увлекательный процесс, сочетающий в себе творчество и технические навыки. В этой статье мы рассмотрим создание классической игры "Танчики" с использованием Unity3D и языка. . .
Организую платный онлайн микро-курс по доработке Android-клиента Telegram
_Ivana 14.01.2025
Официальная версия и распространенные форки не полностью устраивают? Сделай свою кастомную версию клиента! 4 занятия по 2 часа (2 недели пн, ср 19:00-21:00 по Москве). Первое вводное занятие. . .
Как создать приложение для фитнеса для iOS/iPhone на Kotlin
InfoMaster 14.01.2025
Создание собственного фитнес-приложения — это не только захватывающий, но и полезный процесс, ведь оно может стать вашим верным помощником на пути к здоровому и активному образу жизни. В современных. . .
Как создать приложение магазина для iOS/iPhone на Swift
InfoMaster 14.01.2025
Введение в разработку iOS-приложений Разработка приложений для iPhone и других устройств на базе iOS открывает огромные возможности для создания инновационных мобильных решений. В данной статье мы. . .
Это работает. Скорость асинхронной логики велика. Вопрос видимо останется в стабильности. Плата - огонь!
Hrethgir 13.01.2025
По прошлому проекту в Logisim Evolution https:/ / www. cyberforum. ru/ blogs/ 223907/ blog8781. html прилагаю файл архива проекта в Gowin Eda. Восьмибитный счётчик из сумматора+ генератор сигнала. . .
UserScript для подсветки кнопок языков программировани­­­­я в зависимости от текущего раздела
volvo 13.01.2025
В результате работы этого скрипта подсвечиваются нужные кнопки не только в форме быстрого ответа, но и при редактировании сообщения: / / ==UserScript== / / @name CF_DefaultLangSelect / / . . .
Введение в модели и алгоритмы машинного обучения
InfoMaster 12.01.2025
Машинное обучение представляет собой одну из наиболее динамично развивающихся областей искусственного интеллекта, которая фокусируется на разработке алгоритмов и методов, позволяющих компьютерам. . .
Как на Python создать нейросеть для решения задач
InfoMaster 12.01.2025
В контексте стремительного развития современных технологий особое внимание уделяется таким инструментам, как нейросети. Эти структуры, вдохновленные биологическими нейронными сетями, используются для. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru