| |
| |
|
 | Hello on any
...somehow steh I in momentum aufm Hose  my trouble:
In one Dialog-Window is a einzeilige Editeingabe and two Buttons:
once [Cancel] and the second [present] - How do I get the there, that here with
the ALT- and of/ one Letter key the Dialog-Window leave becomes ??? 
even if I the letters underline (&) and in the Loop extra bezeichne, gives me windows at pressure on The Button one Beep and nothing happens. with the Mouse and Getfocus... works everything fine. The Loop becomes through Waitinput gesteuert. hopefully have I correctly. declared. lying me namely very on the hearts. - otherwise bleats iF later, that The Keys in the program not so functions How the User it dwelt is  |
|
| |
| |
| |
|
|
Peter
Max
Müller | Hi,
The following functions by me:
CompileMarkSeparationLET dl2_bcancel% = Create("Button",_dlg2searchlist%,"Ab&brechen",214,385,139,25)>
but I faith me remind to the one these Support in
windows ex/switch on can.
Guck time here: [...] 
I zitiere:
[quote:944a7725f7]
under windows 2000 How follows: Start > Settings > Systemsteuerung > display (or: Desktop, rights Mouse button, properties), Registerkarte effects, there The option Tastaturnavigationsanzeiger Hide (with ALT-Button overlay) deaktivieren.
[/quote:944a7725f7] |
|
| |
| |
| |
|
|
 | Abstellbar is imho solely the effect the not-Unterstreichens the Acceleratorkeys.
@Horst: becomes your Input leave if The TAB-Button pressed becomes? |
|
| |
| |
| |
|
|
|
CompileMarkSeparation
so sees The Loop from - if The tab-Button pressed becomes, becomes the whole Dialog-Window deleted   |
|
| |
| |
| |
|
|
| | Sorry, your example isn't run. |
|
| |
| |
| |
|
|
|
CompileMarkSeparation
PROC UMBENENNEN UMBENENNEN
Declare win&,mE%,mBack%,mOK%,edit1%,I%,txt%,font3%,font0%
font0%=CREATE("FONT","ARIAL",14,0,0,0,0)
font3%=CREATE("FONT","COMIC SANS MS",20,0,1,0,0)
Declare text$,datei2$,neu_name$
PARAMETERS path$,datei$,modus$
datei$=path$+datei$
mE%=0
I%=LEN(datei$)
text$=datei$
Case GT(I%,35):text$=LEFT$(text$,3)+"..."+RIGHT$(text$,35)
win&=CREATE("DIALOG",%HWnd,"Datei / Ordner umbenennen",SUB(DIV(%MaxX,2),200),SUB(DIV(%MaxY,2),90),400,180)
txt%=CREATE("TEXT",win&,text$,20,10,340,20)
SetFont txt%,font3%
txt%=CREATE("TEXT",win&,"Geben Sie den neuen Namen ein und klicken Sie auf [Uebernehmen]",20,38,480,20)
SetFont txt%,font0%
edit1%=CREATE("EDIT",win&,datei2$,20,60,350,25)
I%=LEN(datei2$)
sendmessage(edit1%,$00B1,I%,-1)
SetFont edit1%,font3%
mBack%=CREATE("BUTTON",win&,"&Zurück",20,100,80,25)
SetFont mBack%,font0%
mOK%=CREATE("DEFBUTTON",win&,"&Uebernehmen",290,100,80,25)
SetFont mOK%,font0%
SetFocus(edit1%)
WhileNot mE%
WAITINPUT
If GetFocus(mBack%)
DesTroyWindow(win&)
mE%=1
SetActiveWindow(%HWnd)
ENDIF
IF GetFocus(mOK%)
neu_name$=GETTEXT$(edit1%)
neu_name$=path$+neu_name$
DesTroyWindow(win&)
mE%=1
IF equ$(modus$,"0") Ordner
neu_name$=UPPER$(neu_name$)
ElseIf equ$(modus$,"1") Datei
neu_name$=LOWER$(neu_name$)
ENDIF
#### Hier wird dann zum Umbenennen verzweigt
MessageBox(neu_name$,"Umbenennen...",64)
END
ENDIF
WEND
ENDPROC
CLS
umbenennen "C:",s3>"TEMP","0"
[quote:e6c2730182]Sorry, your example isn't run.[/quote:e6c2730182]
Sorry iF - the ought to only The Loop show - but now comes it: the code the supra standing functions correct. try I the equal code inside the Program, works not with the keyboard. can it on the InitMessage from the LISTVIEW.DLL lying ? Frank Perhaps know You moreover |
|
| |
| |
| |
|
|
| | [quote:34b90124fc]but now comes it: the code the supra standing functions correct.[/quote:34b90124fc]the in wonder me integrally and not at all! this is still exactly the reason for and so I lauffähige minimalbespiele wish. often lying the dog hold elsewhere bury. |
|
| |
| |
| |
|
|
Frank
Abbing | | No, I know neither moreover. The List view.dll registered Tastatureingaben. but these then moreover usher. |
|
| |
| |
| |
|
(442)
Deutsch
English
Français
Español
Italia