
14.08.2006, 12:44
|
|
Новичок
Регистрация: 25.05.2006
Сообщений: 20
Провел на форуме: 269745
Репутация:
11
|
|
Хм... KEZ тебе скинул код на магическом языке программирования Assembler. Бросай свой Delphi, и закачивай FASM - http://flatassembler.net/fasmw167.zip. И впихивай туда слегка отмодифицированный код KEZ'a:
Код:
format PE GUI
entry start
include 'include\win32a.inc'
section '.data' data readable writeable
_ti_durak db 'Ti durak',0
section '.code' code readable executable
start:
push 0
lea eax, [_ti_durak]
push eax
push eax
push 0
call dword [MessageBoxA]
push 0
call dword [Vihod]
section '.idata' import data readable
library kernel32,'KERNEL32.DLL',\
user32,'USER32.DLL'
import kernel32,Vihod,'ExitProcess'
import user32,MessageBoxA,'MessageBoxA'
Не забудь позвать всех своих друзей к премьере.
|
|
|