Форум программистов, компьютерный форум, киберфорум

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


КиберФорум - форум программистов и системных администраторов. Бесплатная помощь в решении задач по программированию, математике, физике и другим наукам, решение проблем с компьютером, операционными системами.
Войти
Регистрация
Восстановить пароль

Темы раздела Lazarus

Не заканчивается цикл
Пытаюсь перестроить циклы - не выходит с цикла. Если раскомментирую второй из вне цикл, а цикл с параметром закоментирую - всё работает. Вообще не понимаею в чём дело - всё должно работать. ...

Компилятор
В общем ситуация, есть две формулы которые применяются в некотором диапазоне, не буду абстрагировать диапазон значений переменной от которого вычисляется всё остальное 0-180. При значении в...

Как подключиться к базе в MySql (Maria db)?
Здравствуйте! Я разучил работа в Lazarus с SQLite и сейчас пробую подключиться к базе в MySql (Maria db). Установил XAMPP для Windows. Включил апач сервер и MySql (Maria db). Создал новую базу...

Создать класс из процедуры так, чтобы в нём при вызове можно было менять направление отсчёта счётчика цикла
Могу-ли я создать класс из процедуры так, чтобы в нём при вызове можно было менять направление отсчёта счётчика цикла, и некоторые формулы расчёта результата работы этого класса? Ранее я задавал...

Увидеть все не применяемые переменные
Они есть: например выделяю в части объявления переменных и скролю код вниз - нигде не подсвечивается. При компиляции зелёненькое сообщение что компиляция прошла успешно. Как - то пора с этим...

Чем событие Button Click отличается от события Button Click или крах компилятора ассемблерных оптимизаций
Это крах ассемблерной оптимизации в Lazarus - быть точнее крах компилятора, или что-то тут не так. Почему? Потому что нажатие на кнопку ничем не отличается от нажатия на кнопку. То есть всё...

Фатал еррор, ожидает "БЕГИН" находит"КОНЕЦ ФАЙЛА" ( Лазарь 2.2.0)
Не получается завершить код в Лазаре: Выдает Фатал еррор, ожидает "БЕГИН" находит"КОНЕЦ ФАЙЛА" ( Лазарь 2.2.0) 2: begin image3.Visible:=False; image4.Visible:=True; ...

Ошибка Position Range Overflow в Лазарусе
Доброй ночи! Программа выдала "Вызван класс исключений External, Position Range Overflow со ссылкой на файл customform.inc, следом появились ещё несколько предупреждений со ссылкой на wincontrol.inc...

Как вычислить координаты пикселей между двумя точками?
Доброго времени суток! Нужно вычислить координаты пикселей между двумя точками... Перепробовал все... Зашел в тупик. Может кто сможет помочь? Вот два моих примера: procedure...

DbNavigator refresh вызывает ошибка - Must apply updates before refreshing data
Здравствуйте! Делаю пример с пользование Sqlite.db в Lazarus. В базе имею одна таблица с несколько столбцов. На форме разместил SQLite3Connection1, SQLTransaction1, SQLQuery1, DataSource1,...

Windows.GetDC вызывает ошибку
Приветствую. Потребовалось мне внезапно делать снимки экрана, и обнаружилась странная проблема: строка видаa := Windows.GetDC(любой_HWD); вызывает "RunError(201) with message Range check error"....

Пакеты, компоненты, библиотеки для работы с сетью в Lazarus
Добрый день! Здесь продолжаю эту тему, вернее, хочется её конкретизировать. Программе необходимо работать с Get/Post запросами, загружать данные, периодически обновлять их. Гугл предлагает целое...

Сумма бесконечного ряда
Здравствуйте обитатели кибер форума. Нужна помощь в решении задания. Нужно найти сумму ряда оч точно. Желательно объяснить что и почему.

Про отладчик
Извините за нескромный вопрос - а я первый кому на ум приходит мысль о том, что очень удобно иметь отладчик работающий и в режиме интепретатора опционально, если изменения не касаются графического...

Кросплатформенный запуск на разных версиях линукс
Есть заготовка приложения с самодельно написанным блоком главного меню (см вложенный архив) меню реализовано в MainMenuFormUnit как обработчики нажатий на кнопки показа субменю следующего вида ...

Никто не писал редактор шрифтов на Lazarus ?
Никто не делал сабж ? нужна какая нить заготовка для редактора шрифтов с импортом из шрифтов винды, писать с нуля не очень хочется (не люблю интерфейсы), но нужна выгрузка шрифта в определенном...

А почему это вдруг компилятор считает как и я? Ведь его должны были вроде научить считать иначе - как и меня
Хотя если честно я уже и не помню как меня учили, но в общем мне не понятно почему компилятор считает как я procedure TForm1.Button1Click(Sender: TObject); var x,y,z:integer; begin x:=...

Автоматический перенос на вторую строку текста в одной ячейке StringGrid
Здравствуйте, подскажите, как сделать автоматический или хотя-бы через Enter перенос на другую строку текста в одной ячейке. Возможно повторяюсь по теме, но код который предложили в теме...

Действенный способ сменить знак + на -
Есть такой вопрос - допустим есть переменная равная или -1 или 1, она планируется к использованию в расчётах, к частому использованию. Умножать что-то на значение этой переменной, с целью последующей...

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

Гиф анимация
Люди помогите пожалуйста создал программу с гиф анимацией на лазарус, но когда перенес на другой комп программу, программа не открывается с гиф анимацией (другой комп не имеет лазаруса) и выдает...

Сменное выражение для проверки условия
Здравствуйте. Вот код генератора трассировки, которая указывает начиная от координат 28, 28 те координаты, коотрые за ними следуют, и 0 третьим значением если линя продолжается и 1 если закончилась....

Чтение текстового файла в StringGrid
День добрый !!! Помогите плиз создать программу на Lazarus чтение текстового файла в stringgrid Текстовый файла состоит: 1. Из 8 столбцов необходимо прочитать 2, 6, 7 столбец и вывести в...

Взаимодействие копий программы
Не знаю, в какой раздел этот вопрос, но, поскольку программа будет на Lazarus, то и вопрос сюда. Есть где-то на сервере база данных (пусть PostgreSQL, хотя это неважно). В базе данных есть некоторое...

Свой компилятор к среде Lazarus, или частично свой
Интересует только модуль Math, ну и так вообще. Ведь можно использовать много компиляторов? Я понимаю что у меня на это просто нет времени и даже знаний среды. Но вопрос можно считать чисто...

Пошаговый вывод TStringGrid или её обновление в теле цикла заполнения
Таблица заполняется в цикле, а выводится только при прекращении работы цикла. Но мне надо не быстро а пошагово, и с паузами sleep(x). Можно как-то обновлять её что-ли из цикла? Просто картинка не...

Интерполяция данных в StringGrid
Добрый вечер! Подскажите, пожалуйста, как сделать линейную интерполяцию данных (x, y) из двух столбцов в StringGrid так, чтобы: 1. интерполированные данные отображались в двух других (новых)...

TTreeView
Буду переводить свои программы с Delphi на Lazarus в связи с глобальной тенденцией перехода с Windows на AstraLinux. В связи с этим, буду тут, видимо, частым гостем. Поставил Lazarus, бегло...

ACCESS VIOLATION
После нескольких удачных запусков начала выскакивать ошибка, никаких предпосылок для неё вроде не было. Ошибка, появляющаяся при закрытии программы: ACCESS VIOLATION Также при повторной попытке...

Рассчитать, сколько четных цифр в первых пятидесяти цифрах числа пи
Помогите сделать программу на лазарусе. Рассчитать, сколько чётных цифр в первых цифрах числа пи (50 цифр после запятой).

Сделать транспонирование матрицы
Подскажите, как сделать транспонирование матрицы, пожалуйста. Вот код. Он почему-то не работает. Мне нужно, чтобы транспонирование делалось для матрицы любой размерности. procedure TForm1....

Не работает переименование директории
Приветствую, господа! Ситуация следующая: я пишу файловый менеджер и дело дошло до процедурки переименования папки. Нашел в интернете функцию для изменения названия и написал эту процедурку. Однако,...

Определить и вывести минимальный элемент массива и его номер
Помогите с решением задачи: Введите одномерный массив о (-3.1, 2.8,, 5, 7.7, - 7.5, 7.6, 3, 0). Определите и введите минимальный элемент массива и его номер

Отображение больших лог-файлов (>500Мб) как реализовать?
Имеются лог-файлы, содержащие текстовую информацию, размером несколько сотен Мб. Необходимо организовать просмотр этих файлов, поиск подстрок, с оптимизацией используемой памяти, т.е. чтобы не...

Ошибка компиляции "Невозможно найти StrUtils"
Здравствуйте. Подскажите пожалуйста. При компиляции в программе Lazarus выдаётся следующая ошибка и открывается какое-то окно. Ничего не понимаю. приложил снимки экрана.

Программа-калькулятор для матриц 2 × 2
Создание проекта с использованием компонентов для работы с текстом П22-1-15 Программа-калькулятор для матриц 2 × 2. Пользователю доступно задание матриц 2 × 2 и кнопки +, -, *, /, =, C ...

Необходимо вывести на экран таблицу значений функции Y (x) и ее разложения в ряд S (x)
Необходимо вывести на экран таблицу значений функции Y(x) и её разложения в ряд S(x) для х, изменяющихся от xn до xk с шагом h=(xn-xk)/10. Близость значений S(x) и Y(x) во всём диапазоне значений x...

Delphi vs Lazarus
Пытаюсь перевести свою Delphi-программу на Lazarus, чтобы скомпилировать в Linux и Mac. Столкнулся с большим количеством непонятных ошибок и проблем, так что начинаю подозревать, что лучше остаться...

Подключение по https с использованием Indy
Столкнулся с такой проблемой. При подключении к некоторым сайтам с помощью TIdHTTP в связке с TIdSSLIOHandlerSocketOpenSSL не могу получить содержимое страницы. Ошибка не выдается, но в строке только...

Длительная задача и принудительное снятие
Если программа выполняет длительную задачу, довольно быстро возникает статус "не отвечает", и вскоре происходит принудительное снятие системой Windows. Можно ли этого как-то избежать?

Убрать негативный эффект от применения ассемблерных вставок
Проверено, что чем больше ими заменяешь проверок условий - тем медленнее работает код, хотя код простой и короткий и должно быть наоборот. Можно ли как-то убрать этот эффект?

IP-адрес компьютера
Можно с помощью приложения Lazarus определить IP-адрес компьютера, на котором это приложение запущено? Я пытался найти ответ на этот вопрос в интернете и, вроде, нашел его вот здесь:...

Первая настройка Lazarus
Уже двадцать лет не программировал... Установил Lazarus для Win64. При запуске не нашлось два файла: fppkg.cfg и fpc.cfg Первый создал заново, второй автоматически: fpcmkcfg -d...

Работа с одномерными массивами
1.Заполнить массив случайными числами из промежутка вещественные 2.Даны два массива A и B. Подсчитайте количество тех i, для которых: а) А < B; б) A = B; в) A > B. 3.В одномерном массиве,...

Компонент RS232Port для Lazarus
Здравствуйте. Может кто-нибудь работал с этим компонентом и может выложит пример.

Не работает программа для игры "крестики-нолики"
Пишу ИИ для крестиков-ноликов 4*4, но почему-то не работает //1 - крестик, 0 - нолик, 2 - пустота function minmax(var a_number:mas; depth:integer; maximazing:boolean):integer; // 1 -...

Авторизация в лазарусе
Имеется два едита и кнопка, при регистрации пользователя, эти данные по попадают в таблицу AVT, в ячейки LOGIN и PASS соответственно. Хочу чтобы при входе в форме входа , вводить в элиты логин и...

Дана непустая последовательность слов из строчных русских букв
Дана непустая последовательность слов из строчных русских букв; между соседними словами - запятая, за последним словом - точка. Напечатать в алфавитном порядке: все звонкие согласные буквы, которые...

Вращение фигуры вокруг оси oy
мне нужно написать программу, для вращения ромба вокруг оси в Image.canvas с помощью lineto(). Я не могу определить по какому закону будут двигаться точки при вращении вокруг вертикальной оси y. как...

Многомерные массивы. Поиск строк, элементы которых расположены в убывающем порядке
Дан массив А целых чисел. Записать в файл номера строк, элементы которых расположены в убывающем порядке. var Form1: TForm1; i,j,n,m:integer; a:array of array of integer; s:string; ...

Есть ли декомпилятор для lazarus
Здравствуйте. Есть ли декомпилятор для lazarus (Линукс) ? Есть программа а исходников нет. Что может помочь ? Спасибо!

Анимация колеса, катящегося с горки
Здравствуйте! Помогите, пожалуйста! Дали задание модифицировать программу в Лазарусе. В программе колесо катилось прямо по прямой. Необходимо из этой программы сделать анимацию колеса, катящегося...

Описать функцию Sum(A), вычисляющую величину
const n = …; m =…; {целые константы >1} type матрица = array of real; Описать функцию Sum(A), вычисляющую величину x1*xn+x2*xn-1+...+xn*x1, где xi – максимальный элемент i-ой строки матрицы А....

Модуль Math считает или с ошибками, или с грубыми округлениями, ну очень грубыми
Сам проверить не могу что он делает точно, и теперь вы мне точно обязаны помочь разобраться в этом, иначе вы и никакие эксперты, а так :). Шутка, большое спасибо модераторам раздела , знатокам и...

Проблема с редактированием данных в выделенной строке
Проблема в том, что при выделении строки и при нажатии "Редактировать", открывается пустая форма и что-то редактировать нельзя, при удалении проблем нет. Как решить это?

Error: Incompatible types: got "Real" expected "LongInt"
unit1.pas(68,20) Error: Incompatible types: got "Real" expected "LongInt" procedure TForm1.Button2Click(Sender: TObject); var a,b : array of integer; i,n,k,s,j: integer; summ : real; ...

Ошибка при компиляция проекта с фреймов
Здравствуйте! Я изучаю работа с фреймы в Lazarus и делаю как в это видео: https://www.youtube.com/watch?v=bQ9ORTMByG8 Но когда начинаю компиляцию возникает следующии ошибки: Compile Project,...

ppi png файла
А нет ли здесь, случайно, функции, позволяющей узнать разрешение картинки? Не хочется ещё и на такую мелочёвку время тратить. Добавлено через 4 часа 46 минут Ну, видимо, нету. Ладно, изобретём...

Создание БД в Lazarus
Не увидел компонента в lazarus для того, чтобы создать новую БД, например, в PostgreSql, или другой СУБД (кроме SQlite, там она создаётся автоматом). Для компонента TSQLConnector надо указать уже...

Локализация меток в рантайме
Допустим есть код с метками, указатели на которые определяются немного за его пределами, но в общем почти там-же. Это отлаженная часть некоторого движка, и в общем лезть туда с измами - не комильфо....

Метки локальные и глобальные
Такой вопрос: допустим что в процедуре имеется метка или переменная, пусть будет essence. procedure MyProc var essence, essence1: integer; procedure MyProc_1 var...

В Ubuntu не работает TOpenGLControl. Wayland
На отрисовке виснет. Драйвера установлены. Даже в "мир кораблей" гонял на port proton, пока обновлять игру не надоело. Добавлено через 38 минут При отрисовке сцены, 2 d рисует нормально.

DBGrid многострочный заголовок
Здравствуйте, подскажите пожалуйста как создать многострочный заголовок таблицы DBGrid в Lazarus. На форумах рекомендуют использовать пакет RxDBGrid. Этот пакет я скачал по ссылке...

Найти коэффициенты многочлена
Даны действительные числа а,...,a. Найти коэффициенты многочлена (x-a0)*(x-a1)*...(x-a5). Помогите пожалуйста. Долго думала, смотрела похожие задачи, но не получается ...

"Парные картинки"
Всем привет...я учусь на 3 курсе и у меня впереди курсовая, сказать честно я вообще понятия не имею в Лазарусе. Может кто помочь написать "Парные картинки" поле 4×4 6×6 или...хотя бы дать исходник...

Lazarus на MacOS - права доступа для записи *.ini файлов
При создании приложения использовал Lazarus 2.2.4 и Windows 7 Для сохранения настроек и пользовательских данных использовал два компонента IniPropStorage и XMLPropStorage (почему два разных - чисто...

Форма скрываемая при потере фокуса
Есть приложение, в котором несколько форм, причем одна из форм показывается по нажатию кнопки на главной форме и скрывается если теряет фокус На Win работает код обработчика формы скрывающейся...

Добавление свойства к стандартному компоненту, это возможно?
экспериментирую с TODBCConnection. добавил новое свойство: private ftest:string; published property test:string read ftest write ftest; выполнил Build Lazarus... ожидал, что...

Почему в Lazarus не работает CopyRect с TBitmap?
Возникла необходимость скопировать содержимое канвы PaintBox в битовую матрицу. CopyRect прекрасно работает, если необходимо выполнить копирование из PaintBox в Image и наоборот, а вот с TBitmap...

Найти суммы элементов строк матрицы
Добрый вечер! Помогите написать программу с многомерный массив в Lazarus на задачу "Дана действительная матрица. Найти числа b1,…,bm, равные соответственно суммам элементов строк."

Ошибка при запуске программы
При открытии проекта какая-то ошибка, перелазил всё и не знаю, как решить данную проблему. По сути, что из-за представляет программа. Во 2 форму заполняются данные и выводятся потом в стринггрид

У лазарус много окон можно ли сделать так чтобы они открывались как одно окно
Сообщения, инспектор объектов, редактор исходного кода, форма. Можно ли это уместить в одно окно, а то если начинаешь работать с другими программами что бы вернуться к лазарус надо ткнуть на все эти...

Проблема вызова функций из библиотеки в Win и Linux
Доброго всем дня. Есть библиотека написанная на C. На Win10 собрана в MSVS 2022, в Linux как обычно. Динамически загружается с помощью LoadLibrary и GetProcedureAddress. Например функция...

Сущности DXF как компоненты
Доброго времени суток! Пишу программу для загрузки DXF и дальнейшей передачи на станок с ЧПУ лазером. Пробовал использовать fpvectorial. Рисует вроде неплохо, но вот выбор отдельного элемента, это...

Нарисовать цветок розы
Необходимо написать программу в Lazarus, чтобы при работе кода рисовался цветок розы

Проблемы перебора символов в строке
В Delphi (в кодировке Win1251) для перебора символов в строке я делал, например, так: for i:=1 to Length(s) do if s='Б' then s:='B'; Здесь так не проходит. Всё, что я придумал, на основе...

Создать документ с информацией в Word с Лазаруса
Помогите! В лазарусе новичок, не могу найти и понять как с помощью лазаруса создать документ Word с информацией Заранее спасибо!

ABC – анализ продаж товаров
Нужно написать программу, которая обеспечивает отражение продаж и формирование отчета По АВС-анализу. ABC – анализ строится на том принципе (закон Парето), что, как правило, 80% от всего объема...

Проблемы с прорисовкой регионов (HRGN) на канве
Доброго времени суток! Реализовал отрисовку DXF с помощью регионов на канве. Даже разбил элементы по уровням отрисовки, т.е. сначала большие по размеру, за ними меньшие, вписанные в большие. Но...

Какую версию нужно ставить на Ubuntu
Не нашёл RPM она или нет, нашёл только что основана на Debian. Для скачивания предлагается Linux DEB Releases Lazarus Linux i386 DEB (32 Bits) Lazarus Linux amd64 DEB (64 Bits) RPM Releases...

jmp в ассемблерных вставках в коде
Такой вопрос, я понимаю что мой "тракто" уже замазолил наверное всем глаза, но тем не менее в коде я использую такие ассемблерные вставки для прыжков, код под спойлером, и вот мне говорят буд-то бы...

DBGrid: автозаполнение ячейки
Здравствуйте, подскажите пожалуйста. Как в Lazarus в DBGrid, сделать автозаполнение ячеек. Т.е при изменении данных одной ячейки, данные другой ячейки менялись. Например изменяя кол-во...

Вставить сравнение значения поля ввода в запрос
Здравствуйте! Как можно вставить сравнение значения поля ввода в запрос ? А именно значение Combobox в Lazarus. То есть мне надо сделать выборку в зависимости от того какой пункт выбран в...

Кодировка indy10 под Linux
Добрый день, немного затрагивая мою предыдущую тему: https://www.cyberforum.ru/lazarus/thread3120695.html Сообщение отправляется по SMTP на mail.ru почту из под Linux. Но имеется проблема с...

Необычное поведение формы
На рис.1 вновь созданная и показанная (ShowModal) форма (по сути, отдельный компонент). Сама форма и все компоненты на ней создаются динамически. Слева Tlabel-ы, справа TEdit-ы. TEdit-ы, имеющие...

Парные картинки
Снова здравствуйте...в прошлый раз никто не помог...надеюсь сейчас помогут...вообщем Я сделал эту игру...но у меня 2 огромные...нет 3 огромные проблемы...я не понимаю какой код нужен для рандома,...

Определить, какая из двух букв «a» или «o» чаще встречается в данном тексте
Помогите с решением задачи: Определите, какая из двух букв «a» или «o» чаще встречается в данном тексте?

Как сделать, чтобы приложение было всегда в фокусе?
как сделать так, чтобы фокус всегда переключался на приложение? constructor TForm1.Create(TheOwner: TComponent); begin inherited Create(TheOwner); Application.OnDeactivate:=@AppDeactivate;...

Баг в Lazarus 2.2.6
Lazarus 2.2.6 Ubunta 22.04 LTS , если сделать заглавие колонок и строк то TLabel обновляется только при нажатии курсором на форму приложения. Убрал заглавие - компонент сразу стал обновляться как...

Записная книга со StringGrid
Выдает ошибку «unitsurnamelist.pas(59,13) Error: Variable identifier expected». unit unitSurnameList; {$mode ObjFPC}{$H+} interface uses Classes, SysUtils, Forms, Controls, Graphics,...

Не открывается ни один файл из проекта, кроме *.ехе
Здравствуйте. Следующая ситуация: если делаете проект в Lazarus дома, приносите его в школу, пытаетесь открыть на школьном компьютере, то ни один файл, кроме .ехе не открывается. Исходный код,...

Модульное программирование классов. Access Violation при попытке обратиться к переменным внутри класса.
Access Violation при попытке обратиться к переменным внутри класса. Сам модуль unit unitAreas; {$mode ObjFPC}{$H+} interface uses

Две одинаковые метки
В цикле есть блоки разного кода, которые работаю парно, и некоторый код между ними можно ли сделать так asm jmp p end; p1: ... ...

TMenuItem, подменю, реакция на клик по пункту подменю
Научите как обработать клик на пункте подменю TMenuItem если их несколько. А, если есть два родительских TMenuItem и у каждого по 5 пунктов подменю можно ли одной процедурой обработать клики по...

Как разблокировать файл ехе в Лазарус?
как разблокировать файл ехе в лазарус пожалуйста прошу

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

Создание нединамических типизированных массивов в процессе выполнения кода
Такой вопрос возник, в связи с тем что я в общем увидел что так или иначе прийдётся изменять размеры карт по осям, если не хочу терять быстродействия генератора карт. То-есть прийдётся вводить...

Задать границы визуального компонента
что то не понимаю как задать форму визуальному компоненту... unit VButton; {$mode ObjFPC}{$H+} interface uses

Считывание параметров из файла
Есть файл в, с которого в двумерный массив нужно записать 50 значений, каждое содержит по 7 параметров. { "type1": { ...

Найти сколько четных цифр стоит на четных местах (начиная со старшего разряда) в исходном числе и вывести их
Дано число. Вывести цифры исходного числа через пробел. Найти сколько четных цифр стоит на четных местах(начиная со старшего разряда) в исходном числе и вывести их через запятую. Найти максимальную...

Инициализация полей классов
Всем здравствуйте. const FREQ = 10; // Эти константы будут использоваться только внутри класса. Куда их поместить DEL_DAY = 900; INTERVAL = 3; type {$PACKRECORDS 1} ArchData...

Построение графика функции
Добрый день!!! Помогите мне, пожалуйста, мне очень срочно надо создать проект построения графика функции y=cos(x)/(1-x), где x принадлежит от -пи до пи с помощью компонента TChart, заранее огромное...

Возведение в произвольную степень
Доброго... времени, кода - всего :) Запутался, как возвести число в произвольную степень? В данном конкретном случае в отрицательную целую степень. В книжке Мансурова написано - Xn=en*ln(x) В...

Как изменить цвет формы?
Нужно вобщем сделать так: Столбик RudioButton-ов с названиями цветов. Кнопка Смена цвета Выбираешь цвет, жмёшь кнопку-и форма должна поменять цвет. Я так понимаю, что надо по клику на кнопку...

Калькулятор сделанный на Lazarus
Искал везде код калькулятора под Lazarus. Нигде не нашел. Пришлось делать самому) Этот калькулятор полная копия обычного калькулятора в Windows 7.

Ошибка: Проект вызвал класс исключения External:SIGSEGV
Привет! Работаю над приложением для работы с оценками учеников. Решил начать с раздела настроек. При вводе кол-ва оценок учащихся проект вызывает класс исключения External:SIGS EGV. Данные вводятся...

Базы данных в Lazarus
Хочу написать какую-нибудь программу на Lazarus'е... еще никогда не пробовал писать базы данных. Хотелось бы создать нечто наподобие базы данных "По красивым местам планеты", ну или что-то в этом...

Ошибка: project1.lpr(1,1) Fatal: Syntax error, "BEGIN" expected but "end of file" found
project1.lpr(1,1) Fatal: Syntax error, "BEGIN" expected but "end of file" found выдает эту ошибку при компиляции. Написал самое элементарное : procedure TForm5.Button1Click(Sender: TObject);...

Последовательность a1, a2, …, an состоит из нулей и единиц. Поставить в начало этой последовательности нули
Здравствуйте! помогите, пожалуйста, написать программу на языке паскаль в лазарусе. Для всех задач входные данные записываются в файл input.txt, а выходные в output.txt. По окончании работы над...

Получить количество записей в таблице SQLite
В процессе создания приложения возникла огромная куча вопросов по работе с БД в Lazarus. Вот несколько наиболее актуальных для меня вопросов по этой теме: 1. Необходимо получить информацию о кол-ве...

Сохранение файла в exe
Помогите пожалуйста!!! нужен код для лазарус, чтобы при нажатии кнопки сохранить, сохранялся исходный код, т.е. файл проекта exe. чтобы потом можно было его свободно открывать без программы

Создание калькулятора на Lazarus
Сделал калькулятор, но проблема в процентах, он выдаёт не тот результат который должен получится. Ещё когда нажимаешь на 0, он может ставится бесконечно. Помогите пожалуйста. unit Unit1; ...

Ошибка "Fatal: Syntax error, ";" expected but "." found"
звучит задание: создай программу, в которой можно преподнести введенное пользователем число к указанному степеню. покапавшись на всяких форумах и тп, написал код. вроде бы все ок. но при...

Составить программу 'Крестики-нолики'
Доброго времени суток! Очень нужно к завтрашнему дню составить программу на lazarus крестики нолики (поле 3X3). Помогите пожалуйста, а то я очень слабо ориентируюсь в программировании! Заранее...

Ввод и сохранение данных в текстовом файле
есть программа для решения систем типа: a11x1+a12x2=b1 a21x1+a22x2=b2 надо сделать так,чтобы данные а11,а12, а21,а22,б1,б2 брались с текстового файла и чтобы ответ х1,х2 выводились в текстовом...

RadioGroup
Помогите выполнить задание: На городской субботник деканат закрепил за группами электроснабжения следующие объекты: 99Э1 – территория у входа в 14 корпус; 99Э2 – аудитория 15201; 99Э3 – коридор 2...

Как поменять иконку исполняемого файла exe?
как поменять иконку исполняемого файла exe?

Картинка на фон формы
Картинка на фон формы. Это реально?

Список команд для lazarus
Прошу дать мне список команд в программе lazarus данная программа использует язык paskal

Изменение цвета при нажатии на кнопку
Изначальный цвет-зеленый. После каждого нажатия изменяется цвет формы в последовательности зеленый-красный-желтый. Помогите

Написание приложений под Android на Lazarus-е
Здравствуёте! Хотел бы поделиться своим впечатвлением о написании приложений под Android на Lazarus-е. Гуру Delphi и Lazarus-а прошу строго не судить - я не профессиональный программист, а...

Решение квадратных уравнений через графическое приложение
Всем привет, сказали сделать приложение через которое решаются квадратные уравнения вида ax^2+bx+c=0 Создал 6 полей Edit, в первое поле записать число a, во второе b, в третье c, в четвертое x1, в...

Error: Illegal expression
Выдает ошибку unit1.pas(613,34) Error: Illegal expression в в последней строке из двух copyTimeBoxMaxY := AOfLabelInATimeBoxMaxY; copyTimeBoxMaxY.nalichie = true; при условии что в типах...

Задачки) Умоляю, помогите...
1. Создайте приложение «Как дела?», которое запрашивает имя пользователя с помощью текстового поля Edit, и выдает личное приветствие с помощью метки Label. Например, если пользователь ввел «Олег», то...

Событие при нажатии клавиши Enter
Как создать событие которое активируется при нажатии клавиши Enter? Или любой другой?

Округление реального числа к большему целому
Подскажите пожалуйста функцию лазаруса для округления реального числа к целому, но к большей части, например 1200/500=2.4? а надо что бы выдавало не 2, а 3, а то функция Round к меньшему...

Как запустить другую форму
При запуске автоматически запускается Form1, а как запустить в начале, например, Form2? И как правильно переключаться между формами, например, мне необходимо попасть в настройки моей программы и я...

Программное создание DXF-файлов
Здравствуйте! Всех с наступающим Новым годом!!! Хочу поделиться опытом программного создания DXF-файлов - вдруг кому-то пригодится. Сам не раз пользовался полезными советами и чужими примерами...

Как перейти с одной формы на другую?
Помогите кто знает как из одной формы в другую перейти??? Два раза кликаю по кнопке procedure TForm1.Button1Click(Sender: TObject); begin Form2.show; end; прописываю но не...

Как нарисовать треугольник?
Помогите пожалуйста. Пишу программу для построения графиков. Вся математика и процедуры написаны ранее. Мне нужно только разобраться в коде и разбросать его по нужным местам. Для понимания, как оно...

Как русифицировать Лазарус?
чтоб Lazarus русофицировать? Ребята, подскажите.

Заливка кнопок в Лазарус
Можно ли менять цвет фона кнопок в Лазарус?

Закрыть форму
Доброго времени суток. Помогите пожалуйста. У меня есть форма с главным меню. Я решил сделать закрытие через диалоговое окно. procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: boolean);...

Как запустить программу в Lazarus?
установлена Free Pascal Lazarus версия: 1.2.0 написал простенький код. жму в меню Запуск - Запустить. всплывает маленькое пустое окошко Form1 и ничего не происходит, хотя в шапке программы...

Как принять данные с COM-порта, используя Synaser?
Здравствуйте. У меня на компе 2 закольцованных COM-порта: на одном моя программа, на другом терминалка. Есть модуль Synaser из библиотеки Synapase. Как принять с порта один/пакет байт? Дайте рабочие...

Парсинг txt файла, как лучше сделать?
Задача следующая есть стандартный txt файл, его размерность может достигать до 1-2 Мб Его структура примерно такая... (0/ 1;"Сваи_пружинки"; 2:"Microsoft";/ 2;5/ 23; 10 2 12 4 6 0...

Ошибка: Incompatible types: got "Double" expected "LongInt"
Всем привет программирую на Лазрусе простая задача выдает ошибку unit1.pas(46,36) Hint: use DIV instead to get an integer result unit1.pas(46,18) Error: Incompatible types: got "Double" expected...

Учёт кодировки
var f:textfile; c:char; begin AssignFile(f,'file.txt'); ReSet(f); Read(f,c); // Как здесь прочитать символ, не зависимо от дефолтной кодировки? Например, у меня на убунте...

Как убрать ошибку: Can't create object file: Calc.exe (error code: 5)?
Calc.lpr(20,1) Error: Can't create object file: Calc.exe (error code: 5) Calc.lpr(20,1) Error: Can't create executable Calc.exe Делал, делал калькулятор, а тут вот такое, а главное раньше всё...

В Lazarus помогите справиться. Создание мини-игры
Я создал в Lazarus что то наподобе игры. Естественно для ознакомления и учебы... У меня получилось что изображение image1 двигается по полю клавишами w,a,s,d командами left и top. А...

Нужно сделать Калькулятор в проге Lazarus 1.6.2
Нужно сделать Калькулятор в проге Lazarus 1.6.2 Проект, в котором нужно вычислить сумму, разницу, произведение или деление нужен код

Error: Identifier not found
Помогите мне с работой в лазарусе. Так как изучать начала его сравнительно недавно, никак разобраться с ошибками(( procedure TFormOptions.ButtonOkClick(Sender: TObject); Var MyColor:TColor;...

Запуск стороннего приложения из лазаруса
Доброго времяни суток. Как в лазарусе открыть сторонний файл? например ярлык или текстовый документ или программу? как в делфи открыть мне уже говорили но с лазарусом проблемы.

Текстовые файлы лазарус
Здравствуйте. Есть вопрос по лазарусу. Как очистить текстовый файл и как создать текстовый файл с заданным именем через лазарус?

Ошибка External: SIGFPE
Помогите пожалуйста исправить ошибку. Нужно было сделать программу, которая бы решала многочлен методом barstow (деление на многочлен), но при вычислении dr (39 строка) программа выдает ошибку ...

Как исправить Warning: Local variable "x" does not seem to be initialized
как исправить эту ошибку unit1.pas(50,10) Warning: Local variable "x" does not seem to be initialized unit Unit1; {$mode objfpc}{$H+}

Как правильно написать условие if ?
имеются три поля tedit. и кнопка "сложить". условие такое: если в полях tedit1 и tedit2 пусто или записаны не числа, операция сложения tedit1 и tedit2 не происходит. а если в полях tedit1 и...

Звук в Лазарус
В Delphi в библиотеке System есть компонент MediaPlayer. В Лазарус я этот компонент нигде не нашла. Подскажите, пожалуйста, есть ли в Лазарус какой-нибудь аналог MediaPlayer? Если есть, то где он?...

Динамические TThread
Добрый день. Интересуюсь, как правильно создавать динамические потоки TThread, а ещё больше - как передать данные в каждый поток (заполнить стартовый массив, так сказать), а потом в главном потоке...

Работа с текстом и файлами в lazarus
Задача заключается в следующем:нужно открыть некий файл в котором есть текс,взять оттуда этот текст и вывести в окно программы,затем данный текст форматируется таким образом чтобы отступ слева был n...

Генератор случайных английских букв
Здравствуйте. Помогите пожалуйста! Нужно сделать генератор случайных английских букв .

Переход между формами
Здравствуйте. Помогите, пожалуйста. Хочу сделать программу с 2 формами, на 1 форме кнопка, при нажатии на кнопку 1 форма должна закрываться, а 2 открываться. Если использовать Form1.Close, то...

Программное создание события
Здравствуйте =) Допустим, я создаю, во время работы программы, кнопку, как мне этой созданной кнопке задать событие... ну например OnClick? Поиском пользовался, ненашел =)

Обработка исключений Lazarus - простейший пример
Здравствуйте. Научите меня правильно использовать обработку исключений на примере деления на ноль. Добавил просто блок try-except - оно не работает. Не нашел в интернете ни одного рабочего примера. ...

Ошибка: Can't open resource file
пишет такую ошибку Error: Can't open resource file "C:\Users\????????\Desktop\7.13\Unit1.dfm" проверьте что не так пожалуйста!!!!

Как установить Synapse?
Доброго времени суток! Пытаюсь пересесть на Lazarus, никак немогу прикрутить синапс =( По мануалу с http://www.ararat.cz/synapse/doku.php/public:howto:installsynapse неполучается. go to...

Почему не определяется идентификатор UTF8ToConsole?
Изучаю Лазарус по книге Мансурова "Основы программирования в среде Lazarus" При компилировании такой программы: program summa; {$mode objfpc}{$H+} uses FileUtil; {Подключение модуля...

Error: method identifier expected
Until1 unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, game, LCLType, ExtCtrls;

Добавить условие в Case
Составить программу, которая в зависимости от порядкового номера дня месяца выводит па экран его название. Значит вроде все работает, но нужно чтоб при выборе числа больше 12 какую нить ошибку...

Работа с UTF8 в Lazarus 1.6
Здравствуйте. При загрузке проекта в недавно вышедший Lazarus 1.6 получаю предупреждения, что функции работы с юникодом SysToUTF8 и UTF8ToSys не работают ("deprecated"). При компиляции и запуске...

Создание калькулятора в программе Lazurus
Как сделать так чтобы калькулятор не делил на ноль, а писал в окне "деление на ноль невозможно"? Как добавить запятую чтобы калькулятор мог считать десятичные дроби? Добавлено через 1 час 17...

Ошибка установки Indy в Lazarus
Текст ошибки: "lazarus.pp(1,1) Fatal: Невозможно найти indylaz, используемый в Lazarus, несовместимый PPU=C:\lazarus\components\Indy10_5298\Lib\lib\i386-win32\indylaz.ppu, пакет indylaz". Lazarus...

Ошибка: "Forward declaration not solved"
Добрый день. Есть такая программа:unit Unit2; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Buttons, StdCtrls;

OpenDialog и SaveDialog
Как сохранить и открыть программу через OpenDialog и SaveDialog. Подскажите пожалуйста код...

Кодировка, русский текст в консоли
Привет Ребята. Возник такой вопрос. Если создать новый проект в lazarus'e и написать к примеру в коде программы: writeln('Привет мир!'); то в командной строке вместо русского текста вылазит...

Таймер на форме
При открытии формы должен запускаться таймер, который автоматически начинает отчёт 20 минут (в обратном отчёте). Не получается реализовать, чтобы данный таймер срабатывал только на одной форме и...

При попытке открыть файл, в пути которого есть символы на кириллице, возникает ошибка: Unable to open file
Добавил на форму OpenDialog, Memo. При попытке открыть файл в пути которого есть символы на кириллице возникает ошибка Unable to open file. Как исправить?

Fatal: Can't find unit Unit1 used by project1
Написал элементарную программу на delphi, не компилируется. Вставил код в лазарус вот такая ошибка вылезает: project1.lpr(1,1) Fatal: Can't find unit Unit1 used by project1 Что это значит и как с...

Запуск консольных команд
Здравствуйте, хотел спросить а можно ли в Lazarus под linux запускать команды которые обычно применяются в консоли, просто под виндой есть bat файлы которые запускают обычные команды в определеной...

Рисование круга, прямоугольника, треугольника
я рисую круг, прямоугольник делаю это так: переменные у меня здесь implementation var y0,x0, xpos, ypos:integer; в процедуре procedure TForm1.Image3MouseDown(Sender: TObject; Button:...

Работа с файлами в ShellTreeView и ShellListView
На форме есть 2 ShellTreeView и 2 ShellListView. У каждого ShellListView в свойстве ShellTreeView указан свой ShellTreeView. Программа показывает структуру файловой системы. Хочу сделать...

Отправка письма на почту
Задача непростая: Дано Memo1 и Две кнопки ( любых ) Задача такая: пишем в Memo1 текст, например "Привет мир", жмем на одну кнопку и наше сообщение отправляется на почту. Не обязательно...

Создание кастомного меню для формы без заголовка
В связи с неотвратимостью технического прогресса в части увеличения разрешения экранов дисплеев до каких то на мой взгляд безумных значений (у меня на 13 дюймах 1980 по горизонтали) и одновременного...

Графический редактор на Lazarus'е
нужно сделать графический редактор. желательно через paintbox. не могли бы вы подсказать, как можно сделать чтобы рисовал только левой кнопкой мыши и как сохранять изображение в paintbox'е при...

Работа с файлами на Lazarus
В файле f записаны целые числа. Написать программу, которая в файл g записывает четные числа, а файл h - нечетные.

Ошибка: отсутствует файл fpc.cfg. Linux
При выборе компилятора пишет ошибку. Где должен быть fpc.cfg? Компилятор /usr/bin/fpc. /etc/fpc.cfg есть Проект не линкуется - неверные параметры для линкера

Светофор
Задание: смоделировать работу светофора. Изобразить светофор в виде трех окружностей на черном фоне, способных менять цвет от красного (верхняя окружность), до зеленого (нижняя окружность). Сигналы...

Компонент TChart: поточечное построение графика функции
В Delphi есть компонент TChar и в нем есть PointSeries, в Lazaruse я такого не могу найти, как построить точечный график функции??? Помогите, нужно для диплома.

Работа с сокетами
Здравствуйте, хотелось бы написать внутресетевой чат, понимаю, что изобретаю велосипед, но всё же ради тренировки и опыта. С этим хочу спросить вас: какой пакет лучше использовать для работу с TCP...

Ошибка "External: SIGSEGV"
procedure TMap.LoadImagesClick(Sender: TObject); var i:integer; begin if OPDPoint.Execute then for i:=1 to OPDPoint.Files.Count do begin ...

Обработка событий клавиатуры
В Lazarus можно обрабатывать события клавиатуры?

Поле ввода Edit
Здравствуйте, ув. программисты. Подскажите пожалуйста с заданием:по заданию пользователь должен вводить исходную последовательность чисел в компонент Edit по одному числу и нажимать Enter. а после...

Решение задач
Задано решить задачи. Успехов вообще никаких нет, помогите хоть с чем-то. Нужные задания: 1.24(пункт А) 1.26 2.21 2.28 4.2 4.9 4.23 4.78

Ошибка: Circular unit reference between Unit2 and Unit1
Доброго времени суток. На первой форме 1 кнопка, на второй 1 кнопка. Первая кнопка открывает вторую форму в обычном режиме и одновременно меняет цвет первой формы, вторая кнопка закрывает...

Cчитывание из файла текста в формате txt, и запись его в StringGrid
Доброе время суток!) С недавних пор начали писать программы в Lazarus.. За период обучения появились некоторые проблемы. Вообщем суть программы: В задаче надо считывать из файла текст, и записать...

Тест lazarus
Делаю тест ,единственное до чего додумался правильный и не правильный ответ выводить в "ShowMessage " (но так не красиво) , сложно подсчитать количество правильных .Думаю сделать что бы в 1 label...

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

Работа с регулярными выражениями в Lazarus
Уважаемые, скажите пожалуйста, как в Lazarus организовать работу с регулярными выражениями? Конкретно хочется очистить строку от всего, что не является цифрой, т.е. . Метод перебора всех символов...

Создание приложения
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Edit1:...

Построить график функции
построить график функции y=sin (x) (Лазарус) unit.

Ввод и вывод массива
Почему-то целые числа выводит, а на вещественные выводит ошибку? unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs,...

Перевод чисел в различные системы счисления
Написать программу в lazarus: перевод чисел в различные системы счисления. Создать форму на ней разместить Edit и переключатели.

Использование Random
Доброго времени суток. Нужно задать случайное число из промежутка random(5) + 8; Это верно?

Ошибка: "" is invalid float
Всем привет, пытаюсь считать в программе среднее арифметическое и программа ругается , подскажите что не так unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil,...

Вычисление факториала рекурсивным методом
помогите написать на лазарусе вычисление N! рекурсивным методом с использованием Edit,Label и Button. Заранее благодарна!

Массивы в Lazarus
Помогите наладить код...ругается на строку var mas: array of integer; Пишет: Can't evaluate constant exression var Form1: TForm1; i,j:integer; a,b:integer; implementation {$R *.lfm}

Как объединить все окна интерфейса Lazarus в одно единое окно?
Интерфейс Lazarus разбит на огромную кучу мелких неудобных окон. Можно ли как-то все их объединить в одно единое окно, которое закроет весь рабочий стол? В среде Delphi есть специальная настройка,...

Создать матрицы Lazarus
Помогите пожалуйста с задачкой по Lazarus(( задача:"5. Заданы четыре квадратные матрицы: A(n,n), B(n,n), C(n,n), D(n,n), в которых хранятся целые числа. Найти матрицу, в которой находится...

Ошибка: Syntax error, ";" expected but "BEGIN" found
Ошибка unit1.pas(529,1) Fatal: Syntax error, ";" expected but "BEGIN" found тут в строке с сообщением в комментарие, строка 40. Не понимаю почему. procedure Ordering; //type TValueSign = -1..1;...

Сделать форму для сложения двух чисел, можете объяснить как сделать
Cоздать форму для сложения двух чисел, можете объяснить как сделать, как работать с формой, паскаль знаю хорошо, но как делать с формой не знаю. помогите

Создание двумерных массивов
создать двумерный массив , куда можно будет заносить и читать от туда данные(тип string) для ежедневника

Множества в Lazarus
Всем здравствуйте! Надо сделать задачу в Lazarus Pascal, но столкнулся с непонятной проблемой! Когда я пытаюсь заполнить множество, он говорит мне что во множество можно положить только перечисляемый...

Выдаёт ошибки Fatal: Syntax error, "BEGIN" expected but "end of file" found. Пожалуйста посмотрите что не так, прошу!
Выдаёт ошибки Fatal: Syntax error, "BEGIN" expected but "end of file" found. Пожалуйста посмотрите что не так, прошу! unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils,...

Lazarus и GIF анимация
Задача поместить на форму в качестве фона анимираваный GIF. Руководства и нужных объектов я не нашел. Пробовал поместить на обьект Image но в ожидании анимации получаю статичную картинку. Не...

Random()
Использую в проекте функцию Random(); Подскажите пожалуйста как сделать, чтобы при каждом запуске программы генерировались действительно случайные числа (каждый раз генерируются одинаковые числа)....

Как форму во весь экран сделать?
Как сделать, чтобы при запуске проекта, форма отображалась на всю ширину и высоту экрана, не было видно пуск, рамку проекта лазаруса с кнопками свернуть, развернуть и закрыть. Чтоб на весь экран...

Чтение файла с русскими буквами
не получается - при печати - русские буквы вообще не печатаются (даже вопросов нет вместо русских букв) assignFile(f, OpenDialog1.FileName); reset(f); while not eof(f)...

Работа с потоками TThread
Работал с потоками по аналонии с Дэльфи. В Лазарусе компилируется нормально, но выполнение программы прекращается при попытке создать объект класса TLoadThrd. Я максимально упростил поток, оставив в...

Отловить подключение usb устройства к компьютеру
Доброго времени! Подскажите как в lazarus реализовать отлов подключения/отключения USB устройства к ПК? На delphi есть готовый код, рабочий... однако при переработке его на lazarus возникают...

Разъясните немного насчет Лазаруса Дельфи и Фри паскаля
Прошу не ругать,так как в програмировании разбираюсь очень мало,и инетерсует очень много. я вопросы буду задавать по номерам так легче вам будет отвечать:) Итак 1)Так на каком языке пишет...

Создание простейшего Блокнота
Может кто-нибудь создать в лазарусе блокнот, как в Windows? А то у меня есть некоторые нестыковки.

Изменение размеров Image
Image привязан якорями (Anchors) к форме. Однако, если поменять размер формы, то размер канваса не меняется. Чтобы изменить размер канваса можно, напрмиер, так (из OnResize формы): ...

Видимая и невидимая надпись при нажатии кнопки
Подскажите , как сделать , чтобы при нажатии на кнопку надпись становилась видимой ,а после второго нажатия невидимой .

Запуск только одной копии приложения
Как сделать, чтобы при попытке запустить ещё одну копию свёрнутого (находящегося на заднем плане, временно невидимого) приложения копия не запускалась бы, а то единственное приложение, что временно...

Преобразование чисел
Введите 2 целых числа. Преобразуйте числа в две строки, объедините их в одну и выведите на экран результат. Допустимые процедуры и функции: - Процедуры: Delete, Insert, Str, Val - Функции:...

Окна ShowMessage, MessageDlg
Приветствую всех! У меня возникла следующая проблема, я заметил, что окна showmessage и messagedlg останавливают выполнение программы , пока не нажмешь кнопку. Как сделать так, чтобы выполнение...

Считывание текста с Edit
Как в Lazarus считать текст со строки Edit? как считывать цифры я знаю, а вот как буквы незнаю....

Ошибка 103 при попытке чтения файла
Здравствуйте. После попытки чтения выдается ошибка runerror 103. Что нужно исправить? procedure TForm1.Button3Click(Sender: TObject); var f:file; s:file; i,j,p:integer; begin...

Ошибка: External "SIGSEGV" Error
Такая проблема: Я сейчас обучаюсь в институте после колледжа, и там некоторые предметы у меня была возможность перезачесть, просто так или что-то сделав. По одному из них мне сказали переделать мой...

Найти сумму чисел от 1 до n
Найти сумму чисел от 1 до n. Помогите с кодом, пожалуйста!

Свойства Top и Left
Здравствуйте всем. С какого краю фигуры мерится top и left?

Access + lazarus
Уважаемые гуру! Я новичок! Пытаюсь прикрутить базу MDB (Microsoft Access) в lazarus чере *.dsn файла + сама база *.MDB + DBGrid+ODBCConnection+SQLTransaction+SQLQuery+Datasource делаю следующие! ...

Программный код
Помогите разобраться с работой данного программного кода пожалуйста procedure TForm2.Button3Click(Sender: TObject); var i, j: integer; sl :TStringList; fl: boolean;

Условия с if/then
Всем добрый день! Итак, мне необходимо сделать в Лазарусе такую программу, в которой будут находится Edit, Label1, Label2, Button. Задача состоит в том, чтобы пользователь вводил в Эдит любое...

Ошибка: проект вызвал класс исключения 'EConvertError' с сообщением is an invalid integer
помогите пожалуйста разобраться при запуске программы выдает ошибку. ошибка: проект вызвал класс исключения 'EConvertError' с сообщением is an invalid integer сама задача: Создать класс обыкновенная...

Поменять местами четные и нечетные элементы массива
Помогите пожалуйста. Нужно в лазарусе программу написать. "Дан целочисленный массив,нужно поменять местами четные и не четные элементы"

Файл с каким расширением в Lazarus отвечает за проект, а какой за модуль главной формы?
Нужно название расширение файла проекта и название расширение файла модуля главной формы.

Функция power
вещественное число в вещественную степень

Нарисовать изображение (например, домик)
Господа форумчане)) В Lazarus совсем недавно, мне нужно составить графическое изображение в этой программе, ну например домик нарисовать или что то еще, можете кто нибудь дать пример или объяснить...

Генератор случайных чисел
Задание 3 кнопки 1 листбокс 1 кнопка-генерирует случайные числа 2 - генерирует случайные чётные числа 3 - очистить листбокс проблема: Identifier not found Edit1

Из под Windows в Linux
Скачал lazarus-1.0.8-fpc-2.6.2-win64.exe, установил, под вин компилется хорошо, как из под винды скомпилировать проект под линукс? В параметрах проекта указал ОС линукс, при компиляции выдает ошибку...

Где описываются глобальные переменные?
Подскажите,где в Lazarus описываются глобальные переменные

Рисование фигур на канве формы
доброго времени суток решил дополнить свой маленький пример поинта вставкой фигур квадрата и Элепса ну почему то при рисование элепса он слишком сужен а при рисование квадрата он мне выдвигает...

Даны три целых числа; возвести в квадрат отрицательные числа и в третью степень положительные
даны три целых числа возвести в квадрат отрицательные числа и в третью степень положительное лазарус

Русские буквы в пути к файлу
sf:=('C:\Учебное\text_file.txt'); AssignFile(f, sf); Rewrite(f); writeln(f, t); //ругается на эту строку CloseFile(f); При сохранении файла в директорию с русскими символами...

Как работать с Office Word из Lazarus
Преподаватель поставил задачу:создание отчета в MS Word из программы в Lazarus. Должен запускаться Word, в нем печататься текст, выводиться в таблицу инфа из StringGrid. И все это визуально должно...

Константа в виде массива строк
нужно создать массив строк как константу не понимаю как правильно написать ? const str:array of string=('11','22'); не компилируется.

Как работать с двумя формами?
У меня на одной форме находится кнопка TButton. При нажатии на нее, первая форма должна стать неактивна, вторая форма должна стать видимой, и надписи на метках второй формы должны измениться. в...

Путь к файлу
В папке с программой, там где лежит exe-шник, лежат еще 4 картинки, их нужно подгружать в image по изменению RadioButton'а. Как прописать это? Нужно чтобы работало еще и с флэшки, и.т.д, либо как-то...

Как извлечь год из даты?
Добрый день, не знаю как мне рассчитать год из даты рождения, к примеру 26.06.1996 ===> 1996

Ping в потоке
Добрый день всем! Стандартная задача для начинающего - пинг(в потоке?)! Задача: опросить сеть с максимальной быстротой на предмет "кто в сети" в диапазоне от 192.168.0.1 до 192.168.0.255. Результат -...

Игра змейка
Здравствуйте, требуется помощь! Может быть кто-то из форумчан когда-то писал игрушку змейку и готов ей поделиться, то я был бы вам очень благодарен! В лазарусе я человек начинающий и поэтому,...

Построить график в Chart по координатам из StringGrid
Доброго всем времени суток. У меня возник такой вопрос, каким образом можно построить график в Chart, по данным в StrinGrid? StrinGrid: Сформулирован следующим образом: имеется 2 столбца, и 15...

Найти площадь и периметр квадрата ABCD
Люди добрые прошу вас помочь в написании кода,этой задачки. Известны координаты вершин квадрата ABCD: A(x1, y1) и C(x2, y2). Найти его площадь и периметр.

Сохранение форматированного текста RichEdit через SaveDialog
Переделал код билдера в лазарус. Посмотрите пожалуйста так это должно выглядеть? Вот исходник на билдере: https://www.cyberforum.ru/cpp-builder/thread966950.html а вот что я думаю в лазарусе...

Нужно ли выложить проект в Lazarus отдельной темой?
В проекте - чтение символов MNIST, работа с OpenGL. Работа над альтернативой свёрточным нейросетям. далее будет нейросейть прямая, но не простая. Простая прямая - это когда каждый нейрон слоя...

Как сделать игру "Пятнашки"?
Мне бы посоветовать как сделать игру "пятнашки", а то не пойму как её делать... Как определить в какой квадратик тыкнул.. как переставлять и т. п. Во игра как должна выглядеть на paint'е нарисовал)...

Код символа (кириллица)
Всем привет! Перерыл кучу информации, перепробовал множество вариантов, но так ничего и не получилось. В общем смысле задача следующая. Дан файл (в моем случае file of char), необходимо...

Запись данных в текстовый файл
Всем здравствуйте. procedure TForm1.Button1Click(Sender: TObject); var f: TextFile; s:string; v:real; begin AssignFile(f, 'proba.txt'); if not FileExists('proba.txt') then ...

Связать пункты TreeView со значениями
Как можно (средствами самого контрола) приписать значение к определенному итему? Что-то вроде TreeView1.Items.Item.text='текст'; TreeView1.Items.Item.value='значение'; //подобный код видел,...

Движущаяся фигура (управление с клавиатуры)
Решил начать своё знакомство с Lazarus с простой программы, суть в том, что фигура(квадрат) двигается по полю, по нажатию кнопок "w" "s" "a" "d". Разобрался как реализовать данное действие только для...

Русский язык в консольных приложениях
Консольное приложение под Windows 10 Добавляю в список зависимостей проекта LazUtils составляю тестовую программу program LazTest; uses LazUTF8,Windows; begin SetConsoleOutputCP(CP_UTF8); ...

3D графика в Lazarus
Такое дело, написал тулзу успешно, конические шестерни печатает, в общем она просто вносит корректировку в G-код. Но аппетиты растут, после русификации, для себя и 3dtoday чисто, Kisslicer 1.5...

Как снять выбор с RadioGroup/CheckGroup?
Как убрать выбранные галочки и/или кружочки с radio и check group с помощью одной кнопки? Lazarus Или как убрать выбранные ранее галочки и/или кружочки (обнулить выбранные ответы) может быть и без...

Создать графический редактор
unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, PrintersDlgs, Forms, Controls, Graphics, Dialogs, ExtCtrls, Menus, Buttons, ExtDlgs;

Запуск, удаление и остановка потока
Смотрел документацию на http://wiki.freepascal.org/Multithreaded_Application_Tutorial/ru , однако найти ответы на свои вопросы не смог. Создаю поток (Button1Click), который должен запускаться не...

Цветная кнопка
Добрый день, хелп плииииз! Глупый вопрос, но не нашел ГОТОВЫХ компонент, только "как нарисовать" или "попробуем написать". Под делфи было куча! Мне нужен аналог TButton, но с указанием цвета...

Дано два числа a и b. Найдите гипотенузу треугольника с заданными катетами
Гипотенуза Дано два числа a и b. Найдите гипотенузу треугольника с заданными катетами. Входные данные В двух строках вводятся два числа (числа целые, положительные, не превышают 1000). ...

Эффективная работа с Bitmap, адекватная скорость прорисовки
Здравствуйте, товарищи программисты! Возник у меня вопрос относительно работы с графикой в Lazarus. (использую Lazarus IDE v1.0.4) Программа должна по нажатию кнопки генерировать и выводить в...

Ошибка "Error: Wrong number of parameters specified for call to "FloatToStrF""
и снова я. задание: создайте программу, в которой можно найти максимальное из четырех заданных ризных целых чисел пр условии, что каждое число подается в положительном виде, даже если пользователь...

Edit. Ввод только цифр?
Здраствуйте. Искоал кроссплатформенный метод как же в Edit вводить только цифры включая контроля за буфером. Кроме как включения NumberOnly не нашел ничего а данный способ не годится из за того что...

Как запретить изменения размера формы?
Как я могу запретить изменять размер формы? Чтобы вот как открылась форма, так и была, чтобы нельзя было менять её размер?

Error: Undefined symbol: WSRegisterCustomImageList
Помогите, пожалуйста, не пойму, почему не работает программа? unit Ir3; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, ...

Вывод списка файлов в Lazarus
Как вывести список файлов из каталога и отсортировать их по дате, типу и размеру???

Вывод дерева каталогов в форму
Необходимо реализовать приложение, отображающее дерево каталогов и файлов. При запуске программы пользователь должен в диалоговом окне указать путь к каталогу, содержимое которого будет в дальнейшем...

Русские буквы на DBGrid
Доброго времени суток! Хотел Лазарус изучить немного написал маленькую тестовую программу база данных Access Все подключается но на место русских буков выходит вопросительные знаки. Как можно...

Выбрать случайную букву русского алфавита
Если ли команда чтобы выбиралась рандомом любоя буква алфавита русского?

Известна диагональ квадрата d. Вычислить площадь S и периметр P квадрата
Известна диагональ квадрата d. Вычислить площадь S и периметр P квадрата.

Запуск сторонней программы
Как запустить стороннюю программу (.exe)?

Ошибка "Identifier not found"
выдает ошибку в строке, выделенной комментарием (строка 42), как исправить? type { TForm1 } TForm1 = class(TForm) Button1: TButton; Button2: TButton; Label1: TLabel;

Работа с текстовыми файлами в Lazarus
Всем привет! Я начинающий программист, и поэтому знаю немного. А нужно открыть файл и сравнить каждую строку из него со строкой из эдита. Проблема в том, что в файле русский текст, а как я понял...

Тест с вводом ответов пользователем
Добрый вечер.Подскажите пожалуйста. Нужно сделать тест,с вводом ответов, по нажатию на кнопку проверки должно выводится либо ответ правильный либо нет. Выдает ошибку в коде: Var N:integer; begin...

Ошибка при компиляции в Lazarus 0.9.29
Под Ubuntu установлен Lazarus 0.9.29 + FPC 2.4.0 (ставился без проблем). Lazarus создает пустой проект в виде: program project1; {$mode objfpc}{$H+} uses {$IFDEF UNIX}{$IFDEF...

Тип данных Запись
открываю тему, потому как люая литература, продаваемая не является справиочником, и не знаю английского. в настоящий, в трёх, имеемых мною на руках книгах, мало описана работа с записями. в...

Функция Length неправильно определяет длину строки в кириллице
Использую функцию length для определения количества символов, при английской раскладке клавиатуры выдает правильный результат, но при русской не верно (за один символ принимает как два). В чем...

Обработка нажатия клавиш
Как сделать так, чтобы при нажатии на стрелочку вверх на клавиатуре, делалось какое-то действие, например, менялся текст в Label1. Скажите код пожалуйста.

Скопировать в буфер обмена содержимое поля ввода или значение переменной
Можно такое? Заранее благодарен.

Перевод из кодировки UTF-8 в CP866
Нужно сделать функцию, которая переводит текст из кодировки UTF-8 в CP866. То есть с нуля, так-как нельзя использовать стандартные функции. Пользователь вводит текст в UTF-8, а на выходе получает...

Изменение цвета и/или шрифта заданных узлов TreeView
Гуглил, но ничего путного для себя не нагуглил по указанному сабжу. Возможно ли это в принципе?

Известна диагональ квадрата d Вычислить площадь S и периметр P квадрата
Разработать программу в среде программирования Lazarus. Для задачи создать интерфейс, соответствующий условию. Известна диагональ квадрата d. Вычислить площадь S и периметр P квадрата.

Lazarus: как программировать в нем?
Всем добрый день!!!!! Кто знает как пользоваться Лазарусом.? (Точнее использовать по назначению))). У меня вообще даже программка из Паскаля там не открывается. Даже не компилируется. Что делать?

Активация кнопки
всем здравствуйте, передо мной поставленна задача такая: нужно, что бы при заполнении lableedit активировалась кнопка, изначально она неактивна, при чем, допустим в lableedit1 должны быть только...

Отгадать целое число, которое "загадал" компьютер в определенном диапазоне
Отгадать целое число, которое "загадал" компьютер в определенном диапазоне. Описание переменных: a – число, "загаданное" компьютером; b – очередное число, вводимое пользователем. Алгоритм...

При нажатии кнопки содержимое файла считать в Memo
Дано: объект Memo, кнопка, текстовый файл в кодировке ASCII (можно UTF-8). Нужно запрограмировать кнопку, чтобы при нажатие содержимое из файла читалось в Memo. Я зделал двумя путями: procedure...

Изменение цвета Label при наведении на него курсора мыши. Как это сделать?
Изменение цвета Label при наведении на него курсора мыши. Как это сделать? Какое свойство надо поменять?

Координаты мыши на форме
Как в Lazarus сделать чтоб при воде мышью по форме отображались координаты указателя?%-)

Рисование в Lazarus: как рисовать кривые линии через синусы и косинусы
Вот ребята я учусь в МАН (Малая академия наук), на последнем занятии нам лектор обьяснял как рисовать в лазарусе (в особености и кривые линии) так вот как рисовать кривые линии через ети синусы и...

Что значит "Исполнение остановлено"?
program radgrad; {$mode objfpc}{$H+} uses {$IFDEF UNIX}{$IFDEF UseCThreads} cthreads, {$ENDIF}{$ENDIF} Classes ,sysutils { you can add units after this };

Найти наибольшее из 3 чисел a, b, c
Есть три задачи: 1.Найти наибольшее из 3 чисел a, b, c. 2.Найти сумму чисел s=1/(p+2)+ 2/(p+2)+…+ p/(p+2) 3.Дана строка. Найти количество вхождений букв А. Есть решение первой задачи на Паскале:...

Построение простого графика
может кто просветит ,как построить линейную функцию с помощью TChart хотя бы с этого простого начать нужно по шагам ,допустим уже лежит этот TChart c вкладки Chart на форме и кнопка Button1 в...

При нажатии на клавишу "пробел" срабатывает кнопка на форме
Столкнулся со странным поведением программы. При нажатии на клавишу "пробел" срабатывает кнопка, установленная на форме. На другие клавиши кнопка не реагирует. Насколько я понимаю такого не должно...

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

TMemo и размер шрифта
Хотелось-бы знать: существует на настоящий момент что-либо, позволяющее менять в TMemo размер шрифта. Заранее благодарен за ответ.

При выборе соответствующей кнопки менять вид отображения рамки панели: "выпуклая", "вдавленная", "отсутствует"
Составьте программу, которая при выборе соответствующей командной кнопки, ме- няет вид отображения рамки панели «выпуклая», «вдавленная», «отсутствует». Как это сделать в Лазарусе? Всем спасибо!

Необходимо реализовать заливку фигур на канве
Здравствуйте, нужна помощь с заливкой фигуры на канве. Если более подробно, то предположим я нарисовал на канве фигуру зеленым цветом, и мне нужно залить эту фигуру внутри например синим цветом? при...

Переменной С присвоить символ из поля Edit
как переменной С присвоить символ из поля Edit? var c:char; begin c:=StrToInt(Edit3.Text); ShowMessage(c); end;

Создание списка и сортировка списка
Добрый день, понимаю, что в последнее время от меня многовато тем, но конец семестра, так что надеюсь, что это простительно. Требуется создать программу, которая бы создавала список с нужным...

Создание формы входа на сайт (логин, пароль)
Помогите пожалуйста!) Необходимо создать форму входа на сайт(логин, пароль). Я смогла сделать, чтобы при вводе правильного логина-пароля выводилось на форму "правильный пароль" в Label и не...

Помогите извлечь корень
Writeln('x=',-b + KOR FROM D)/2*a);

Вставить на форму анимацию в формате gif
Доброго времени суток. Помогите пожалуйста. Нужно в Lazarus на форму вставить анимацию. Анимация в формате gif. Но у меня этот формат не поддерживает. Как решить поставленую задачу. Зарание всем...

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru