![]() |
|
Другие темы раздела | |
Delphi Приложение для учета проданных товаров
https://www.cyberforum.ru/ delphi-beginners/ thread681995.html Нужно сделать вот такую программу: Разработать приложение для учета проданных товаров. По каждому виду товара вводится информация: наименование, артикул, количество, цена за единицу. Рассчитать сумму выручки заданному виду товара. Выдать общую сумму реализации товаров. Я не прошу готового ответа, сам хочу разобраться, но я не знаю с какой стороны подступить. Подскажите, пожалуйста, какие... |
Элементы массива B вставить в массив A так, чтобы A остался упорядоченным Delphi Доброе время суток! Передо мной встала задача, в которой задано массивы целых: упорядоченный по росту чисел A(n+m), неупорядоченный - B (m), n<=300, m<=200. Разработать программу, которая элементы массива B вставляет в массив A так, чтобы A остался упорядоченным. Для упорядочения использовать метод вставки. Помогите пожалуйсто с кодом. Добавлено через 17 часов 54 минуты Ап, если кому нужна... |
Delphi Работа с Ini В общем нужно в INI файле хранить строки ComboBox. Кнопкой Install я сохраняю строки. При открытии если файл существует, то загружаю из него строки. Дело в том что прі загрузке выдаёт ошибку и я не знаю как исправить. загрузка procedure TForm1.FormCreate(Sender: TObject); var APchar: array of Char; i:integer; begin GetWindowsDirectory(APchar, 255); https://www.cyberforum.ru/ delphi-beginners/ thread681848.html |
Delphi Не могу получить контекст потока
https://www.cyberforum.ru/ delphi-beginners/ thread681799.html Всем привет! Есть небольшой кусочек кода, хочу получить например значение EAX, в чужом приложении, но при получении контекста потока, значения неизменны, явно делаю что-то не так :( unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, TLHelp32; |
Delphi почему не посылает сообщение? procedure TForm1.Button1Click(Sender: TObject); var okno: HWND; begin okno := FindWindow('notepad', nil); if okno = 0 then ShowMessage('НЕнашел'); okno := FindWindowEx(okno, 0, 'Edit', nil); if okno = 0 then |
Delphi Блок-схема
https://www.cyberforum.ru/ delphi-beginners/ thread681745.html Привет! Есть программа считывает данные из файла в динамический массив, затем удаляет первый элемент. Как составить блок-схему? unit Unit1; interface |
Delphi Перенос данных из стринггрид в динамический массив Необходимо перенести данные в динамический массив.Код такой: procedure TForm1.Button4Click(Sender: TObject); var i,j,m,n:integer; begin m:=StringGrid1.RowCount-1;//ñòðîêè n:=StringGrid1.ColCount-1;//ñòîëáöû SetLength(glmas,m,n);//ñòðîêà ñòîëáåö for i:=1 to m-1 do for j:=1 to n-1 do https://www.cyberforum.ru/ delphi-beginners/ thread681714.html |
Написать программу, которая вводит две символьных последовательности Delphi Написать программу, которая вводит две символьных последовательности, каждая из 5-ти элементов, и строит третью последовательность, в начале которой стоят элементы первой последовательности, а за ними - элементы второй. предусмотреть ввод последовательности символов через компонент Edit Для вывода результатов использовать компонент Label, через String получилось,но препод требует что... |
Delphi MediaPlayer Путь к файлу
https://www.cyberforum.ru/ delphi-beginners/ thread681629.html Народ, снова нужна ваша помощь Мне в моем плеере нужно сделать чтобы при открытии файла, путь к этому файлу появлялся допустим в Label ну или List Box и все. Мне не нужен код полного плейлиста а просто чтобы показывало путь. Заранее спасибо) |
Delphi Настройки формы Здраствуйте и сразу к делу я новичек не могу понять как отключить кнопку разворота на весь экран в настройках формы заранее спасибо! https://www.cyberforum.ru/ delphi-beginners/ thread681566.html |
дано натуральное число а и натуральное число n Delphi s:=1/a+1/(a^2)+1/(a^4)+...+1/(a^(2^n)) procedure TForm1.Button1Click(Sender: TObject); var a,i,p,n:real; begin a:=strtofloat(edit1.Text); n:=strtofloat(edit2.Text); p:=0; for i:=1 to n do begin |
Delphi Корректная вставка текста из буфера обмена
https://www.cyberforum.ru/ delphi-beginners/ thread681483.html Те, кто уже сталкивался с буфером обмена в Дэльфи 7 дожен представлять себе эту проблему: на входе буфера - нормальный текст, на выходе что-то такое - "?????? ???? ???????" Решением является перекодирование текста из буфера обмена в юникод, так вот тут представлен пример подобного решения для вставки ИЗ программы в буфер: var h:THandle; begin Clipboard.Open; Clipboard.AsText :=... |
0 / 0 / 0
Регистрация: 14.03.2010
Сообщений: 9
|
|
0 | |
Дана строка. Определить, есть ли в этой строке символы ′А′ и ′Е′ - Delphi - Ответ 361803727.10.2012, 21:15. Показов 1094. Ответов 1
Метки (Все метки)
1. Дана строка. Определить, есть ли в этой строке символы ′А′ и ′Е′, а также количество каждого из этих символов.
Вернуться к обсуждению: Дана строка. Определить, есть ли в этой строке символы ′А′ и ′Е′ Delphi
0
|
|
27.10.2012, 21:15 | |
Готовые ответы и решения:
1
Строка: Вывести слова, оканчивающиеся на букву ′о′ Дан многочлен P(x) степени n. Получить многочлен P(x)·P′(x), где P′(x)— это производная многочлена P(x) Дан многочлен 𝑃(x) степени 𝑛.Получить многочлен 𝑃(𝑥) + 𝑃 ′ (𝑥), где 𝑃 ′ (𝑥) — это производная многочлена 𝑃(𝑥) |
27.10.2012, 21:15 | |
27.10.2012, 21:15 | |
Помогаю со студенческими работами здесь
0
Дан многочлен P(x) степени n. Получить его производную P′(x) Форма регистрации вылетает с ошибкой Duplicate entry ’1′ for key ‘PRIMARY’
|