Как переслать данные из Assembler в Delphi

Нужно переслать число из Assembler в Delphi, там изменить его, переслать обратно и вывести.
Подскажите, кто знает!
Please.

 

- какой ассемблер, MASM32 или встроенный в Delphi?

- где именно, в Delphi или в MASM32?!

- то же самое...

Allexander
Писи конкретне!!!

 

мэпинг и\или пайпы никто неоменял вроде :\\

если я правельно понял вопрос)

 

LazzY
Может, ему задали написать приложение на Delphi с использованием асма или наоборот. Всё сводится к вызову функции Delphi из асма или асма из Delphi. В общем, поиск рулит.

 

VASIL
1. Assembler - любой
2. Задача: в Assembler вводится число. Нужно из него вычислить корень квадратный, но сделать это (само вычисление корня) нужно, изпользуя Pascal/Delphi.
P.S. В Assembler я не очень шарю.

 

перфокарты подойдут?

в связной речи и описании задачи, очевидно, тоже

 

Напиши DLL на Delphi, В ней экспортируй функцию _sqrt_.
А в проге на асме подгружай DLL и вызывай _sqrt_.
PS: Само собой это для WIndows.

 

Allexander

Т.е. ассемблер (вернее код, который нужно написать на ассемблере) запрашивает у юзера число и читает его (через консоль, к примеру), так? Потом вызывает функцию на ЯВУ (Delphi), чтобы вычислить квадратный корень. Логичнее сделать всё наоборот, т.е. читать число на Delphi (с использованием графического интерфейса и т.д.), а обрабатывать в ассемблере. Логичнее так, потому что ассемблер обычно используется не для организации UI, а для реализации требовательных к машинным ресурсам алгоритмов.

 

[17:01] lord_Phoenix: readln(Assembler);
[17:01] lord_Phoenix: writeln(sqrt(Assembler));

 

LazzY
А где var Assembler : Integer; ?

 

1. n0name напиши как подгрузить DLL в проге на асме.
2. Quantum может и логичнее делать наоборот, но задача стоит такая!!!

 

Allexander
LoadLibrary/GetProcAddress.
Для асма

Код (Text):

1. LibName db "mylib.dll", 0
2. ProcName db "_sqrt_", 0
3. LibInst dd 0
4. value dd 4
5. ...
6. invoke LoadLibrary, offset LibName
7. mov LibInst, eax
8. invoke GetProcAddress, eax, offset ProcName
9. push value
10. call eax
11. invoke FreeLibrary, LibInst

 

В Delphi добавь после объявления процедуры stdcall;

 

Или вообще статически прилинкуй DLL...