|
|
Другие темы раздела | |
Delphi Файлы Дан файл f, компоненты которого являются целыми числами. Никакая компонента файла не равна нулю. Файл f содержит столько же отрицательных чисел, сколько и положительных. Составить программу, которая переписывает компоненты файла f в файл g так, чтобы в файле g сначала шли положительные, потом отрицательные числа. https://www.cyberforum.ru/ delphi-beginners/ thread2218638.html |
Матрицы: поменять местами строки, содержащие минимум и максимум Delphi В данной вещественной матрице размером nxm поменяйте местами строку, содержащую элемент с наибольшим значением, со строкой, содержащей элемент с наименьшим значением. Предполагается, что эти элементы единственные. |
Delphi Удаление слова, строки, абзаца
https://www.cyberforum.ru/ delphi-beginners/ thread2218633.html Приложение должно выполнять основные функции текстового редактора, т.е. позволять создавать и редактировать текст, открывать и сохранять файлы, иметь главное меню, панели инструментов и строку состояния. В дополнение к базовым функциям должна быть реализована одна из предлагаемых команд: 1. Удаление слова, строки, абзаца |
Delphi CheckListBox блокировка кнопки Есть кнопка delete. Она удаляет строки помеченные галочкой в CheckListbox1 вот её код: procedure TForm1.Action6Execute(Sender: TObject); var i:Integer; begin for I := CheckListBox1.Count -1 downto 0 do if CheckListBox1.Checked then CheckListBox1.Items.Delete(i); end; Кнопка по умолчанию заблокирована, нужно сделать так чтобы она становилась доступна тогда, когда на какой либо из... https://www.cyberforum.ru/ delphi-beginners/ thread2218620.html |
Delphi Считывание вордовского документа Есть программа представленная на скриншоте, нужно в неё добавить кнопку, при нажатии которой считывались оглавления со страниц вордовского документа , и добавлялся список оглавления в сам документ(скриншот прилагаю) , с помощью которого можно было перейти на страницы ,на которых находится то, или иное оглавление |
Delphi Ошибка : Estringlisterror with message list index out of bounds(0) при работе с циклом
https://www.cyberforum.ru/ delphi-beginners/ thread2218615.html Здравствуйте,подскажите пожалуйста в чем может быть проблема... Задали в университете написать программу по методичке,до этого не работали в Delphi. Но к сожалению в методичке видимо ошибка,так как программа ругается на код. Сам код. procedure TForm1.ComboBox7Change(Sender: TObject); Const S:array of integer = (7,6,2,3,3); Mater :array of string =... |
Delphi Не могу заполнить ячейку DBGrid1.DataSource.DataSet procedure TSignObjectsDialog.Button12Click(Sender: TObject); begin DBGrid1.DataSource.DataSet.Edit; DBGrid1.DataSource.DataSet.FieldValues:='144'; DBGrid1.DataSource.DataSet.Post; end; Подскажите что не так, хочу заполнить столбец, но вылетает в ошибке. https://www.cyberforum.ru/ delphi-beginners/ thread2218542.html |
Delphi Подсчет строк в stringgrid Добрый день, ночь, утро, вечер! Столкнулся с такой проблемой. Есть Stringgrid, изначально с неизвестным количеством строк и столбцов, но не больше 50 строки столбцов. Необходимо посчитать количество не пустых ячеек в строке и вывести в последний столбик в соответствующую строку их количество. Делаю так: var u, o, i, j: integer; a: array of string; begin o:=0; |
Delphi Как узнать, с какой формы была открыта (Form*.ShowModal:) текущая форма Доброго всем времени суток! Помогите, пожалуйста решить одну задачку: Проект для расчёта времени изготовления деталей (это так... для общего понимания)... В проекте несколько форм для расчёта времени изготовления разных типов деталей: трубная решетка(frResh), трубная доска(frDT), литая крышка(frLK) и т.д.). У всех у них разные алгоритмы расчёта времени, но не об этом речь... Так же в проекте... https://www.cyberforum.ru/ delphi-beginners/ thread2218486.html | Delphi Как в richedit добавить нумерацию страниц? Чтобы было как на фото https://www.cyberforum.ru/ delphi-beginners/ thread2218400.html |
Delphi Вывод процедуры.Даны кв.матрицы A,B, получить матрицу A*(B-E)+C , E-единичная матрица Помогите вывести процедуру. Выдает ошибку Illegal type in Write/Writeln statement . Не умею преобразовывать типы.. program Pr10; {$APPTYPE CONSOLE} uses SysUtils, Windows; type MyMatrix=array of Real; var I, J, N:Integer; |
Delphi Scrollbar кнопками Идея такая, нужно чтобы при нажатий кнопки, скроллбар DBGrid опускался вниз. Причина не использования скроллбара в том, что мой DBGrid скрыт по определённым причинам и скроллбар скажем так, там вне доступности. Поэтому решил организовать перемещение с помощью нажатий кнопок. Колесо мыши уже занято другим поэтому тоже не прокатит. https://www.cyberforum.ru/ delphi-beginners/ thread2218348.html |
4913 / 2782 / 853
Регистрация: 04.10.2012
Сообщений: 10,121
|
|
28.03.2018, 16:19 | 0 |
Delphi 6-7 Постройте последовательность b1 , b2 , ..., bn, из нулей и единиц по условию - Delphi - Ответ 1225721628.03.2018, 16:19. Показов 804. Ответов 4
Метки (Все метки)
Ответ
а консоль - это не окно ? Если нужно приложение с формой, то кидайте на форму кнопочки, сетку TStringGrid, лейблы и вперед!
Вернуться к обсуждению: Постройте последовательность b1 , b2 , ..., bn, из нулей и единиц по условию Delphi
1
|
28.03.2018, 16:19 | |
Готовые ответы и решения:
4
Постройте последовательность b1 , b2 , ..., bn из нулей и единиц Построить последовательность из нулей и единиц согласно условию элементов матрицы Составить последовательность из нулей и единиц без соседних единиц Необходимо найти и посчитать максимальную последовательность нулей в последовательности нулей и единиц |
28.03.2018, 16:19 | |
28.03.2018, 16:19 | |
Помогаю со студенческими работами здесь
0
Дана последовательность из P нулей и единиц. Определить в каких позициях начинаются цепочки нулей Последовательность единиц и нулей Последовательность из 40 нулей и единиц Построить последовательность b1 ... bn из нулей и единиц |