freepascal

0зной

1ответ

Free Pascal значения счетчика массива с одинаковым значением

У меня есть текстовый файл с названиями городов и их округов экс: 15 Vilnius Vilniaus 541278 Dusetos Utenos 4211 Alytus Alytaus 69859 Druskininkai Alytaus 16890 Ignalina Utenos 6307 Kavarskas Ut

1зной

1ответ

Как использовать сортировку вставки в массиве с помощью pascal

Может кто-то помочь мне здесь. Я пытаюсь понять сортировку вставки (в паскале). Но я нахожу это очень сложным. Может кто-то просто сделать мне простой код: пользователь вводит 5 чисел (массив), а зате

0зной

1ответ

Использование Localhost в Delphi

Вечер все, Идеология была дана вчера, поэтому я не торопился изучать дельфи. Я хочу, чтобы отправить данные визави URL (используя запрос GET/Wininet) теперь у меня есть проблемы с использованием http:

1зной

1ответ

Pascal - Написание странных символов

Я пытаюсь написать комментарий стриппера в паскале. Я запускаю свой код и передаю ему исходный код кода C, и он удаляет комментарии из файла и выводит результат на терминал. Я довольно новичок в паска

1зной

1ответ

64-битный бит asm обрезает верхние 32 бита

Я хочу, чтобы bsr работал на 64-битном номере. Тем не менее, нижеследующее работает только на младших 32 битах ввода: function BSR64(const Val: Int64): Integer; begin asm bsr eax, [Val] ...

2зной

1ответ

x64 asm присвоить значение параметру ref по Delphi, но не Lazarus Free Pascal

В упрощенном коде ниже Len не назначается. function Test64(const Val: Int64; var Len: Integer): Integer; begin asm mov [Len], $1 end; end; Я компилирую в режиме 64 бит. Это работает в Del

2зной

3ответ

Проблема выравнивания в коде x64, Free Pascal

Приведенный ниже код отлично работает, если соблюден для 32 бит (с соответствующим переименованием регистра). Но он выдает ошибку при выполнении (и «Warning: Object file» project1.o »содержит 32-битно

0зной

1ответ

Сборка сборки в CDECL вызывает сбои

Function CallFunc(Address: PtrUInt; Arg: Array of PtrUInt; isCDecl: Boolean = True): PtrUInt; {$ASMMODE INTEL} begin if (isCDecl) then asm mov ecx, 3 //loop 3 times. mov edx, Arg

2зной

1ответ

разыменовывать C# по реф указателя в ассемблерный DLL

я следующее, который работает отлично: procedure ShuffleAry16(var Ary16: TByteAry; MaskLow, MaskHigh: Int64); cdecl; assembler; asm movdqu xmm0, [rcx] // unaligned load Ary16 movq xmm