Найдено 70 результатов
- 24.07.2019 00:00:37
- Форум: Lazarus
- Тема: Как обнаружить любую активность на форме?
- Ответы: 5
- Просмотры: 7258
Re: Как обнаружить любую активность на форме?
form1.onmouse*
- 23.07.2019 12:10:54
- Форум: Разное
- Тема: Delphi 10.3. Synaser. Ошибка F2613 Unit 'Libc' not found.
- Ответы: 4
- Просмотры: 14012
Re: Delphi 10.3. Synaser. Ошибка F2613 Unit 'Libc' not found
Подскажите как можно решить эту проблему
Самое простое, конвертировать проект в Лазарус)
m
Более сложный путь. Закомментировать
{$IFNDEF NO_LIBC}
//Libc,
//KernelIoctl,
Posix.Unistd,
Posix.Fcntl,
{$ELSE}
и разбираться с импортом. Искать нужные функции и прочее в
абракадабра intall ...
Самое простое, конвертировать проект в Лазарус)
m
Более сложный путь. Закомментировать
{$IFNDEF NO_LIBC}
//Libc,
//KernelIoctl,
Posix.Unistd,
Posix.Fcntl,
{$ELSE}
и разбираться с импортом. Искать нужные функции и прочее в
абракадабра intall ...
- 16.07.2019 09:47:34
- Форум: Разное
- Тема: Создать установочный пакет для windows но в linux
- Ответы: 20
- Просмотры: 74792
- 10.07.2019 13:34:53
- Форум: Lazarus
- Тема: [Решено] JSON + "\n"
- Ответы: 8
- Просмотры: 10137
- 10.07.2019 13:27:06
- Форум: Lazarus
- Тема: [Решено] JSON + "\n"
- Ответы: 8
- Просмотры: 10137
Re: JSON + "\n"
а что получится, если строку '123#10456' обратно в json перегнать?
- 10.04.2019 09:24:34
- Форум: Free Pascal Compiler
- Тема: Аналог сишного типа данных
- Ответы: 36
- Просмотры: 42514
Re: Аналог сишного типа данных
В Паскале есть модификатор absolute, можно через него привязать идентификатор к любому адресу памяти или адресу переменной любого типа. Что позволяет использовать одну и ту же память переменными разного типа.
absolute может свграть как баг в
x86_64(amd64)
Например var
a: integer absolute to ...
- 06.04.2019 09:06:11
- Форум: Потрепаться
- Тема: А можно позвать на другой форум?
- Ответы: 46
- Просмотры: 75472
Re: А можно позвать на другой форум?
Мне по лазарю и freepascal достаточно http://wiki.freepascal.org и http://freepascal.ru, а также https://www.freepascal.org/docs.var. Ну и гугл иногда, когда в тупике.
- 05.04.2019 19:31:28
- Форум: Потрепаться
- Тема: А можно позвать на другой форум?
- Ответы: 46
- Просмотры: 75472
Re: А можно позвать на другой форум?
Детский сад какой-то. 
- 04.04.2019 16:37:45
- Форум: Free Pascal Compiler
- Тема: Аналог сишного типа данных
- Ответы: 36
- Просмотры: 42514
Re: Аналог сишного типа данных
fedan
Остаётся только вопрос, а будет ли такое работать в паскале:
Нет.
Можно как-то так попробовать:
program Project1;
{$POINTERMATH ON}
{$MODE OBJFPC}
uses
SysUtils;
const
MPI_UNWEIGHTED = PInteger(2);
var
arr: PIntegerArray;
arrLen: UInt32;
I: Integer;
begin
arr : ...
Остаётся только вопрос, а будет ли такое работать в паскале:
Нет.
Можно как-то так попробовать:
program Project1;
{$POINTERMATH ON}
{$MODE OBJFPC}
uses
SysUtils;
const
MPI_UNWEIGHTED = PInteger(2);
var
arr: PIntegerArray;
arrLen: UInt32;
I: Integer;
begin
arr : ...
- 04.04.2019 14:28:35
- Форум: Free Pascal Compiler
- Тема: Аналог сишного типа данных
- Ответы: 36
- Просмотры: 42514
Re: Аналог сишного типа данных
Ну, вот например
можно преобразовать к такому
в C/C++ const int sourceweights[] = const int* sourceweights
{$POINTERMATH ON}
...
// sourceweights: PInteger вместо массива
// } else if (MPI_UNWEIGHTED != sourceweights && sourceweights[i] < 0) {
end else if (MPI_UNWEIGHTED ...
можно преобразовать к такому
в C/C++ const int sourceweights[] = const int* sourceweights
{$POINTERMATH ON}
...
// sourceweights: PInteger вместо массива
// } else if (MPI_UNWEIGHTED != sourceweights && sourceweights[i] < 0) {
end else if (MPI_UNWEIGHTED ...
- 04.04.2019 13:59:41
- Форум: Free Pascal Compiler
- Тема: Аналог сишного типа данных
- Ответы: 36
- Просмотры: 42514
- 04.04.2019 12:45:02
- Форум: Free Pascal Compiler
- Тема: Аналог сишного типа данных
- Ответы: 36
- Просмотры: 42514
Re: Аналог сишного типа данных
А функции возвращают указатель или целое число?
Что вообще за проект, он в паблике есть?
Код: Выделить всё
if myFunc1 = UNWEIGHTED then
...
if Pinteger(myFunc2) = UNWEIGHTED then
...
Что вообще за проект, он в паблике есть?
- 04.04.2019 12:19:34
- Форум: Free Pascal Compiler
- Тема: Аналог сишного типа данных
- Ответы: 36
- Просмотры: 42514
- 04.04.2019 10:21:31
- Форум: Free Pascal Compiler
- Тема: Аналог сишного типа данных
- Ответы: 36
- Просмотры: 42514
Re: Аналог сишного типа данных
Код: Выделить всё
const
UNWEIGHTED = PInteger(2);
- 28.03.2019 11:09:46
- Форум: Free Pascal Compiler
- Тема: Аналог сишного типа данных
- Ответы: 36
- Просмотры: 42514
Re: Аналог сишного типа данных
Vadim писал(а):int128_t
https://www.freepascal.org/docs-html/rtl/sysutils/int128rec.html
Правда единственное применение это InterlockedCompareExchange128

