Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Variable as Klasse - Wann verwenden (https://www.delphipraxis.net/152892-variable-klasse-wann-verwenden.html)

idefix2 11. Jul 2010 16:46

Variable as Klasse - Wann verwenden
 
Hallo,

ich vermute, dass zwischen folgenden beiden Sprachkonstrukten kein Unterschied besteht, bin mir aber nicht sicher:

Delphi-Quellcode:
with TWinControl (AOwner) do
und

Delphi-Quellcode:
with AOwner as TWinControl do
Gibt es Fälle, wo man nur das eine oder nur das andere verwenden darf?

mkinzler 11. Jul 2010 16:47

AW: Variable as Klasse - Wann verwenden
 
Das erste ist ein harter Cast, das 2. ein softer.
Der Softcast überprüft, ob das Objekt kompatibel ist und wirft eine entsprechende Exception, wenn das nicht der Fall ist.

idefix2 11. Jul 2010 16:49

AW: Variable as Klasse - Wann verwenden
 
Ah, danke - wieder etwas dazugelernt :)

himitsu 11. Jul 2010 18:00

AW: Variable as Klasse - Wann verwenden
 
Markus hat ja nun die Interna genannt.

- also der harte Cast ist schneller (fällt aber nur auf, wenn sehr schnell sehr oft geprüft werden muß), da es keine Prüfung gibt und das Objekt in der Variable einfach so genommen wird, als wäre die gewünschte Klasse drinnen.
(wenn vorher schonmal mit AS oder IS geprüft wurde, dann kann man dieses z.B. nutzen oder wenn man sich durch andere Maßnahmen ganz sicher ist, dann ebenfalls)

Mschmidt 11. Jul 2010 18:43

AW: Variable as Klasse - Wann verwenden
 
will man wirklich sooo programmieren?
Warum verwendest du keine Interfaces?
:-)

idefix2 12. Jul 2010 08:50

AW: Variable as Klasse - Wann verwenden
 
@ MSchmidt
????

Sherlock 12. Jul 2010 09:17

AW: Variable as Klasse - Wann verwenden
 
Da bin ich aber auch gespannt. Wieso sollte man sich mit Interfaces beschäftigen, wenn man nur mal eben mit dem Sender eines Events oder in diesem Fall dem Owner eines Objects hantieren will.

Sherlock

Mschmidt 14. Jul 2010 17:52

AW: Variable as Klasse - Wann verwenden
 
ich dachte mir, wenn Sender ein Interface implementiert kann man ohne Prüfung dieses verwenden, statt typecasting.
oder?

himitsu 14. Jul 2010 17:57

AW: Variable as Klasse - Wann verwenden
 
Wenn man ein "Objekt" an eine Interface-Variable oder einen -Parameter übergibt,
dann führt Delphi automatisch eine Konvertierung durch, aber nur wenn das Objekt, genauer der Type der Objektvariable (die Objektvariable, bzw. der Objekt-Type bei .Create) dieses Interface unterstützt, sonst mekert schon der Compiler ... und wenn das Objekt dieses dann zur Laufzeit dann dennoch nicht kennt, dann knallt es eben da.

Das AS ist doch quasi auch nur eine delphiinterne Umleitung zu Supports, inkl. einer Typenprüfung.

Stevie 15. Jul 2010 06:40

AW: Variable as Klasse - Wann verwenden
 
Sowas würde gehen, auch wenn in Sender ein Edit übergeben wurde:
Delphi-Quellcode:
procedure Foo(Sender: TObject);
begin
  TButton(Sender).Caption := 'Hello';
end;
weil sowohl Button als auch TEdit über die Eigenschaft Caption verfügen aber die Typen eigentlich nicht zuweisungskompatibel sind.

Bei
Delphi-Quellcode:
(Sender as TButton).Caption := 'Hello';
wird zur Laufzeit eine EInvalidCast Exception geraised.

Willst du ganz sicher gehen, müsstest du sowas machen:
Delphi-Quellcode:
if Sender is TButton then
  TButton(Sender).Caption := 'Hello';
@Himi: Supports ist für Interfaces und hat mit dem as Operator eigtl nix zu tun, du kannst as nichtmal mit einem Interface benutzen, allerhöchstens eine Interface Variable wieder auf eine Klasse umcasten geht mit Delphi 2010.

himitsu 15. Jul 2010 06:55

AW: Variable as Klasse - Wann verwenden
 
Zitat:

Zitat von Mschmidt (Beitrag 1035316)
ich dachte mir, wenn Sender ein Interface implementiert kann man ohne Prüfung dieses verwenden, statt typecasting.
oder?

Zitat:

Zitat von Stevie (Beitrag 1035365)
@Himi: Supports ist für Interfaces und hat mit dem as Operator eigtl nix zu tun, du kannst as nichtmal mit einem Interface benutzen,

Nee, Interface in Objekt geht (eigentlich) nicht, aber andersrum geht.
Delphi-Quellcode:
var Obj: TMyObj;
  Intf: IMyIntf;
  Intf2: IInterface;

Intf := Obj as IMyIntf;
// oder nur, da das Interface vom Ziel (der Intf-Variable) genommen wird
Intf := Obj;

Intf2 := Obj as IMyIntf;
// hier würde dagegen in Intf2 nur IInterface von Obj drinstecken
Intf2 := Obj;
Zitat:

Zitat von Stevie (Beitrag 1035365)
allerhöchstens eine Interface Variable wieder auf eine Klasse umcasten geht mit Delphi 2010.

:shock: werd ich dann mal testen, aber vom Wesen der Interfaces her, gibt es eigentlich kein direktes Zurück.
(hab mir bisher damit beholfen, daß ich im Interface eine Methode implementiert hab, ala GibMitBitteDeinInneresObjekt)

mkinzler 15. Jul 2010 06:57

AW: Variable as Klasse - Wann verwenden
 
Man kann aber per Interface ermitteln, ob das Objekt bestimmte Methoden unterstützt

himitsu 15. Jul 2010 07:08

AW: Variable as Klasse - Wann verwenden
 
Zitat:

Zitat von mkinzler (Beitrag 1035370)
Man kann aber per Interface ermitteln, ob das Objekt bestimmte Methoden unterstützt

Meinst du nicht "Ob ein unterstütztes Interface bestimmte Methoden bereitstellt" ?

mkinzler 15. Jul 2010 07:20

AW: Variable as Klasse - Wann verwenden
 
Ob die Klasse eines Objektes ein Interface implementiert, welches die gewünschte Methode beinhaltet

Stevie 15. Jul 2010 07:45

AW: Variable as Klasse - Wann verwenden
 
Zitat:

Zitat von himitsu (Beitrag 1035368)
:shock: werd ich dann mal testen, aber vom Wesen der Interfaces her, gibt es eigentlich kein direktes Zurück.
(hab mir bisher damit beholfen, daß ich im Interface eine Methode implementiert hab, ala GibMitBitteDeinInneresObjekt)

Ging vor Delphi 2010 auch mit nem Hack (hat Hallvard Vassbotn mal vor Urzeiten gebastelt und ist auch in der JCL enthalten).
Seit Delphi 2010 aber wie gesagt offiziell vom Compiler unterstützt.

himitsu 15. Jul 2010 07:57

AW: Variable as Klasse - Wann verwenden
 
Zitat:

Zitat von Stevie (Beitrag 1035377)
...

Das ist dann aber ein Delphiinterner "Hack", welcher nur mit den Interfaces von Delphi geht?

[edit]
Zitat:

Diese Typumwandlung gilt für Interfaces, die aus Delphi-Objekten ermittelt wurde
OK, also doch :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:37 Uhr.

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