Ist in einem Pointer ein TObject

**xaromz**

Hallo,

folgendes Problem: Ich hab einen Pointer. Da kann ein TObject drin sein, oder ein IInterface.
Wie kann ich herausfinden, was von den beiden ich grade vor mir habe?

Gruß
xaromz

**Ultimator**

Evtl mit

markieren

Delphi-Quellcode:

			if (PtrDings^ is TObject) then

  ShowMessage('OBJEKT!') 

else

if (PrtDings^ is IInterface) then 

  ShowMessage('IINTERFACE!')

else

  ShowMessage('WAS ANDERES!');

**sniper_w**

markieren

Delphi-Quellcode:

			if (PtrDings^ is TObject) then

  ShowMessage('OBJEKT!')

sollte

markieren

Delphi-Quellcode:

			if (PtrDings is TObject) then

  ShowMessage('OBJEKT!')

**Chewie**

So funktioniert das ganze eh nicht, in beiden Fällen würde angezeigt werden, dass es sich um ein Objekt handelt. Der Grund:
Jedes Interface, das einem begegnet, ist von einem Objekt implementiert worden. Und dieses ist wiederum vom Typ TObject.
Also wenn schon, dann zuerst nach dem Interface fragen.

**Oxmyx**

Das ganze funktioniert prinzipiell nicht, wenn es sich um einen untypisierten Zeiger handelt. Denn auf einen solchen ist der is-Operator natürlich nicht anwendbar.

**Ultimator**

Ja, stimmt, sorry

Wie stehts denn mitif TObject(PtrDings) is TObject then.. oderif TObject(PtrDings) is IInterface then.. ? Habs nicht getestet

**xaromz**

Hallo,

Zitat:

if TObject(PtrDings) is IInterface then..

Das hatte ich auch gedacht, aber Delphi sagt "Operator auf diesen Operandentyp nicht anwendbar".

Gruß
xaromz

**Ultimator**

markieren

Delphi-Quellcode:

			if TObject(PtrDings) is TObject then

 ShowMessage('Object');

Das klappt.

Das mit IInterface klappt leider nicht

Aber wenn wir den Pointer zu TObject casten, dass ergibt eine Prüfung auf TObject natürlich true

**Christian Seehase**

Moin Zusammen,

Zitat von Ultimator:

markieren

Delphi-Quellcode:

			if TObject(PtrDings) is TObject then

 ShowMessage('Object');

Das klappt.

Das mit IInterface klappt leider nicht

Aber wenn wir den Pointer zu TObject casten, dass ergibt eine Prüfung auf TObject natürlich true

oder, um es etwas deutlicher zu machen:

Durch TObject(PtrDings) sagt man dem Compiler, dass man sich sicher ist, dass PtrDings vom Typ TObject ist, bzw. dass der Compiler hier nicht den Typ prüfen muss. Ob diese Art Typecast dann auch stimmt liegt in der Verantwortung dessen der es schreibt.

Ist in einem Pointer ein TObject

Ist in einem Pointer ein TObject

Re: Ist in einem Pointer ein TObject

Re: Ist in einem Pointer ein TObject

Re: Ist in einem Pointer ein TObject

Re: Ist in einem Pointer ein TObject

Re: Ist in einem Pointer ein TObject

Re: Ist in einem Pointer ein TObject

Re: Ist in einem Pointer ein TObject

Re: Ist in einem Pointer ein TObject

Re: Ist in einem Pointer ein TObject

Forumregeln

xaromz Registriert seit: 18. Mär 2005 1.682 Beiträge Delphi 2006 Enterprise	#1 Ist in einem Pointer ein TObject 13. Okt 2005, 15:16 Hallo, folgendes Problem: Ich hab einen Pointer. Da kann ein TObject drin sein, oder ein IInterface. Wie kann ich herausfinden, was von den beiden ich grade vor mir habe? Gruß xaromz
	Zitat

Ultimator Registriert seit: 17. Feb 2004 Ort: Coburg 1.860 Beiträge FreePascal / Lazarus	#2 Re: Ist in einem Pointer ein TObject 13. Okt 2005, 15:30 Evtl mit markieren Delphi-Quellcode: if (PtrDings^ is TObject) then ShowMessage('OBJEKT!') else if (PrtDings^ is IInterface) then ShowMessage('IINTERFACE!') else ShowMessage('WAS ANDERES!'); Julian J. Pracht
	Zitat

sniper_w Registriert seit: 11. Dez 2004 Ort: Wien, Österriech 893 Beiträge Delphi 6 Enterprise	#3 Re: Ist in einem Pointer ein TObject 13. Okt 2005, 15:45 markieren Delphi-Quellcode: if (PtrDings^ is TObject) then ShowMessage('OBJEKT!') sollte markieren Delphi-Quellcode: if (PtrDings is TObject) then ShowMessage('OBJEKT!') Katura Haris Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
	Zitat

Oxmyx Registriert seit: 21. Sep 2004 499 Beiträge	#5 Re: Ist in einem Pointer ein TObject 13. Okt 2005, 16:12 Das ganze funktioniert prinzipiell nicht, wenn es sich um einen untypisierten Zeiger handelt. Denn auf einen solchen ist der is-Operator natürlich nicht anwendbar.
	Zitat

Ultimator Registriert seit: 17. Feb 2004 Ort: Coburg 1.860 Beiträge FreePascal / Lazarus	#6 Re: Ist in einem Pointer ein TObject 13. Okt 2005, 16:14 Ja, stimmt, sorry Julian J. Pracht
	Zitat

Dax (Gast) n/a Beiträge	#7 Re: Ist in einem Pointer ein TObject 13. Okt 2005, 16:15 Wie stehts denn mitif TObject(PtrDings) is TObject then.. oderif TObject(PtrDings) is IInterface then.. ? Habs nicht getestet
	Zitat

xaromz Registriert seit: 18. Mär 2005 1.682 Beiträge Delphi 2006 Enterprise	#8 Re: Ist in einem Pointer ein TObject 13. Okt 2005, 16:29 Hallo, Zitat: if TObject(PtrDings) is IInterface then.. Das hatte ich auch gedacht, aber Delphi sagt "Operator auf diesen Operandentyp nicht anwendbar". Gruß xaromz
	Zitat

Ultimator Registriert seit: 17. Feb 2004 Ort: Coburg 1.860 Beiträge FreePascal / Lazarus	#9 Re: Ist in einem Pointer ein TObject 13. Okt 2005, 16:40 markieren Delphi-Quellcode: if TObject(PtrDings) is TObject then ShowMessage('Object'); Das klappt. Das mit IInterface klappt leider nicht Aber wenn wir den Pointer zu TObject casten, dass ergibt eine Prüfung auf TObject natürlich true Julian J. Pracht
	Zitat