[ Delphi / Pascal ] — начинающим: задаем вопросы (архивная - 2015)

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by banned, 6 May 2007.

Thread Status:
Not open for further replies.
  1. lll6

    lll6 Elder - Старейшина

    Joined:
    29 Feb 2008
    Messages:
    83
    Likes Received:
    15
    Reputations:
    5
    Code:
    If [COLOR=Red]([/COLOR]StrToInt(Edit2.Text)<=16[COLOR=Red])[/COLOR] and [COLOR=Red]([/COLOR]StrToInt(Edit2.Text)>1[COLOR=Red])[/COLOR] then
     
  2. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    ZET36 ты конечно извини, но иметь в руках исходник и задавать такой вопрос, это как минимум глупо, а если по теме, пропусти через обфуксатор мб поможет
     
  3. Ponchik

    Ponchik Хлебо-булочное изделие

    Joined:
    30 Aug 2005
    Messages:
    687
    Likes Received:
    807
    Reputations:
    311
    А у мя тута такая трабла...
    Я в веббраузере гружу пагу, в ней фреймы, мне надо получить src одной из имаг...
    wb1.OleObject.document.images.length возвращает 0, т.к. нет имаг, токо фреймы
    wb1.OleObject.document.frames.length возвращает 8, значет 8 фреймов
    wb1.OleObject.document.frames.item(0).name возвращает имя фрейма
    wb1.OleObject.document.frames.item(0).images.length вызывает шибку =\
    Project n.exe raised exception class EOleError with message 'Method 'images' not supported by automation object'. Process stopped. Use Step or Run to continue.
    Как получить имаги фрейма?
    Всё, сам нащёл ...frames.item(0).document...
     
    #2443 Ponchik, 4 Jan 2009
    Last edited: 4 Jan 2009
    1 person likes this.
  4. De-visible

    De-visible [NDC] Network develope c0ders

    Joined:
    6 Jan 2008
    Messages:
    916
    Likes Received:
    550
    Reputations:
    66
    Ддос и подобные темы запрещены у нас.
     
  5. noveek

    noveek New Member

    Joined:
    29 Dec 2008
    Messages:
    45
    Likes Received:
    4
    Reputations:
    1
    Извините
     
  6. cremator (c)

    cremator (c) Elder - Старейшина

    Joined:
    20 Jun 2008
    Messages:
    258
    Likes Received:
    72
    Reputations:
    0
    Мне надо придумать алгоритм защиты своей программы от копирования и распространения, т.е. привязать ее к одному компьютеру. Привязка к реестру не пойдет потому что ключи в реестре модифицируются и могут быть подстроены под нужное значение.. Какие есть еще способы защиты? И как еще защитить этот код, чтобы его не крэкнули? Спасибо заранее..
     
  7. lll6

    lll6 Elder - Старейшина

    Joined:
    29 Feb 2008
    Messages:
    83
    Likes Received:
    15
    Reputations:
    5
    Привязывай к инфе о проце, материнке, винте или к чему ещё захочешь.
     
  8. DiSi

    DiSi Member

    Joined:
    7 Dec 2007
    Messages:
    0
    Likes Received:
    19
    Reputations:
    0
    помогите с таким вот вопросом:

    Вот есть у меня webbrowser он открывает страничку

    вот вопрос:как сделать поиск слов(ссылок) на страничке открытой браузером?

    Зарание спс
     
  9. cremator (c)

    cremator (c) Elder - Старейшина

    Joined:
    20 Jun 2008
    Messages:
    258
    Likes Received:
    72
    Reputations:
    0
    Где брать инфо о проце, материнки и т.д. Кроме как не из реестра? Чтобы ее нельзя было подделать. И что сделать чтобы код в дебаггере нельзя было разобрать?
     
    1 person likes this.
  10. Hellsp@wn

    Hellsp@wn Elder - Старейшина

    Joined:
    29 Apr 2007
    Messages:
    401
    Likes Received:
    153
    Reputations:
    48
    1) привязать к номеру жётского диска.
    2) запаковать upx-ом :)
     
    1 person likes this.
  11. Phm.phx

    Phm.phx Banned

    Joined:
    12 Jan 2008
    Messages:
    73
    Likes Received:
    232
    Reputations:
    1
    Найди материал по TLS .(thread local storage) механизм локальной памяти потока предоставляющий в распоряжение потоков индивидуальные наборы глобальных - статических переменных. ТЛС поддерживается как на уровне явно вызымаемых АPI-функции , так и на уровне РЕ-формата,неявно обрабатываемого сис загрузчиком. РЕ-форма поддерживает функции обратного вызова(TLS-callback),автоматически вызываемые системой до передачи управления на точку входа. В частности это позволяет определить наличие отладчика или скрытно выполнить некоторые действия. Сис загрузчик,также, записывает TLS-индекс в заданную локацию-отличный способ неявной самомодификации проги. Дизассами она не отлавливается и заводит взломщика в тупик:) Tls используется в большом кол-ве протекторов,защит,вирусов,кряков.
     
    2 people like this.
  12. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    1. создавать файл - ключ
    2. модифицировать время создания у определенных папок, файлов
    3. создавать псевдо узел в реестре использовав парралельно вариант 1,2

    привязка к железу это "плохой тон", а если у пользователя сгорит винт?
     
    3 people like this.
  13. none222

    none222 Guest

    Reputations:
    0
    upx мегозащита)))))))))))))))
     
    1 person likes this.
  14. merax

    merax Member

    Joined:
    3 Jul 2007
    Messages:
    18
    Likes Received:
    6
    Reputations:
    0
    А зачем именно к винту? Можно привязаться к 4 устройствам. разрешив модифицировать только 2...
    Кстати не забывайте, что есть еще защищенное хранилище в винде где можно хранить хэш ключа активации а ключь активации генерить как раз по номерам устройств. Например номер мамы, жесткого, оперативы. и смотреть, если сменились номер 1 устройства, а остальные прежние, то надо перегенерить ключ, если все или больше 2, то нас пытаются скопировать. А по поводу деббагерров... Читай литературу, способов много, начиная от написания своего криптора)))
     
    1 person likes this.
  15. Jino

    Jino New Member

    Joined:
    27 Sep 2007
    Messages:
    22
    Likes Received:
    0
    Reputations:
    0
    Не работает. При чем ему не нравиться возведение в степень, равную счетчику (в коде цикл, i - счетчик)
    Пробывал даже так, из интереса.
    Тоже не работает.

    Вопрос: как возвести в степень, равную счетчику?
     
  16. criz

    criz Elder - Старейшина

    Joined:
    4 Nov 2007
    Messages:
    293
    Likes Received:
    40
    Reputations:
    6
    http://www.delphisources.ru/pages/faq/base/power.html
     
  17. crystalbit

    crystalbit Elder - Старейшина

    Joined:
    6 Jun 2008
    Messages:
    212
    Likes Received:
    88
    Reputations:
    8
    и подключи модуль math
     
  18. cremator (c)

    cremator (c) Elder - Старейшина

    Joined:
    20 Jun 2008
    Messages:
    258
    Likes Received:
    72
    Reputations:
    0
    procedure TForm1.FormCreate(Sender: TObject);
    var i,a,ss,res,deg:integer;
    begin
    res:=1; //рез-ат
    dig:=2; //число
    deg:=10; //степень
    for i:=1 to deg do
    begin
    res:=1;
    for a:=1 to i do res:=res*dig;
    showmessage(inttostr(res));
    end;
    end;
     
  19. Hellsp@wn

    Hellsp@wn Elder - Старейшина

    Joined:
    29 Apr 2007
    Messages:
    401
    Likes Received:
    153
    Reputations:
    48
    что за бред? а если у пользователи сгорит видеокарта/материнка/системник/квартира, он переустановит систему, то все твои способы идут лесом.

    з.ы. плохим тоном является навешивание говнозащит, на говнопрограммы.
     
  20. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    Hellsp@wn ну а где твой вариант? я хотя бы предложил.
     
    1 person likes this.
Thread Status:
Not open for further replies.