In a structure view you can't insert additional fields
Idea: we create an own ToolTip if user click on a row
How to do this:
Create a text field and change border
This is a list form and we must create the text field overlapped of the list. This is possible with band=foreground
dw_1.create=text=name=info_t<tab>text=Hello<tab>band=foreground<tab>width=600<tab>height=300
Now we must change background. BeasScript properties not available. We use direct datawindow syntax
dw_1.modify=info_t.background.color='<rgb:190:190:190>' info_t.background.mode=0 info_t.border=2 info_t.visible='0'
We catch the Click event and related to the line type <zeilentyp> we display the informations
More see item structure window
Here the complete source code for the customizing
global function dw_1_load
dw_1.create=text=name=info_t<tab>text=Hello<tab>band=foreground<tab>width=600<tab>height=300
dw_1.modify=info_t.background.color='<rgb:190:190:190>' info_t.background.mode=0 info_t.border=2 info_t.visible='0'
end global
// Catch click event from the structure list
global function dw_1_click
dec x,y
x=<form.click.x> + 90
y=<form.click.y> + 60
dw_1.item.info_t.x=<x>
dw_1.item.info_t.y=<y>
// Click on normal item
if <dw_1.item.zeilentyp.value> = 0 then
dw_1.item.info_t.visible=1
sqlca.select "SuppCatNum" from "OITM" where "ItemCode" = <dw_1.item.itemcode.value,dbstring>
dw_1.item.info_t.text=<itemcode><cr_lf><itemname><cr_lf><sqlca.result.1>
return 1
end if
// all other: make unvisible
dw_1.item.info_t.visible=0
end global