Komponente nur einmal pro Anwendung "zulassen"

[Alex_ITA01]

Hallo erstmal,
ich wollte mal fragen, ob es eine Möglichkeit gibt, eine Komponente nur einmal in einer Anwendung zuzulassen. Also es darf nicht 3 oder 4 oder 2 mal diese Kompo pro Anwendung existieren...
Gibts da eine Möglichkeit?

MFG Alex

[Joe24]

Spontan würde ich das so realisieren:

Über einen Timer mit GetParentForm.Components[ i] die Klasse aller untergeordneten Objekte erfassen. Bei doppeltem Vorkommen betreffende Objekte wieder freigeben.

[Stevie]

Moin,

du erstellst eine Variable in der Komponenten-Unit und setzt diese beim Create auf True (oder inkrementierst sie, wenn eine maximale Anzahl) und beim Destroy umgekehrt. Im Create überprüfst du diese Variable und brichst eventuell den Vorgang mit einer Meldung ab.

MfG
Stevie

[Alex_ITA01]

danke für den Tip, aber mit Timer wollte ich eigentlich nicht arbeiten und ich möchte wenn es möglich ist, schon das Drag&Drob aus der Komponentenpalette nur einmal erlauben (also das eben pro Anwendung die Kompo nur einmal vorkommt)

MFG Alex

[Alex_ITA01]

hab ich mir auch so überlegt Stevie :-)

Nur wie breche ich das im Konstrutor ab? einfach Destroy aufrufen um alles freizugeben?

MFG Alex

[Stevie]

Zitat:

Zitat von Alex_ITA01

hab ich mir auch so überlegt Stevie :-)

Nur wie breche ich das im Konstrutor ab? einfach Destroy aufrufen um alles freizugeben?

MFG Alex

Wenn, dann das i... :mrgreen:

Nein, bloß nicht den Destruktor aufrufen!!!
Ein

Delphi-Quellcode:

raise Exception.CreateFmt('Es existiert bereits ein Objekt vom Typ %s!', [ClassName]);

wird reichen.

[Alex_ITA01]

achja das i war's...

Du meinst sicher den Destructor nicht aufrufen oder?

okay werde es mit einer Variable probieren und dann so "beenden"

Delphi-Quellcode:

raise Exception.CreateFmt('Es existiert bereits ein Objekt vom Typ %s!', [ClassName]);

MFG Alex

[sakura]

Eigentlich ganz einfach. Beiliegendes Beispiel hat allerdings einen Nachteil. Im Designmodus wird es nicht richtig funktionieren, wenn Du zwei Forms öffnest, wo die Komponente draufliegt (und diese nicht zur gleichen App gehören). Ansonsten müsste es eigentlich gehen. Der Trick besteht darin sich in einer privaten globalen Unit-Variablen zu merken, wie oft die Komponente erstellt wurde. Jedes Mal wenn diese erstellt wird, inkrementierst Du den Zähler, beim Zerstören dekrementierst Du den wieder.

Wenn der Zähler größer 1 wird, dann wirfst Du eine Exception raus. Immer im Destructor wieder dekrementieren, auch bei der Exception, da unter Win32 der auch wieder aufgerufen wird, wenn eine Exception auftritt (Resourcenfreigabe).

...:cat:...

[sakura]

Zitat:

Zitat von Stevie

du erstellst eine Variable in der Komponenten-Unit und setzt diese beim Create auf True

Wird nicht gehen, da bei der letzten diese wieder auf False gesetzt wird, allerdings wird der der Destructor immer aufgerufen, auch wenn im Constructor eine Excpetion auftritt. Dann passiert folgendes:

• Erste Komponente erstellen -> True
• Zweite Komponente erstellen -> Exception
• Destructor der zweiten Komponente setzt Var auf False
• Dritte Komponente kann wieder erstellt werden, da jetzt False ;)

...:cat:...

[Alex_ITA01]

danke schön für das Beispiel @Sakura
Ich glaube es geht :-) (Muss es nur schnell testen)

MFG Alex