Von |
Daniel |
Am |
23. November 2009 um 11:15:06 |
Frage |
Hallo zusammen,
in einem Projekt für einen russischen Kunden tauchen immer wieder 'klingonische' Zeichen auf, da das Charset der Font für einige Controls noch auf 'westlich' statt auf 'cyrillic' steht. Jetzt ist es müßig ALLE Controls ALLER Forms einzeln anzuklicken und zu kontrollieren (jedes Mal die Eigenschaftsseite der Schriftart öffnen,...).
Also dachte ich mir, tust Du mal so als wärst Du schlau und nutzt diesen Code:Dim o1 As Object Dim o2 As Object For Each o1 In Forms Debug.Print "_____" Debug.Print o1.Name For Each o2 In o1.Controls Debug.Print " " & o2.Name Debug.Print " " & o2.Font.Charset Next o2 Next o1 Debug.Print "_____" diesen Code rufe ich direkt nach dem Form_Load meiner MDIForm auf.
Ganz so schlau bin ich dann doch nicht, denn der Code durchsucht nur die MDIForm selber, da alle anderen Forms noch nicht geladen sind. Da aber auch zu keinem Zeitpunkt des Programmablaufs alle Formen gleichzeitig geladen sind fehlt mir die Phantasie, wie ich das jetzt am geschicktesten machen kann.
Kann ich auch auf die nicht geladenen Forms zugreifen? Wie kann ich alle Forms (auch die noch nicht geladenen) ermitteln?
1.000 Dank für die Anregungen/Ideen!! |
|