Allgemeine Fragen zur PROFAN Programmierung

Views (Heute): 249249 (10685)

| Suchen
| Zurück zur Übersicht

Autor | Thema: Eingabeprobs...
Wirges Dieter
| Datum:14.01.02 21:32 (Wirges@nevcom.de) |
Hallo... ich habe da ein kleines Problem mit einer Eingaberoutine... Und zwar möchte ich 4 Editierfelder (createEdit) anzeigen lassen. Mit Hilfe von vier Radiobuttons sollen diese Editierfelder einzeln deaktiviert werden. Also z.B. das in Feld 2 keine Eingabe mehr möglich ist. Ohne diese Radiobuttons klappt das auch ganz hervorragend mit 'Sendmessage'. Ich kriegs aber nicht hin, das dies über Radiobuttons gesteuert werden kann. Für Hinweise oder einen kleinen Demoquelltext waer ich sehr dankbar. Tschuessi, Dieter
Jörg Sellmeyer
| Datum:14.01.02 22:34 (joerse@gmx.de) |
Hallo, declare edit1&,edit2&,edit3&,edit4& declare radio1&,radio2&,radio3&,radio4& declare ende% cls Edit1&=createEdit(%hwnd,"test",10,10,100,20) Edit2&=createEdit(%hwnd,"test",10,40,100,20) radio1&=CreateRadiobutton(%hwnd,"test",10,70,100,20) radio2&=CreateRadiobutton(%hwnd,"test",10,100,100,20) Whilenot ende% waitinput if getfocus(radio1&) enablewindow edit1&,getcheck(radio1&) enablewindow edit2&,not(getcheck(radio1&)) '... alle anderen einschalten elseif getfocus(radio2&) enablewindow edit1&,not(getcheck(radio2&)) enablewindow edit2&,getcheck(radio2&) '... 'elseif -Hier noch die übrigen Abfragen Endif Wend So geht's. Jörg
Dieter
| Datum: 15.01.02 10:02 (Wirges@nevcom.de) |
Hallo Jörg, besten Dank... Werde ich gleich mal testen! Tschuessi, Dieter

| Zurück zur Übersicht