[*]Profan

Deutsch

Dieter
Zornow

Eine wie ich meine einfach umzusetzende Funktion.
Da ich festgestellt habe, dass ich Getsyscolor mit am meisten verwende
und schon unzählige Male die Def in meinen Programmen habe.
wäre ein native Vereinfachung sinnvoll. So wie hier demonstriert.
Kompilieren Markieren Separieren

DEF GETSYSCOLOR(1) !"USER32","GetSysColor"

proc syscolor

    parameters x&
    cls GETSYSCOLOR(x&)

endproc

window 0,0-200,200
syscolor(15)
waitinput

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

04.12.2008 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Nur am Rande der Hinweis: Wer XPSE nutzt, hat natives GetSysColor (und alle anderen APIs z.B. aus der user32), völlig ohne Definition, welches auch schneller ist als ein DEF GetSysColor.

Kompilieren Markieren Separieren

print GetSysColor(COLOR_BTNFACE)

04.12.2008 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Frank
Abbing

Ja, genau. Das empfinde ich persönlich als grössten Vorteil gegenüber den Nicht-XPSE-Benutzern!
Von den vorzüglichen und äusserst gelungenen AddOns will ich gar nicht mal sprechen...

04.12.2008 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Frank Abbing

Von den vorzüglichen und äusserst gelungenen AddOns will ich gar nicht mal sprechen...

Ich kenn nur die von Dir, aber auf die passt ja die Beschreibung nicht.

04.12.2008 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Frank
Abbing

Es bedarf zur Erkennung wohl doch eines gewissen Horizonts.