Сейчас на форуме: (+9 невидимых)

 eXeL@B —› Крэки, обсуждения —› asm в Delphi
Посл.ответ Сообщение

Ранг: 0.0 (гость)
Активность: 0=0
Статус: Участник

Создано: 28 января 2005 18:32
· Личное сообщение · #1

Не знаю как написать KeyGen в Delphi, проблема в том как на встроенном ассемблере обработать строку и получив новую вывести что получится в Delphi. Вся проблема как вывести строку(а может и не вэтом). Я за Delphi только сел. Буду благодарен за любые советы и ссылки!




Ранг: 631.1 (!), 62thx
Активность: 0.370.01
Статус: Участник
Автор VB Decompiler

Создано: 28 января 2005 19:20 · Поправил: GPcH
· Личное сообщение · #2

Можно так:
procedure MyPr();
  var
    retval: integer;
  begin
    asm
      mov eax, 10
      mov retval, eax
    end;
    ShowMessage(retval);
  end;


-----
Никогда не делай то, что возможно. Стремись сделать то что невозможно впринципе!




Ранг: 19.6 (новичок)
Активность: 0.030
Статус: Участник

Создано: 28 января 2005 19:24
· Личное сообщение · #3

вот исходник кейгена на дельфях



e0a5_KeyGenD.rar




Ранг: 631.1 (!), 62thx
Активность: 0.370.01
Статус: Участник
Автор VB Decompiler

Создано: 28 января 2005 19:41 · Поправил: GPcH
· Личное сообщение · #4

твой аттач не качается - глюки с доступом... видимо Bad_guy восстановил бэкап криво - нужно папке с аттачами прописать доступ 777

-----
Никогда не делай то, что возможно. Стремись сделать то что невозможно впринципе!




Ранг: 79.6 (постоянный), 2thx
Активность: 0.080
Статус: Участник
алХимик

Создано: 28 января 2005 20:00 · Поправил: SeDoYHg
· Личное сообщение · #5

GPcH

А где в твоем примере работа с СТРОКАМИ? 8)
Rezon

Объясни конкретно что тебе надо? Я думаю, что в БАСМе работа со строками организована так же как и в любом ассемблере - используя Цепочечные команды.

PS А зачем на Делфи, если знаешь Асм?

-----
Все говорят что мы вместе. Но не многие знают в каком.




Ранг: 384.1 (мудрец)
Активность: 0.250
Статус: Участник
www.int3.net

Создано: 28 января 2005 20:37
· Личное сообщение · #6

SeDoYHg пишет:
Я думаю, что в БАСМе работа со строками организована так же как и в любом ассемблера - используя Цепочечные команды.

именно!

-----
Подписи - ЗЛО! Нужно убирать!





Ранг: 631.1 (!), 62thx
Активность: 0.370.01
Статус: Участник
Автор VB Decompiler

Создано: 28 января 2005 22:24 · Поправил: GPcH
· Личное сообщение · #7

SeDoYHg пишет:
А где в твоем примере работа с СТРОКАМИ? 8)

Со строками нужно байтовый массив как в асме юзать. По другому никак

-----
Никогда не делай то, что возможно. Стремись сделать то что невозможно впринципе!




Ранг: 21.5 (новичок)
Активность: 0.030
Статус: Участник

Создано: 29 января 2005 10:23
· Личное сообщение · #8

строка в дельфи - массив бацтов
0-й байт длина строки
1-й макс. кол-во символов в строке( string[max])
далее со 2-го до max сама строка



Ранг: 384.1 (мудрец)
Активность: 0.250
Статус: Участник
www.int3.net

Создано: 29 января 2005 14:50
· Личное сообщение · #9

bUg
не всё брат так просто ;)

-----
Подписи - ЗЛО! Нужно убирать!




Ранг: 450.1 (мудрец)
Активность: 0.260
Статус: Участник

Создано: 29 января 2005 15:12
· Личное сообщение · #10

А что там сложного то? ;)



Ранг: 21.5 (новичок)
Активность: 0.030
Статус: Участник

Создано: 29 января 2005 19:26
· Личное сообщение · #11

nice
А ты книжки почитай =))
Я стока прог на встроенном асме написал...




Ранг: 536.4 (!), 171thx
Активность: 0.660.13
Статус: Администратор
Создатель CRACKL@B

Создано: 29 января 2005 19:28
· Личное сообщение · #12

GPcH пишет:
видимо Bad_guy восстановил бэкап криво - нужно папке с аттачами прописать доступ 777

...забавный хостинг. Оказывается при добавлении файла ему ставится атрибут 600

-----
Всем не угодишь





Ранг: 536.4 (!), 171thx
Активность: 0.660.13
Статус: Администратор
Создатель CRACKL@B

Создано: 29 января 2005 19:41
· Личное сообщение · #13

/

fcaf_TEST.TXT

-----
Всем не угодишь





Ранг: 536.4 (!), 171thx
Активность: 0.660.13
Статус: Администратор
Создатель CRACKL@B

Создано: 29 января 2005 19:42
· Личное сообщение · #14

нормуль !

-----
Всем не угодишь



 eXeL@B —› Крэки, обсуждения —› asm в Delphi
:: Ваш ответ
Жирный  Курсив  Подчеркнутый  Перечеркнутый  {mpf5}  Код  Вставить ссылку 
:s1: :s2: :s3: :s4: :s5: :s6: :s7: :s8: :s9: :s10: :s11: :s12: :s13: :s14: :s15: :s16:


Максимальный размер аттача: 500KB.
Ваш логин: german1505 » Выход » ЛС
   Для печати Для печати