Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   FreePascal (https://www.delphipraxis.net/74-freepascal/)
-   -   Verschiedene Controls an Procedur übergeben (https://www.delphipraxis.net/164048-verschiedene-controls-procedur-uebergeben.html)

JamesTKirk 27. Okt 2011 16:43

AW: Verschiedene Controls an Procedur übergeben
 
Zitat:

Zitat von DeddyH (Beitrag 1132886)
Zitat:

Zitat von JamesTKirk (Beitrag 1132885)
Normalerweise wird
Delphi-Quellcode:
Canvas
aber nicht als
Delphi-Quellcode:
public
gekennzeichnet...

Dann kommst Du ja gar nicht ran, auch nicht mit 10.000 "is"-Abfragen.

Ups. :oops: Ich meine natürlich, dass Canvas normalerweise nicht als
Delphi-Quellcode:
published
, sondern nur als
Delphi-Quellcode:
public
gekennzeichnet wird.

Gruß,
Sven

DeddyH 27. Okt 2011 16:47

AW: Verschiedene Controls an Procedur übergeben
 
Deshalb ja meine Ableitungen, da die "alte" RTTI eben nur mit published Properties kann. Doof, aber ich kann es auch nicht ändern.

Guido Eisenbeis 27. Okt 2011 23:06

AW: Verschiedene Controls an Procedur übergeben
 
Zitat:

Zitat von JamesTKirk (Beitrag 1132885)
Zitat:

Zitat von Guido Eisenbeis (Beitrag 1132798)
Zitat:

Zitat von JamesTKirk (Beitrag 1132787)
Du hast zwar zwischenzeitlich bereits geantwortet, aber vielleicht hilft dir das trotzdem weiter:

Ja, auf jeden Fall. Deine Idee ist sehr "praktisch-orientiert", sprich: macht Nägel mit Köpfen, und stellt das dar, was ich als "Workaround" ansehen würde. Das wäre auch mein Ansatz, wenn uns nichts "besseres" einfällt (und ein guter!).

Ich sehe meinen Ansatz nicht als Workaround, sondern als (eine) korrekte Lösung an, die ohne irgendwelche "wir-leiten-die-Klasse-ab-und-machen-Canvas-public"-Aktionen (wie DeddyH es in seinem Code gemacht hat) auskommt. Letzteres sehe ich(!) nämlich als Workaround und "unsauber" an.


Workaround ist nicht negativ gemeint. In Online-Übersetzer dict.cc wird Workaround zwar unter anderem als "Notlösung" bezeichnet (was an sich ja auch schon nicht negativ ist), aber überwiegend als "Zwischenlösung", "Übergangslösung" und, was mir eigentlich im Sinn war, als "Problemumgehung".

Ich unterscheide sehr wohl zwischen "unsauber" und "Workaround". Über "unsauber" muss man nichts sagen, das geht einfach nicht (für mich). Ein Workaround ist für mich wirklich eine Problemumgehung, das heißt ein Problem wird nicht direkt angegangen, sonder umgangen. (Dazu gleich mehr!)
Das war also nicht bös gemeint. (Ich hab ja auch geschrieben "Nägel mit Köpfen" und dass das auch mein Ansatz wäre. *Alles wieder gut?* :cheers:

Zurück zum Thema. Ich fasse zusammen:

- Einer Procedur wird unter anderem ein Object als Parameter übergeben.
- Es sollen Eigenschaften und Methoden dieses Objects in der Procedure verwendet werden.
- Der Typ des Object ist je nach Aufruf verschieden.
- Es soll sichergestellt werden, die gewünschten Eigenschaften / Methoden nutzen zu können.
- Die Nutzung soll durch einen gezielten TypCast erfolgen (also ohne 1000 if-Abfragen).

-> Problem: Welcher Klassen-Typ kann zu diesem Zweck im Object-Übergabeparameter verwendet werden?

Fazit:

Ich bin der Ansicht, dass eine direkte Lösung mit o. g. Vorgaben und den derzeitegen Mitteln nicht machbar ist. Mein weiteres Vorgehen wird eine Umgehung des Problems sein, also ein Workaround. Es wurden hier vielversprechende Ansätze gezeigt, die ich aufgreifen werde. Das Problem sehe ich nicht als gelöst, aber als beendet an. Für den Workaround werde ich einen eigenen Thread erstellen und hier verlinken.

Ich danke allen, die mitgeholfen haben! :-D :thumb:

Vielen Dank,
Guido.

Edit: Der Workaround zu diesem Problem wird in diesem Thread behandelt.


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:53 Uhr.
Seite 3 von 3     123   

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-2025 by Thomas Breitkreuz