Форум: "Прочее";
Текущий архив: 2008.03.02;
Скачать: [xml.tar.bz2];
ВнизНу и что у нас там с DelphiDecompiler Найти похожие ветки
← →
Tserberus (2008-01-30 14:59) [0]Винду только восстановил, столько времени убил на восстановление системы и всех прочих файлов.... Что за вирус мать его?
← →
VAD*Anti Gopn!k © (2008-01-30 15:03) [1]Злобный вирус. А его мать - ZoldBerger :)
← →
DrPass © (2008-01-30 15:27) [2]
> Злобный вирус. А его мать - ZoldBerger :)
Интуиция мне подсказывает, что ZoldBerger и Tserberus - один и тот же перец, которому до сих пор неймется...
← →
Tserberus (2008-01-30 15:38) [3]
> DrPass © (30.01.08 15:27) [2]
ты чего?
← →
oldman © (2008-01-30 15:40) [4]
> Tserberus (30.01.08 15:38) [3]
А ты чего?
Сабж без объяснения причин и симптомов.
Сам вирус подхватил (а может и не вирус ваще).
Сам его поборол.
А наезды беспочвенные в форум кидаешь.
← →
Agent13 © (2008-01-30 15:58) [5]Поскольку не успел отписаться в ветке про сорсы этого самого декомпилера, то напишу здесь. Обратил ли кто-нибудь внимание, что именно уважаемый ZoldBerger пытался предоставить в качестве исходников (помимо бреда на N мегабайт)?
Так вот, если кто не подметил, сравните содержимое файла unc.o4cs, опубликованное здесь: Andy BitOff © (26.01.08 22:48) [45] http://delphimaster.net/view/15-1201366691/
с вот этой выдержкой:{*******************************************************}
{ }
{ Borland Delphi Visual Component Library }
{ }
{ Copyright (c) 1999-2005 Borland Software Corporation }
{ }
{*******************************************************}
unit ActnList;
{$T-,H+,X+}
interface
uses Classes, Messages, ImgList, Contnrs;
type
{ TContainedAction }
TCustomActionList = class;
TContainedAction = class(TBasicAction)
private
FCategory: string;
FActionList: TCustomActionList;
function GetIndex: Integer;
function IsCategoryStored: Boolean;
procedure SetCategory(const Value: string);
procedure SetIndex(Value: Integer);
procedure SetActionList(AActionList: TCustomActionList);
protected
procedure ReadState(Reader: TReader); override;
procedure SetParentComponent(AParent: TComponent); override;
public
destructor Destroy; override;
function Execute: Boolean; override;
function GetParentComponent: TComponent; override;
function HasParent: Boolean; override;
function Update: Boolean; override;
property ActionList: TCustomActionList read FActionList write SetActionList;
property Index: Integer read GetIndex write SetIndex stored False;
published
property Category: string read FCategory write SetCategory stored IsCategoryStored;
end;
TContainedActionClass = class of TContainedAction;
{ TActionListEnumerator }
TActionListEnumerator = class
private
FIndex: Integer;
FActionList: TCustomActionList;
public
constructor Create(AActionList: TCustomActionList);
function GetCurrent: TContainedAction;
function MoveNext: Boolean;
property Current: TContainedAction read GetCurrent;
end;
и т.д. Похоже, не правда ли? :) Так вот видать напильник, которым это обрабатывалось и есть тот самый мистический Navity :)
Страницы: 1 вся ветка
Форум: "Прочее";
Текущий архив: 2008.03.02;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.058 c