Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi über Objekte einer Klasse iterieren (https://www.delphipraxis.net/100375-ueber-objekte-einer-klasse-iterieren.html)

s-off 27. Sep 2007 11:05

Re: über Objekte einer Klasse iterieren
 
Also nocheinmal,

eine Klasse, die von TObject abgeleitet ist, bringt von Haus aus keine Möglichkeit mit, über alle ihr zugehörigen Objekte zu iterieren.

Fazit: Man muss selber dafür sorgen, dass diese Funktionalität implementiert wird, wenn man sie denn wünscht.

Für einige Klassen ist dieses bereits implmentiert worden. Beispielsweise für TForm und ihr Feld FComponents, wie bereits in #2 erläutert.
FComponents ist vom Typ TList. In ihr werden sämtliche Componenten gespeichert, die auf der Instanz von TForm erzeugt werden.

Edit: Ah, Rekursion in diesem Fall hat Luckie schon erläutert.

alzaimar 27. Sep 2007 11:25

Re: über Objekte einer Klasse iterieren
 
Zitat:

Zitat von s-off
Für einige Klassen ist dieses bereits implmentiert worden. Beispielsweise für TForm und ihr Feld FComponents, wie bereits in #2 erläutert.

:gruebel: Das Eine hat doch nichts mit dem Anderen zu tun. Wincontrols können als Container fungieren und stelln deshalb logischerweise Funktionalitäten bereit, die es ermöglichen, durch den Container zu iterieren. Das betrifft jedoch andere Objekte, die auf ihr drauf liegen, aber nicht die Form selbst...

Die TForms-Klasse weiss aber auch nicht, wie viele Forms denn so rumfleuchen. Das geht auch gar nicht, weil eine Klasse keine Felder besitzen kann, die aber irgendwie für die Implementierung dieser Funktionalität von Nöten wäre.

Erstelle Dir also einen Container für deine Objekte. Im Construktor fügst Du die Instanz in die Liste ein und im Destruktor wieder raus.

Delphi-Quellcode:
TPanelContainer = Class (TList) ...
...
End;

Var
  MyPanelContainer : TPanelContainer;

TMyPanel = Class (TPanel)
  Constructor Create (aOwner : TComponent); Override;
  Destructor Destroy;
...
End;

Constructor TMyPanel.Create (aOwner : TComponent);
Begin
  inherited;
  MyPanelContainer.Add (Self);
...
end;

Destructor TMyPanel.Destroy;
Begin
  MyPanelContainer.Remove (Self);
  ...
  inherited
End;

Bomberbb 27. Sep 2007 11:28

Re: über Objekte einer Klasse iterieren
 
ich glaube alzaimar ist der erste der mich verstanden hat!!!
Danke!!! Ist genau das was ich brauche.

Luckie 27. Sep 2007 11:30

Re: über Objekte einer Klasse iterieren
 
Hier noch mal ein kleines Tutorial dazu: http://www.michael-puff.de/Developer...er_Klassen.php

s-off 27. Sep 2007 11:41

Re: über Objekte einer Klasse iterieren
 
Zitat:

Zitat von alzaimar
Zitat:

Zitat von s-off
Für einige Klassen ist dieses bereits implmentiert worden. Beispielsweise für TForm und ihr Feld FComponents, wie bereits in #2 erläutert.

:gruebel: Das Eine hat doch nichts mit dem Anderen zu tun. Wincontrols können als Container fungieren und stelln deshalb logischerweise Funktionalitäten bereit, die es ermöglichen, durch den Container zu iterieren. Das betrifft jedoch andere Objekte, die auf ihr drauf liegen, aber nicht die Form selbst...

Wieso hat das eine mit dem anderen nichts zu tun?
Die Form (Instanz der Klasse) weiß aber, was auf ihr liegt (Komponenten).

Zitat:

Zitat von alzaimar
Die TForms-Klasse weiss aber auch nicht, wie viele Forms denn so rumfleuchen. Das geht auch gar nicht, weil eine Klasse keine Felder besitzen kann, die aber irgendwie für die Implementierung dieser Funktionalität von Nöten wäre.

Das habe ich doch auch gar nicht behauptet. Aber eine Instanz von TForm weiß, wieviele Komponenten auf ihr 'rumfleuchen'

Zitat:

Zitat von alzaimar
Erstelle Dir also einen Container für deine Objekte. Im Construktor fügst Du die Instanz in die Liste ein und im Destruktor wieder raus.

Spreche ich chinesisch :?: :!:
Das ist doch genau das, was ich die ganze Zeit gesagt habe; in jedem der Beiträge oben habe ich gesagt, dass er es seiner Klasse beibringen muss.
Was eine Liste (FComponents) der Container für TForm ist muss er sich für seine Klasse auch bauen.
Und damit meinte ich genau das, was alzaimar mit seinem PanelContainer vorgeschlagen hat :!: :!: :!:

Deutlicher kann man es wohl ohne Codebeispiel nicht erläutern.
Und dass Du, BomberBB, mich nicht ohne Beispiel verstanden hast, tut mir leid. Deswegen musst Du allerdings nocch lange nicht allen anderen unterstellen, sie hätten Dich nicht verstanden :wall:

alzaimar 27. Sep 2007 11:53

Re: über Objekte einer Klasse iterieren
 
Zitat:

Zitat von s-off
Wieso hat das eine mit dem anderen nichts zu tun?

Das eine ist ein Container, das Andere eine Liste von Objekten. Na klar ist ein Container eine Liste von Objekten, aber hier (TForm) haben wir eine übergeordnete Klasse, die ihre Kinder verwaltet. Das ist aber nicht erwünscht.
Wir wollen eine Klasse, die ihre Instanten automatisch in eine bestimmte Liste (achtung! Singleton!) schreibt und wieder entfernt.

Der Unterschied zur Containerklasse TWinControl ist der:
Ich kann ein Control (also ein potentielles Kind der TForm) instantiieren, ohne das es auf einer Form ist. Damit taucht es in keiner Controls-Liste auf.

Wenn ich aber eine Instanz von TMyPanel erzeuge, dann taucht es in jedem Fall in einer Liste auf.

Ansonsten gebe ich dir recht: Ich habe nur übersetzt, was Du schon vorher gesagt hast.

s-off 27. Sep 2007 11:56

Re: über Objekte einer Klasse iterieren
 
Upsi, habe vielleicht etwas zu harsch geantwortet.
Deine Erläuterung werde ich beim Mittagessen mal Revue passieren lassen - danke :wink:

alzaimar 27. Sep 2007 12:02

Re: über Objekte einer Klasse iterieren
 
Zitat:

Zitat von s-off
Upsi, habe vielleicht etwas zu harsch geantwortet.

Na ja, :cry: geht aber schon wieder. :zwinker:

Bomberbb 27. Sep 2007 12:17

Re: über Objekte einer Klasse iterieren
 
@s-off:
Zitat:

Und dass Du, BomberBB, mich nicht ohne Beispiel verstanden hast, tut mir leid. Deswegen musst Du allerdings nocch lange nicht allen anderen unterstellen, sie hätten Dich nicht verstanden ouch!
Du sprichst von:
Zitat:

FComponents ist vom Typ TList. In ihr werden sämtliche Componenten gespeichert, die auf der Instanz von TForm erzeugt werden.
das wollte ich auch nicht haben. Ich wollte über alle Intanzen einer Klasse iterieren. Ob ich das jetzt schlecht erklärt habe oder ob das nicht so verstanden wurde wie ich das meinte kann man unter Komunikationsprobleme abhaken. Ist für mich aber lange kein Grund für den Umgangston aus #15.

@alzaimar:

DANKE. Funzt bestens!!!

peschai 27. Sep 2007 12:39

Re: über Objekte einer Klasse iterieren
 
Hallo Kollegen,

@s-off:
Bitte weniger Vorwürfe was ein anderer falsch macht oder schreibt oder nicht liest und mehr konstruktive hilfe.

@BomberBB:
Self ist in Wirklichkeit ein Zeiger auf das Object selbst. Damit kannst du in jeder ObjectMethode das object selbst ansprechen. Mit einem typecast wie Pointer(Self) kannst du das auch nutzen ... z.b. in einer Liste abspeichern, etc ... Dass benutzt z.b. das Beiepisl von Alzaimar.


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:16 Uhr.
Seite 2 von 3     12 3      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz