Druga Instancja Interfejsu

Article View: pl.comp.lang.delphi

Article #334906

Back to pl.comp.lang.delphi Previous Next

#334906

From: konsul41
Date: Tue, 24 Jan 2012 08:10

34 lines
1887 bytes

Delphi XE

Opis:
Czy da się stworzyć drugą instancję/egzemplarz instniejącego Interfejsu 
mając tylko istniejącą instancję/egzemplarz.

IPitDraw = interface(IObiekt)
    ['{E4FE2E92-7B11-4ABB-BBA6-FBA87BA11387}']
end;

Tworzę w dll tak

CONST NazwaObiektu = 'Etykieta1';

procedure CIPitDraw(out   Obiekt: IPitDraw; out ObiektName : String);
begin
  Obiekt:=TEtykieta1.Create;
  ObiektName:=NazwaObiektu;
end;

procedure ObiektName(out ObiektName : String);
begin
   ObiektName:=NazwaObiektu;
end;


Biblioteka jest ładowana dynamicznie i uchwyt zapamiętany na liście dlli
w programie wywołuję CIPitDraw i mam interfejs

Pytanie:
Czy da się stworzyć drugą instancję/egzemplarz instniejącego Interfejsu 
mając tylko istniejącą instancję/egzemplarz?
Czy muszę przeszukiwać listę DLLI i i odpytywać o nazę obsługiwanego obiektu 
i jak obsługuje to tworzyć nowy?

Technical Details

Message-ID: <4f1e676c$0$1226$65785112@news.neostrada.pl>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!goblin2!goblin.stu.neva.ru!feeder.erje.net!news-hub.siol.net!nx01.iad01.newshosting.com!newshosting.com!newsfeed.neostrada.pl!unt-exc-01.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mail

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!goblin2!goblin.stu.neva.ru!feeder.erje.net!news-hub.siol.net!nx01.iad01.newshosting.com!newshosting.com!newsfeed.neostrada.pl!unt-exc-01.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mail
From: <konsul41@wp.pl>
Newsgroups: pl.comp.lang.delphi
Subject: Druga Instancja Interfejsu
Date: Tue, 24 Jan 2012 09:10:22 +0100
MIME-Version: 1.0
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.5931
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.6157
Lines: 37
Message-ID: <4f1e676c$0$1226$65785112@news.neostrada.pl>
Organization: Telekomunikacja Polska
NNTP-Posting-Host: 178.42.204.87
X-Trace: 1327392620 unt-rea-b-01.news.neostrada.pl 1226 178.42.204.87:1153
X-Complaints-To: abuse@news.neostrada.pl
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit