Delphi/VB/C++ --> AutoIt Application.XXXX

**GtaSpider**

Hi

Hab mich mal wieder an das Vista DWM (Aero design) rangemacht und bin ordentlich weitergekommen.
So, aber halt nicht weit genug Weiß zufällig jemand, wie man sowas in AutoIt schreiben könnte?:

Code

Application.EnableVisualStyles();
Application.SetCompatibleTextRenderingDefault(true);
Application.Run(new GlassForm());

Das ist ein Delphi code und die Funktion "SetCompatibleTextRenderingDefault" soll irgendwie mit Net.Framwork2 zutun haben.

Ich hab noch folgenden Text gefunden:

Spoiler anzeigen

Zitat

... Zum Glück besteht das einfachste Verfahren, Steuerelemente mit Text zu versehen, darin, dies von .NET Framework 2.0 mit GDI+ erledigen zu lassen. Das können Sie leicht bewerkstelligen, indem Sie für die Steuerelemente die Eigenschaft UseCompatibleTextRendering einstellen ...

Wäre super dankbar wenn mir jemand helfen könnte

Mfg Spider

Edit: Ah, hab das noch gefunden: http://msdn.microsoft.com/de-de/library/…ult(VS.80).aspx
Hilft mir leider nicht viel weiter, aber falls sich jemand mit VB/C auskennt..

Edit2: Also, auf jedenfall Framework. Es wird System.Windows.Forms Namespace benutzt. Kann man das mit AutoIt überhaupt ansteuern?
"ObjCreate("System.Windows.Forms")" geht auf jedenfall nicht.

**BugFix**

Zitat von GtaSpider

Edit2: Also, auf jedenfall Framework. Es wird System.Windows.Forms Namespace benutzt. Kann man das mit AutoIt überhaupt ansteuern?
"ObjCreate("System.Windows.Forms")" geht auf jedenfall nicht.

Ich vermute schon, dass es machbar ist. System.Collections.Hashtable ist ja auch ein Net-Framwork Objekt und kann unter Autoit angesprochen werden.
Mir ist aber aufgefallen, dass dabei nicht alle Methoden des Objektes angesprochen werden können. Hängt vermutlich mit der Vererbung der Methoden zusammen.
Such doch mal in der Hierarchie nach dem übergeordneten Objekt. Vielleicht mußt du erst dieses initialisieren um auf .Forms zugreifen zu können.

**GtaSpider**

Hallo

Vielen Dank schonmal, dass du geantwortet hast
Ja, System.Collections.XXX funktioniert einwandfrei. System.Windows.Forms, da müsste das übergeordnete Objekt System.Windows sein
Hab ich aber alles schon ausprobiert, sogar "System"^^

Hat sonst vielleicht jemand eine Idee?

Mfg Spider

**GtaSpider**

Hey,

Ich bump das mal Hat jemand jetzt evtl. eine Idee? Wäre doch echt nett, wenn man Text auf dem Aero anzeigen könnte.

Gruß
Spider

progandy

Wenn du text auf dem Aero anzeigen willst, giobt es denkne ich 2 Möglichkeiten:
1 - Mit GDIplus zeichnen
2 - DrawThemeText
Das .NET framework kan man mit SetCompatibleTextRenderingDefault auf GDI+ umstellen, aber in AutoIt gibt es das natürlich nicht. Also musst du alles selbst zeichnen.
//Edit: den Aero-Textschatten solltest du mit DrawThemeTextEx hinbekommen

**GtaSpider**

Hallo

Danker erstmal
Ja genau, die Funktion hab ich auch schon gesehen. Ich würde aber auch gerne Inputs, Buttons, ... Zeichnen können, mit dieser Funktion kann man ja afaik nur Labels Simulieren.

mfg Spider

progandy

Die Buttons musst du selbst zusammensetzen:
DrawThemeBackground
+ DrawThemeText
+ DrawThemeIcon
oder so
eventuell auch DrawThemeParentBackground

Inputs musst du selbst mit GDIPlus machen, das ist wohl das schwerste

**Greenhorn**

Moin Jungs,

ein kleines Beispiel für einen "Button" habe ich angehängt ...

Gruß
Greenhorn

**GtaSpider**

Hallo,

Funktioniert leider auch nicht.
autoit.de/wcf/attachment/6545/

Ich habe jetzt aber herrausgefunden wo Vista zwischen Schwarz und durchsichtig unterscheidet: Einfach beim Alpha Channel.
Im Anhang sind 3 Dateien (GuiAero.au3, die Include datei; Themed_Ownerdraw.au3, die Datei die Greenhorn angehängt hat mit aktivierten Aero; 006.au3, eine kleine Test Aero Gui mit 2 Labels (s.u.))

In der 006.au3 wird einmal ein Label mit GuiCtrlCreateLabel erstellt und einmal eins mit DrawString. Mit DrawString wird das Label normal angezeigt, solange der AlphaChannel = 255 ist.
Das heißt gibt es irgendwie eine Möglichkeit alle Controls bei AutoIt mit einem bestimmten AlphaChannel zu belegen? (Standard ist er anscheinend 00)

Gruß
Spider