|
|
Другие темы раздела | |
Delphi Canvas длина вертикальной линии
https://www.cyberforum.ru/ delphi-beginners/ thread1404377.html Здравствуйте, подскажите пожалуйста. Есть файл таблицы из которого создается PDF-документ, в нем может быть не одна страница, как сделать чтобы вертикальные линии на последней странице не выходили за границы последней горизонтальной!? procedure TFormRedaktor.PDF_COK; var lPdf : TPdfDocument; Ft:TextFile; Sf,StrR,Sf_r,Sf_n,Sf_nn,s:String; Nstr,KolStr,Nch:Integer; begin ... |
Выход серии за границы Chart-а при зуммировании Delphi Приветствую! Подскажите, как исправить? При зуммировании, серия выходит за границы |
Delphi Вывести все ошибки в одном окне (легко) Имеется программка, просто "типа" калькулятор с 4 числами, они просто умножаются, в итоге, если написать что то другое кроме числа в строку ввода числа, выводится ошибка в окне (каждая отдельно, друг за дружком), и указывается в каком строке, то есть 1 или 2, 3 и 4 строке. Нужно что бы что вывод ошибки выводились в одном окне! Типа ошибка в 1,2,3, и 4 строке, если во все строки написать не... https://www.cyberforum.ru/ delphi-beginners/ thread1404228.html |
Delphi Как сделать ограничения в таблице ASCII?
https://www.cyberforum.ru/ delphi-beginners/ thread1404195.html Реализация шифра Цезаря на языке Delphi выглядит так: unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type |
Как сдвинуть график? Delphi Как сдвинуть график и оси немного в сторону и вниз,чтобы оно не отображалось в самом углу? x0:=StrToInt(Edit1.Text); xk:=StrToInt(Edit2.Text); y0:=ln(x0); with Image1 do begin kx:=(width-0)/(xk-x0); ky:=(height-0)/2; bx:=(0-kx*x0); by:=(0-ky*(-1)); u:=round(x0*kx+bx); |
Delphi Алгоритм Деккера Пытаюсь переписать готовый код делфи (прим. - просящий меня знакомый говорит, что это делфи) на C#, но столкнулся со одной сложностью: 1) Что значит данная строчка? Как я понимаю, это объявление массива, но что за массив 0, ... 0 static char wish = { 0, ..., 0 } В голову не приходит и найти не могу пояснение, про аналог на C# соответственно тоже не имею понятия, т.к. первый раз столкнулся... https://www.cyberforum.ru/ delphi-beginners/ thread1404122.html |
Delphi Записать в файл нового пользователя
https://www.cyberforum.ru/ delphi-beginners/ thread1404087.html Есть файл в котором допустим может храниться 5 пользователей. И нужно записать нового пользователя, но чтобы он сохранялся на месте старого. |
Ошибка при подсчете формулы (Рекурсия) Delphi Доброго времени суток! Программа вместо того чтобы суммировать значения в знаменателе, умножает их. Подскажите пожалуйста как нужно прописать чтобы все подсчитывалось верно. Ибо на калькуляторе выходит одно, а компилятор выдает другое число. Задача заключается в следующем: Задано натуральные числа n и m. Разработать программу для вычисления значений заданного выражения. При исчислении... |
Delphi Матрицы на Delphi в StringGrid
https://www.cyberforum.ru/ delphi-beginners/ thread1404063.html const n=3; var a:arrayof integer; i,j,im,jm,s:integer; begin randomize; for i:=1 to n do begin for j:=1 to n do begin a:=random(101)-50; |
Delphi Пролистывание Memo Есть кнопка, которая имеет свойство: Enabled:=false Имеется так же memo. Нужно сделать так, чтобы когда полоса прокрутки полностью "прокрутилась" вниз, тогда свойство кнопки меняется на: Enabled:=true; Добавлено через 22 часа 35 минут Вверх https://www.cyberforum.ru/ delphi-beginners/ thread1403998.html |
Delphi Заполнение матрицы по образцу Здравствуйте! Необходимо заполнить матрицу по следующему правилу: i>j => A=14-j; i<j => A=2+i; i=j => A=i-j. Я вот написал код: procedure TForm1.Button1Click(Sender: TObject); var i,j:integer; a:array of array of integer; begin for i:=0 to 11 do for j:=0 to 11 do if i>j then a:=14-j |
Delphi Простейший текстовой редактор
https://www.cyberforum.ru/ delphi-beginners/ thread1403979.html Здравствуйте. Помогите пожалуйста. Приехал препод, отчитал делфи неделю и дал такое задание:Приложение должно выполнять основные функции текстового редактора, т.е. позволять создавать и редактировать текст, открывать и сохранять файлы, иметь главное меню, панели инструментов и строку состояния. Так же должна быть команда позволяющая нумеровать страницы(нумерация страниц). Я еле как понимаю как... |
1 / 1 / 0
Регистрация: 24.09.2014
Сообщений: 34
|
|
0 | |
Создать двумерный динамический массив произвольного размера NxN (размер ввести). Заполнить массив случайным об - Delphi - Ответ 739099526.03.2015, 10:54. Показов 4240. Ответов 1
Метки (Все метки)
Создать двумерный динамический массив произвольного размера NxN (размер ввести). Заполнить массив случайным образом. Найти все значения элементов массива, расположенные на главной диагонали и вывести их значения и индексы.
Вернуться к обсуждению: Создать двумерный динамический массив произвольного размера NxN (размер ввести). Заполнить массив случайным об Delphi
0
|
26.03.2015, 10:54 | |
Готовые ответы и решения:
1
Создать двумерный динамический массив произвольного размера (размер ввести) Создать одномерный динамический массив произвольного размера (размер ввести) Создать одномерный динамический массив произвольного размера (размер ввести) Используя многострочный редактор и динамический массив ввести массив произвольного размера |
26.03.2015, 10:54 | |
26.03.2015, 10:54 | |
Помогаю со студенческими работами здесь
0
Заполнить двумерный динамический массив случайным образом Заполнить двумерный массив произвольного размера последовательными числами по спирали Случайным образом заполнить двумерный массив фиксированного размера целыми числами в заданном диапазоне Создать двумерный динамический массив для переменных произвольного типа |