Форум программистов, компьютерный форум, киберфорум
Lazarus
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Lazarus Генерация случайных целых чисел в заданном интервале https://www.cyberforum.ru/ lazarus/ thread1701787.html
Здравствуйте! Правильно ли я прописал код случайных чисел от -1 до 2 ??? Спасибо. procedure TForm1.FormCreate(Sender: TObject); var Col, Row, N, M: integer; begin randomize; N:=6; M:=6; StringGrid1.ColCount:=N; StringGrid1.RowCount:=M;
Методы внутренней сортировки массивов (вставки и обмена) Lazarus
Нужно создать вектор А. Для создания массива использовать генератор случайных чисел. Количество элементов рассчитывается по формуле n = 50 + 2i , где i=7. Отсортировать массив нужно метод вставки и обмена. Каждый из методов нужно оформить как под-программу. Тип сортировки по возрастанию. Так же нужно посчитать количество сравнений и обменов. Кому не сложно, помогите с данным заданием. Не...
Lazarus ShowBalloonTip не отображает кириллицу есть код: procedure ShowBalloonTip(Control: TWinControl; Icon: integer; BackCL, TextCL: TColor; Title: String; Text: PWideChar); const TOOLTIPS_CLASS = 'tooltips_class32'; TTS_ALWAYSTIP = $01; TTS_NOPREFIX = $02; TTS_BALLOON = $40; TTF_SUBCLASS = $0010; https://www.cyberforum.ru/ lazarus/ thread1701578.html Lazarus Как сделать скриншот области экрана? Есть пример на Делфи http://delphiexpert.ru/sozdanie-skrinshotera-na-delphi.html, но в Lazarus отсуствует Transparentcolor свойство. Выставил Alphablend true и AlphablendValue 100, делаю скриншот экрана и переношу на всю форму, все нормальгно, полупрозрачно. Далее пробую на OnMouseMove делать Canvas.CopyRect с экрана, но тогда именно нарисованное таким образом прямоугольник полупрозрачен, а вся... https://www.cyberforum.ru/ lazarus/ thread1701322.html
Файл в кодировке ANSI Lazarus
Лазарус работает с UFT8 и файлы, которые сохраняются через TStringList или TextFile так же имеют кодировку UTF8. Необходимо: открыть файл "1.txt"(utf8) и сохранить его в файл "2.txt"(ansi). открыть файл "2.txt"(ansi) и добавить строку String в кодировке Ansi не нарушая кодировку файла. 1й пример кода, вариант "консольный": var St8: UTF8String;
Lazarus При работе с Lazarus и Firebird возникли трудности https://www.cyberforum.ru/ lazarus/ thread1701093.html
Самая простая программа. Пытаюсь вывести таблицу базу данных(.FDB) на экран. Компонент IBConnection, в котором просписан путь к базе. Пытался разными способами (\etc; localhost:путь; ip: путь). При запуске выдает DointernalConnect Unable to complete network request to host "localhost" Failed to establish a connection
Lazarus Как из StringGrid скопировать значение в set of bytes и обратно? как из StringGrid скопировать значение в set of bytes и обратно? https://www.cyberforum.ru/ lazarus/ thread1700866.html Одномерный массив в Lazarus Lazarus
1. Дан массив целых чисел из n элементов, заполненный случайным образом числами из промежутка . Удалить из него все элементы, которые состоят из одинаковых цифр (включая однозначные числа). 2. Вставить число К перед всеми элементами, в которых есть цифра 1. 3. Переставить первые три и последние три элемента местами, сохраняя порядок их следования.
Lazarus Одномерный массив в Lazarus https://www.cyberforum.ru/ lazarus/ thread1700069.html
1. Заменить первый элемент массива, кратный 5, нулем. 2. Заменить элементы массива с нечетными номерами на квадраты их номеров. 3. Из элементов массива D сформировать массив A той же размерности по правилу: если номер четный, то значение элемента находится по формуле Ai = Di2, а если нечетный, то по формуле Ai = Di / i.
Lazarus Одномерный массив в Lazarus https://www.cyberforum.ru/ lazarus/ thread1700067.html
1. Дан массив целых чисел из n элементов, заполненный случайным образом числами из промежутка . Найти сумму элементов, имеющих нечетное значение. 2. Вывести индексы тех элементов, значения которых больше заданного числа А. 3. Определить, есть ли в данном массиве положительные элементы, кратные заданному числу К.
Преобразования слова в другое Lazarus
Составить программу, преобразующую слово 'Перепелица' в слово 'Пепел'. Допустимые процедуры и функции: - Процедуры: Delete, Insert, Str, Val - Функции: Copy, Concat, Lenght, Pos, UpCase
Lazarus Почему case работает только с выражениями, и не работает с функциями? и как быть например если хочу действовоть в зависимоти от результатов вызова функции case MyFunc(i) of 3: ...; 4: ...; default; end; или я ошибаюсь? Неужели по любому использовать if-ы? и не работает с перемеными и не работает с "+" "-" https://www.cyberforum.ru/ lazarus/ thread1699042.html
46 / 20 / 5
Регистрация: 29.12.2015
Сообщений: 1,814
0

PascalScript в Lasarus - Lazarus - Ответ 8972350

03.04.2016, 12:52. Показов 4028. Ответов 4
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Добрый день. Может ктонибудь детально расказать как работать с PascalScript
Собственно что мне необходимо:
В отдельном скрипте паскаль запускать процедуры и функции.
К примеру скрипт
Pascal
1
2
3
4
5
6
7
8
9
10
11
var
//Здесь свои переменные объявляешь
//Свои функции и процедуры
begin
//А сдесь непосредственно код который будет выполнятся в своей программе. Например не только использовать функции и прпоцедуры которые есть в скрипте но и вызов функций и процедур которые есть в делфи.
end.
//К приеру скрипт работы с  цветом
Var Clr1:TColor;
begin
clr1 := RGB(120, 120, 120);
end.
А также о возможностях использовать события в паскале

Вернуться к обсуждению:
PascalScript в Lasarus Lazarus
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.04.2016, 12:52
Готовые ответы и решения:

БД в lasarus
Здраствуйте. Извините если тема уже была. В принцыпе была но у меня чуть другое. Может ли кто...

Lasarus в школе
В школах ввели СПО, поэтому программирование изучаем на Lasarus. Я учитель информатики, язык изучаю...

Кодировка путей и текста Lasarus
Может кто помочь с кодировками. Вечно в лазарусе как не попытаешься открыть файл то в ответ получаю...

OPC-client для Lasarus
Добрый день, господа форум! Возникла необходимость в OPC-клиенте. В Delphi пользовался библиотекой...

4
03.04.2016, 12:52
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
03.04.2016, 12:52
Помогаю со студенческими работами здесь

Вызов ShowMessage из DLL в Lasarus
Переношу DLL проект с Делфи на Лазаря, столкнулся с такой проблемой. Лазарус не видит окна...

Сохранения компонента в файл и загрузка из файла без использовании WinApi Lasarus
Собственно вопрос. Как можно полностью сохранить все параметры компонента и загрузить их из файла...

Разработать приложение в среде Lasarus для проверки решений задач заданного вида
Разработать приложение в среде Lasarus для проверки решений задач следующего вида: Петя записал...

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