VPF::вставка ассемблерного кода - Форум программистов

Delphist

Дата 27.4.2005, 17:23 (ссылка)

(нет голосов)

Загрузка ...

Delphist Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3

Нужна вставка ассемблерная позволяющая копировать файлс диска на диск

--------------------

ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...

Pakshin A. S.

Дата 27.4.2005, 17:29 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 5056
Регистрация: 16.2.2003

Репутация: нет
Всего: 61

Нужен код? Тогда не в этот раздел...

Как вставить код...

1)

Код


begin
 ...
 asm
   КОД
 end;
 ...
end;

Код


procedure ...;
asm
 КОД
end;

Delphist

Дата 27.4.2005, 17:38 (ссылка)

(нет голосов)

Загрузка ...

Delphist Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3

Цитата(Pakshin @ 27.4.2005, 17:29)

Нужен код? Тогда не в этот раздел...

Как вставить код...

1)

Код


begin
 ...
 asm
   КОД
 end;
 ...
end;

Код


procedure ...;
asm
 КОД
end;

Мне нужен сам код

--------------------

Pakshin A. S.

Дата 27.4.2005, 17:39 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 5056
Регистрация: 16.2.2003

Репутация: нет
Всего: 61

http://forum.vingrad.ru/index.php?showforum=4

Sl@va

Дата 27.4.2005, 21:45 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 100
Регистрация: 22.11.2004
Где: Нижний Новгород

Репутация: нет
Всего: нет

Нужно воспользоваться API функцией CopyFileEx
Описание

Код


BOOL CopyFileEx(

    LPCWSTR lpExistingFileName,    // pointer to name of an existing file
    LPCWSTR lpNewFileName,    // pointer to filename to copy to
    LPPROGRESS_ROUTINE lpProgressRoutine,    // pointer to the callback function
    LPVOID lpData,    // to be passed to the callback function
    LPBOOL pbCancel,    // flag that can be used to cancel the operation
    DWORD dwCopyFlags    // flags that specify how the file is copied
   );

Yanis

Дата 28.4.2005, 16:59 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: нет
Всего: 111

Код


var
  s, s1: String;
begin
  s := 'C:\Autoexec.bat';
  s1 := 'C:\Autoexec.bat.bak';
  asm
    push $ff
    push dword ptr[s1]
    push dword ptr[s]
    call CopyFile
  end;
end;

Пойдёт?

--------------------

*щёлк*

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Asm для Windows/Dos \| Следующая тема »