| |
| |
|
| - Page 1 - |
|
Stephan
Sonneborn | Hello together,
I Have the following trouble: in a with Franks listview.dll erstellten List view go each boxes by keyboard (tab-Button) choosed and then edited.
Can check, which cell lastly changed watts?
thanks in the ahead!!! |
|
| |
| Schöne Grüße aus Wittgenstein
von Stephan
Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz | 01/11/12 ▲ |
|
| |
|
|
| |
| |
| - Page 1 - |
|
 | | still. is slight To auszulesen, see function GetVar() with Flag 0 and 6, or. Flag 2 and 4. |
|
| |
| |
| |
|
|
Stephan
Sonneborn | Hello Frank, Thomas and David,
many Thanks for Your Answer.
as far as i know, catches INITMESSAGES any Messages of Listviews ex and processing tappt im dunkeln. therefore come "normale" Messages not through.
Thomas' Solution would a Possibility.
Franks suggestion, The function GETVAR() To benefit, have so did i already in Betracht pulled. but GETVAR() gives still "nur" the lever the Edits back. How do I get so on whom Split- and Zeilenindex? |
|
| |
| Schöne Grüße aus Wittgenstein
von Stephan
Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz | 01/13/12 ▲ |
|
| |
|
|
| | have you got Flag 2 and 4 probiert? and the List view.dll-User Messages? |
|
| |
| |
| |
|
|
Stephan
Sonneborn | | Yes, but Flag 2 and 4 supplying only -1 and the User Messages are still too only for Mausklicks... |
|
| |
| Schöne Grüße aus Wittgenstein
von Stephan
Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz | 01/13/12 ▲ |
|
| |
|
|
| | Wozu benötigst You the because? Perhaps Gibts ne further Possibility. |
|
| |
| |
| |
|
|
Thomas
Freier | @Frank, it would like simply know in which out at now the EDIT is, if it z.B. The TAB- or PFEIL-Button pressed has. then arise yes a new EDIT.
List view Help:
watts The Tabtaste pressed, then building itself subsequently one new Editfeld on, sodas the next Itemtext edited go can.
Intern become You Yes The Tastenaktion processing having. but How come we on it? |
|
| |
| Gruß Thomas
Windows XP SP2, XProfan X2 | 01/14/12 ▲ |
|
| |
|
|
| | the I had already understood. but for what becomes The information needed? Perhaps can the Yes differently regulate. The Tastendruck ansich becomes intern Yes determined. The position in the list view but nirgendwo displayed famous given, was bislang too never necessary. |
|
| |
| |
| |
|
|
| might me present, that it a UNDO-function install, and so n-to-Edit with row+slot+Text into aray lay wants.
Greeting Thomas |
|
| |
| |
| |
|
|
| then remaining Perhaps yet The Possibility, with manuellen Edits To works, The indeed supported go.
Each contingency einzukalkulieren, The then to years Perhaps time needed becomes, is Yes still unfortunately never possible. there The List view.dll neither More moreover develops becomes, becomes it unfortunately too no entsprechendes Update More give. I program already since one year not any more in Assembler and will be the under 64 bit neither More make. possible exists The Possibility, whom Sourcecode abzutreten, so it of someone Anderem moreover develops becomes. |
|
| |
| |
| |
|
| |
| |
| - Page 2 - |
|
|
Stephan
Sonneborn | Untitled (14.01.12)
might me present, that it a UNDO-function install, and so n-to-Edit with row+slot+Text into aray lay wants.
Bingo!
Hello Thomas,
it's about a scheduler with Koordinatenwerten. These values serve to statement of/ one drawing (geschlossener Linienzug). If now the users The Coordinates the individual spots changed, must too The Coordinates the next line changed will be, so the Linienzug closed remaining.
there the users always only a Koordinatenwert Change can, can this The x- or y Koordinate his.
plan B is naturally, The row To detect, in the straight changed becomes, these between To Save and then with the Content to the edit To vergleichen.
plan A would even been, objectively directly to know, which cell changed becomes.
so would The Undo-function naturally too plainer. |
|
| |
| Schöne Grüße aus Wittgenstein
von Stephan
Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz | 01/15/12 ▲ |
|
| |
|
|
Stephan
Sonneborn | Frabbing (14.01.12)
then remaining Perhaps yet The Possibility, with manuellen Edits To works, The indeed supported go.
Each contingency einzukalkulieren, The then to years Perhaps time needed becomes, is Yes still unfortunately never possible. there The List view.dll neither More moreover develops becomes, becomes it unfortunately too no entsprechendes Update More give.
Hello Frank,
i'll me once more intensiver with the manuellen Edits keep busy.
Vielen Thanks!  |
|
| |
| Schöne Grüße aus Wittgenstein
von Stephan
Programmierumgebung:| XProfan X4 | WIN10 | AMD FX6100 3,3 GHz | 01/15/12 ▲ |
|
| |
|
|
Thomas
Freier | @Stephan, with whom manuellen Edits rather to that example "Eigene_Eingaben.prf" grab , there dur here The zulässigen Inputs and the terminate to determine and erfassen can, too whether "Abbruch" chosen watts.
Scriptbeispiel , The data How in "Eigene_Eingaben.prf" to Double click detect.
CompileMarkSeparation
Proc Haushalt_Ein_Sonst' Sonstige Einnahmen
case (LV_Column&=0) : Haushalt_Edit 0'Text
case (LV_Column&=1) : Haushalt_Edit 2'Betrag
case (LV_Column&=2) : Haushalt_Edit 1'Anzahl
DeleteSpaceLines(Listview51&,0)
Rechne_Sonstiges
Haushalt_Ausgaben
SetFocus(%hwnd)
EndProc
Proc Haushalt_Edit
Parameters x%
Declare x!
DEF nurzahlen(2) !"NEdit.dll","InitMessages"
ndll&=usedll(old_file$+"\\Lib\\NEdit.dll")
var Element&=control("Edit",LV_Text$,$548100C0 | LV_Orient&,LV_Xoffset&,LV_Yoffset&,LV_Width&,LV_Height&,LV_Handle&,100,%hinstance,0)
SetWindowPos(Element&,-1,0,0,0,0,$13)
SetFont Element&,LV_Font&
Setfocus(Element&)
SendString(Element&,"+({END})")'Text Markieren und Cursor ans Ende
case x%=1: SetEditNumeric(Element&)'nur Ziffereingaben erlauben
case x%=2: nurzahlen(element&,7)'nur Ziffereingaben und Nachkommastellen erlauben
While 1
WaitInput
if @TabChanged(T&)
TAB_WECHSEL GetActiveTab(T&)
break
endif
case iskey(27):BREAK'Abbruch ESC
CursorPos
If @lt(mouseposx(0),LV_Xoffset&) OR @lt(mouseposy(0),LV_YOffset&) \
OR @gt(mouseposx(0),@add(LV_Xoffset&,LV_Width&)) OR @gt(mouseposy(0),@add(LV_Yoffset&,LV_Height&))
LV_Text$ = @GetText$(Element&)
If x%=2'Zahl mit Nachstellen
LV_Text$=Translate$(LV_Text$,",",".")
x!=val(LV_Text$)
@Set("Decimals",2)
LV_Text$=str$(x!)
EndIf
SetItemText(LV_HAndle&,addr(LV_Text$),LV_Column&,LV_Row&)
BREAK
endif
If iskey(13)'Speichern Enter gedrückt
LV_Text$ = @GetText$(Element&)
If x%=2'Zahl mit Nachstellen
LV_Text$=Translate$(LV_Text$,",",".")
x!=val(LV_Text$)
@Set("Decimals",2)
LV_Text$=str$(x!)
EndIf
SetItemText(LV_HAndle&,addr(LV_Text$),LV_Column&,LV_Row&)
BREAK
endif
wend
clear y&,x&
DestroyWindow(Element&)
FreeDLL&
ENDPROC
with two Nachkommastellen take I mostly The NEdit.dll. otherwise self something knit. |
|
| |
| Gruß Thomas
Windows XP SP2, XProfan X2 | 01/15/12 ▲ |
|
| |
|
(498)
Deutsch
English
Français
Español
Italia