XProfan

Deutsch

Rainer
Hoefs

Hallo,

kennt jemand eine Möglichkeit die Eingabe in ein Editfeld zu verhindern ohne es mit ENABLEWINOW zu sperren.

Grund:

Ein Feld das mit Enablewindow gesperrt ist, ist grau und die Texte darin sind schwer zu lesen. Ich möchte, daß der Text Schwarz auf Weiß zu lesen ist, aber trotzdem keine Eingaben möglich sind!

Für Tips schon mal im voraus ein herzliches Dankeschön
Rainer

04.07.2015 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

« Dieser Beitrag wurde als Lösung gekennzeichnet. »

H.Brill

EnableWindow und SendMessage(...)
scheinen da was verschiedenes zu
bewirken.
Habe mal eines mit EnableWindow und
eines mit SendMessage bearbeitet :

Kompilieren Markieren Separieren

Declare Handle Btn1, edit1, edit2, Int ende
WindowTitle "Fenster"
Window 640, 480
btn1  = @Create("Button", %HWnd, "Ende", 10, 10, 60, 25)
edit1 = @Create("Edit",   %HWnd, "Test 1", 10, 40, 120, 25)
edit2 = @Create("Edit",   %HWnd, "Test 2", 10, 80, 120, 25)
enablewindow edit1, 0
SendMessage(edit2, $00CF, 1, 0)
ende = 0

WhileNot ende

    WaitInput

    If @Clicked(btn1)

        ende = 1

    EndIf

    Case %Key = 2 : ende = 1

EndWhile

End

Beim zweiten Edit kann man auch reinklicken, aber
nichts schreiben. Außerdem ist die Schrift klarer.

PS: Messages findet man in der Profanhilfe.
Einfach mal verschiedene ausprobieren.

Und für das 'Ausgrauen' ist wahrscheinlich nur
Windows verantwortlich. Halt WINDOWS-Standard.

Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.

04.07.2015 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren