Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите!

devol © (2002-09-30 17:05:00)
Скачал листинг программы, которая использует DesignIntf и DesignEditors. Все бы хорошо, но это DesignEditors использует у себя юнит Proxies, который я никак не могу найти.
Может кто знает как решить эту проблемку!

Заранее благодарен!

kva (2002-10-02 09:29:00) [1]
Привет!
> Юрий Федоров & Григорий Ситнин

А у меня (D5) только
..\Delphi5\Doc\proxies.int
и
..\Delphi5\lib\Debug\proxies.dcu
..\Delphi5\lib\proxies.dcu
и ни design60.bpl ни design50.bpl вообще нет.
Так ваши ответы относятся к Delphi 6 или и к 5 то же?

Сам текст proxies.int:
========= начало ========

{*******************************************************}
{ }
{ Borland Delphi Visual Component Library }
{ }
{ Utilities procedures to help a form designer }
{ constructor psuedo classes and methods to help }
{ correctly stream instances. }
{ }
{ Copyright (c) 1995,99 Inprise Corporation }
{ }
{*******************************************************}

unit Proxies;

interface

procedure CreateSubClass(Instance: TObject; const ClassName, UnitName: string;
Ancestor: TClass); overload;
procedure CreateSubClass(Instance: TObject; const ClassName: string;
Ancestor: TClass); overload;
procedure DestroySubClass(Instance: TObject);
procedure RenameSubClass(Instance: TObject; const ClassName: string;
const UnitName: string = "");
function CreateSubClassMethod(Instance: TObject;
const MethodName: string): Pointer;
procedure ChangeToProxyClass(Instance: TObject; Proxy: TClass);
procedure RenameSubClassMethod(Instance: TObject; Method: Pointer;
const MethodName: string);
procedure DestroySubClassMethod(Instance: TObject; Method: Pointer);
function IsProxyClass(ClassType: TClass): Boolean;

implementation

========= конец ======

Григорий Ситнин (2002-09-30 17:49:00) [2]
Ага и прибили изначальный Proxies.dcu

Всего-то надо было подключить к проекту библиотеку designide60.bpl, в которой есть этот модуль.

devol (2002-09-30 17:44:00) [3]
спасибо большое!

Юрий Федоров (2002-09-30 17:29:00) [4]
сохрани в Source\toolsApi

Юрий Федоров (2002-09-30 17:27:00) [5]
unit Proxies;

interface

function IsProxyClass(ComponentClass: TClass): Boolean;

implementation

function IsProxyClass(ComponentClass: TClass): Boolean;
begin
Result := True;
end;

end.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »