Delphi

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

Войти

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

Другие темы раздела
Delphi Цифровой поиск Подскажите как осуществить цифровой поиск в одномерном массиве https://www.cyberforum.ru/ delphi/ thread593228.html	Delphi Онлайн текстовый учебник дельфи со мной случисась беда и положили в больницу... скукотень нереальная... мне бы учебник дельфи да такой чтоб на сайте текстом был чтоб с телефона почитать да знаний набраться. есть такой? пожалуйста ссылочку
Delphi Добавить после i-ой строки текста T копию j-й строки https://www.cyberforum.ru/ delphi/ thread592991.html const d=..; {длина строки} n=..;{максимальное число строк } type строка=string; ссылка=^строка; текст=array of ссылка; (Если в тексте менее n строк, то последние элементы массива равны NIL; в начале массива ссылок NIL не должно быть. Если в операции над текстом указан номер отсутствующей строки, т.е. элемент массива с этим номером равен NIL, то такая операция не...	Delphi Реализация попеременно-треугольного итерационного метода Срочно нужна помощь!Весь инет облазил,ничего не нашёл.Может кто-нибудь сталкивался с этим методом,или есть исходник на Delphi. https://www.cyberforum.ru/ delphi/ thread592418.html
Delphi Запутался я в этой задаче! const n=10; m=12; type matr=array of real; {x}_{1}{x}_{n}+{x}_{2}{x}_{n-1}+..+{x}_{n}{x}_{1} описать и проверить в программе функцию sum(A), вычисляющую величину где максимальный элемент i строки матрицы A. вот текст программы! В принципе все правильно только нужно сделать так чтобы максимальный элемент искался и запоминался в каждой строке, а вот после как раз нужно будет...	Delphi Удалить из строки все звездочки https://www.cyberforum.ru/ delphi/ thread592179.html Дана строка символов удалить из строки все звездочки
Delphi Хук WH_JOURNALRECORD и WM_MOUSEWHEEL Здравствуйте дорогие форумчане :) Кто может помочь с простой проблемой: надо узнать знак Delta (т.е. в какую сторону крутится колесико) при создании хука WH_JOURNALRECORD. Вот мой код: function JournalProc(nCode, wParam: Integer; var EventStrut: TEventMsg): Integer; stdcall; var X, Y: Integer; Delta: Integer; begin https://www.cyberforum.ru/ delphi/ thread591908.html	Delphi Delphi XE2 программа съедает весь процессор В Delphi XE компилировал и нормально работала программа. Надо было прогу запилить под 64 платформу. Поставил XE2 скомпилил. Через 5-10 минут прога начинает жрать немеренно процессорного времени пока не сожрет все. Код штудировал - нет ничего такого где могла бы тупить прога. Мб знает что делать, как быть? procedure TNewThread.Execute; begin FreeOnTerminate:=true; CurSite:=-1; ...
Delphi Докумены из папки Можно ли расплоложить докумены в папке и вызывать их от туда а не из папки со всеми другими файлами программы? вот код программы: procedure TFPrikaz.FormCreate(Sender: TObject); begin ListPath := ExtractFilePath(Application.ExeName) + 'doc.txt'; sListBox1.Items.LoadFromFile(ListPath); end; procedure TFPrikaz.sListBox1DblClick(Sender: TObject); begin https://www.cyberforum.ru/ delphi/ thread591764.html	Delphi Блок Схема Delphi Помогите пожалуйста,нарисуйте блок-схему для вот такой задачки. Дана матрица K(n,m). Элементы каждой строки расположить по возрастанию. https://www.cyberforum.ru/ delphi/ thread591408.html
Delphi Можно ли как то выключить процедуру по событию 'клик' Можно ли как то выключить процедуру по событию 'клик'?	Delphi Функция. Модуль и библиотека https://www.cyberforum.ru/ delphi/ thread590737.html 1) Процедура Вывести в порядке возрастания их кодов все строчные буквы латинского алфавита, имеющиеся в тексте. 2)Функиця Уточните корень уравнения e^x-10x-=0 на отрезке методом половинного деления. 3)Процедуру подключить как Unit, а функцию как отдельную библиотеку dll. 1-ое задание я сделал, 2-ое почти, 3-е не знаю как. Пожалуйста помогите, завтра сдавать. 1-ое:

jerrald

1 / 1 / 0

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

Сообщений: 86

Динамические структуры данных - Delphi - Ответ 3111561

01.06.2012, 15:04. Показов 1529. Ответов 1

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

Author24 — интернет-сервис помощи студентам

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

Delphi

procedure delet( var p:ptt);
{процедура удаления первого элемента}
var q:ptt;
begin
if p<>nil then
begin
q:=p^.next;
showmessage('Элемент удален'+inttostr(p^.inf));
dispose (p);
p:=q;
end;
end;
 
procedure add(var p:ptt);
{процедура добавления элемента в начало списка }
var q:ptt;
begin
q:=p;
if q^.prev=nil then begin
New(p);
p^.inf:=strtoint(form1.edit1.text);
p^.next:=q;
p^.prev:=nil;
q^.prev:=p;
end
else add(p^.prev);
end;

Вернуться к обсуждению:
Динамические структуры данных Delphi

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

Миниатюры

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

Programming

Эксперт

39485 / 9562 / 3019

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

Сообщений: 41,671

Блог

01.06.2012, 15:04

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

Динамические структуры данных, списковые структуры (надо разобраться что делает программа)
дана программа, надо помочь выяснить что в ней делает каждая подпрограмма unit Unit6; ...

Динамические структуры данных
Народ помогите с задачей!! С чего начать? Написать прогу для слияния двух отсортированных списков...

Динамические структуры.объекты
Создать базу сотовых компаний.вроде все по порядку делала.но при компиляции выскакивает непонятная...

Линейные динамические структуры
Построить стек, элементы которого русские слова фиксированной длины. Подсчитать число совпадающих...

	01.06.2012, 15:04

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

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

Сообщений: 28,500

Блог

01.06.2012, 15:04

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

динамические структуры данных.нужна срочно!
опишите процедуру,формирующую список L, включив в него по одному разу элементы,которые входят в...

Динамические поля и обработка данных базы данных (mdb)
У меня вопрос. Создал базу данных mdb Acceess. Там таблицы и запросы. В Delphi создал форму для...

Разработать структуры записи таблицы базы данных
"Работа с автономными СУБД на ПК. Создание таблиц с помощью DatabaseDesktop. Структура" Задание к...

Динамические структуры данных. Организация данных в списковые структуры
Написать программу, формирующую два списка, заполняя их числами из файлов. Объединить оба списка в...

Новые блоги и статьи
Компьютер как универсальное устройство для работы с информацией hw_wired 28.01.2025 Введение в устройство компьютера Компьютер представляет собой универсальное электронное устройство, предназначенное для автоматической обработки информации. В современном мире компьютер стал. . .	Информация и информационные процессы hw_wired 28.01.2025 Понятие информации и ее виды В современном мире информация является одним из фундаментальных понятий, пронизывающих все сферы человеческой деятельности. Под информацией понимают любые сведения об. . .	Алгоритмика hw_wired 28.01.2025 Введение: Основы алгоритмики и её роль в информатике В современном мире программирование и алгоритмическое мышление стали неотъемлемой частью образования и профессиональной деятельности. . . .	Информационное моделирование hw_wired 28.01.2025 Введение в информационное моделирование В современном мире информационное моделирование стало неотъемлемой частью научной, образовательной и профессиональной деятельности. Это мощный инструмент. . .	Объекты и их имена hw_wired 28.01.2025 Введение: Основы объектного подхода и их роль в информатике В современном мире информационных технологий объектный подход стал фундаментальным принципом организации и обработки информации. Этот. . .	Элементы алгоритмизации hw_wired 28.01.2025 Основы алгоритмизации В современном мире алгоритмы играют фундаментальную роль в развитии информационных технологий и программирования. Понимание основ алгоритмизации является ключевым элементом в. . .
Человек и информация hw_wired 28.01.2025 Введение: роль информации в познании мира В современном мире информация играет фундаментальную роль в процессе познания окружающей действительности. Она представляет собой совокупность сведений об. . .	Компьютер и информация hw_wired 28.01.2025 Эволюция вычислительных машин История развития вычислительной техники начинается задолго до появления первых электронных устройств. Человечество всегда стремилось упростить процесс вычислений и. . .	Информационные технологии hw_wired 28.01.2025 Введение в современные технологии работы с информацией В современном мире информационные технологии стали неотъемлемой частью практически всех сфер человеческой деятельности. Они существенно. . .	Информация вокруг нас hw_wired 28.01.2025 Основные понятия информации В современном мире понятие информации является фундаментальным и охватывает практически все сферы человеческой деятельности. Информация представляет собой совокупность. . .	Компьютер для начинающих hw_wired 28.01.2025 Введение в мир компьютерных технологий В современном мире информация стала одним из важнейших ресурсов человечества, определяющим развитие общества и технологий. Наша жизнь неразрывно связана с. . .	[golang] 189. Rotate Array alhaos 28.01.2025 Повороты рукоятки, целочисленный слайс нужно сдвинуть на целое положительное число. Мне очень нравится решение на GO / / https:/ / leetcode. com/ studyplan/ top-interview-150/ package topInterview . . .

Наверх