If typeof..is listview OHNE listview: Fehlermeldung vermeiden?

03/09/2009 - 19:10 von Thomas Hoffmann | Report spam
Tag
im Rahmen einer Resize-Klasse für programmiertes Anpassen meiner controls an verànderte
Form-Größen kommt die Zeile vor

If TypeOf frm.Controls(I) Is ListView Then
...

um auch die Listview-headers zu resizen.

In Projekten, in denen kein Listview eingebunden ist kommt es nun (natürlich) zu der
Fehlermeldung "Benutzerdefinierter Typ nicht definiert".

Gibt es irgendeinen Kniff, um diese Fehlermeldung zu vermeiden, wenn im Projekt kein
listview existiert?

Gruß und Dank!
TH

Thomas Hoffmann
 

Lesen sie die antworten

#1 Thorsten Albers
04/09/2009 - 13:43 | Warnen spam
Thomas Hoffmann schrieb im Beitrag
<h7ot8d$ttm$02$...
Tag
im Rahmen einer Resize-Klasse für programmiertes Anpassen meiner controls


an verànderte
Form-Größen kommt die Zeile vor

If TypeOf frm.Controls(I) Is ListView Then
...

um auch die Listview-headers zu resizen.

In Projekten, in denen kein Listview eingebunden ist kommt es nun


(natürlich) zu der
Fehlermeldung "Benutzerdefinierter Typ nicht definiert".

Gibt es irgendeinen Kniff, um diese Fehlermeldung zu vermeiden, wenn im


Projekt kein
listview existiert?



Da der Fehler ja zur Entwurfszeit auftritt, bleibt m.E. nur die
Möglichkeit, mit einer Pràprozessor-Variablen zu arbeiten. Schematisch:

#If CheckAuchListView
If TypeOf frm.Controls(I) Is ListView Then
...
Else
#End If

If TypeOf frm.Controls(I) Is Blubber Then
...
End If

#If CheckAuchListView
End If
#End If

'CheckAuchListView' mußt Du dann je nach Projekttyp setzen oder weglassen.

Thorsten Albers

albers (a) uni-freiburg.de

Ähnliche fragen