ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как перевести код Assembler в delphi?
10 сообщений из 35, страница 2 из 2
  2  все
Как перевести код Assembler в delphi?
    #40078602
s62
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
s62
Участник
Polesov,

я ничего не говорю против вашей реализации, я написал, что ТС вероятно неправильно объявление функции привела, можете посмотреть несколько сообщений вверх. Там не про AnsiChar (это я не то скопировал), а про параметр Buffer.
...
Рейтинг: 0 / 0
18.06.2021, 14:49
| Ответить | Цитировать | Написать  
Как перевести код Assembler в delphi?
    #40078603
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
s62я предполагаю

А ты не предполагай, ты скачай парсер по ссылке из предыдущего топика да посмотри.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
18.06.2021, 14:51
| Ответить | Цитировать | Написать  
Как перевести код Assembler в delphi?
    #40078605
s62
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
s62
Участник
Dimitry Sibiryakov,
я зарегался на том форуме, но там денег просят за скачивание этого кода. Может ТС тут появится и прокомментирует.
...
Рейтинг: 0 / 0
18.06.2021, 14:53
| Ответить | Цитировать | Написать  
Как перевести код Assembler в delphi?
    #40078609
Polesov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Polesov
Участник
s62
я написал, что ТС вероятно неправильно объявление функции привела

ТС привела спецификацию функции на assembler.
Гадать, ошиблась она или нет ...
Тем более, передача адреса буфера, как integer или pointer абсолютно равнозначны.
...
Рейтинг: 0 / 0
18.06.2021, 14:59
| Ответить | Цитировать | Написать  
Как перевести код Assembler в delphi?
    #40078610
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
Polesov
Тип AnsiChar используется исходя из того, что ТС указал Delphi-7.
Там в коде считается, что передается AnsiChar. Так что, чтобы не закладывать мину на будущее, я бы сразу явно писал
Код: pascal
1.
function FirstCharInBuffer(C: AnsiChar; const Buffer; BufLen, StartPos: Integer): Integer;
...
Рейтинг: 0 / 0
18.06.2021, 14:59
| Ответить | Цитировать | Написать  
Как перевести код Assembler в delphi?
    #40078615
Polesov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Polesov
Участник
s62
_Vasilisk_, Polesov,
в общем, я предполагаю, как выше писал, что в оригинале объявление функции выглядит не так, как у ТС, а вот так:
Код: pascal
1.
function FirstCharInBuffer(const C: Char; const Buffer; BufLen, StartPos: Integer): Integer;


Мы общаемся удаленно, а так был бы готов поставить бутылку пива, что это так. :)


Судя по ассемблерному коду, адрес буфера должен передаваться как integer или pointer:
Код: pascal
1.
2.
3.
  mov edi,edx
  add edi,StartPos
  sub ecx,StartPos



Если бы параметр передавался как нетипизированный const, то ассемблерный код был бы такой:
Код: pascal
1.
  mov edi, [edx]
...
Рейтинг: 0 / 0
18.06.2021, 15:05
| Ответить | Цитировать | Написать  
Как перевести код Assembler в delphi?
    #40078616
Polesov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Polesov
Участник
_Vasilisk_
Polesov
Тип AnsiChar используется исходя из того, что ТС указал Delphi-7.
Там в коде считается, что передается AnsiChar. Так что, чтобы не закладывать мину на будущее, я бы сразу явно писал
Код: pascal
1.
function FirstCharInBuffer(C: AnsiChar; const Buffer; BufLen, StartPos: Integer): Integer;


Консенсус ))
...
Рейтинг: 0 / 0
18.06.2021, 15:05
| Ответить | Цитировать | Написать  
Как перевести код Assembler в delphi?
    #40078629
s62
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
s62
Участник
Polesov

Если бы параметр передавался как нетипизированный const, то ассемблерный код был бы такой:
Код: pascal
1.
  mov edi, [edx]

квадратные скобки - это адрес? Нетипизированные параметры передаются как указатель, в edx и так адрес буфера.
...
Рейтинг: 0 / 0
18.06.2021, 15:38
| Ответить | Цитировать | Написать  
Как перевести код Assembler в delphi?
    #40078634
Polesov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Polesov
Участник
s62
Polesov

Если бы параметр передавался как нетипизированный const, то ассемблерный код был бы такой:
Код: pascal
1.
  mov edi, [edx]

квадратные скобки - это адрес? Нетипизированные параметры передаются как указатель, в edx и так адрес буфера.

Адрес переменной. Это не тоже самое, что адрес буфера.
...
Рейтинг: 0 / 0
18.06.2021, 15:45
| Ответить | Цитировать | Написать  
Как перевести код Assembler в delphi?
    #40078799
Фотография DarkMaster
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DarkMaster
Участник
Друзья - рецепт в 3 строки кода уже выдали ТС :) Хватит изголятся :)
...
Рейтинг: 0 / 0
18.06.2021, 23:13
| Ответить | Цитировать | Написать  
10 сообщений из 35, страница 2 из 2
  2  все
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как перевести код Assembler в delphi?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]