Kogda ia ispolisuiu Dragdrop event a posle nego doubleclick, srabativaet v oboih sluchaiah dragdrop.
Mojet ia chto-to propuskau, spasibo bol'shoe za pomosch.

Vot code for dragdrop....

long ll_sql_code
string ls_sql_err1,ls_sql_err2
if g_upd_privilege = 'update' then
this.setrow(row)
dragobject ldo_dragged_control
ldo_dragged_control = draggedobject()
ids_flight_data[ii_tick].setitem(ids_flight_data[ii_tick].find("oid = "+ldo_dragged_control.tag,1,ids_flight_data[ii_tick].rowcount()),"aircraft_oid",this.getitemnumber(getrow(),"oid"))
// ids_flight_data[ii_tick].setitem(ids_flight_data[ii_tick].find("oid = "+ldo_dragged_control.tag,1,ids_flight_data[ii_tick].rowcount()),"upd_timestamp",w_flight_board_main.wf_get_server_datetime())
if ids_flight_data[ii_tick].update() = 1 then
commit;
this.modify(&
'sched_flight_oid_'+ldo_dragged_control.tag+'.visible ="0~tlong(mid(flight_bar_vis,'+string(getrow())+',1))" '+&
'origination_'+ldo_dragged_control.tag+'.visible ="0~tlong(mid(flight_bar_vis,'+string(getrow())+',1))" '+&
'departuretime_'+ldo_dragged_control.tag+'.visible ="0~tlong(mid(flight_bar_vis,'+string(getrow())+',1))" '+&
'destination_'+ldo_dragged_control.tag+'.visible ="0~tlong(mid(flight_bar_vis,'+string(getrow())+',1))" '+&
'arrivaltime_'+ldo_dragged_control.tag+'.visible ="0~tlong(mid(flight_bar_vis,'+string(getrow())+',1))" '+&
'flight_oid_'+ldo_dragged_control.tag+'.visible ="0~tlong(mid(flight_bar_vis,'+string(getrow())+',1))" '+&
'ca_oid_'+ldo_dragged_control.tag+'.visible ="0~tif(describe(~'ca_oid_'+ldo_dragged_control.tag+'.text~')=~', ~',0,long(mid(flight_bar_vis,'+string(getrow())+',1)))" '+&
'fo_oid_'+ldo_dragged_control.tag+'.visible ="0~tif(describe(~'fo_oid_'+ldo_dragged_control.tag+'.text~')=~', ~',0,long(mid(flight_bar_vis,'+string(getrow())+',1)))" '+&
'fe_oid_'+ldo_dragged_control.tag+'.visible ="0~tif(describe(~'fe_oid_'+ldo_dragged_control.tag+'.text~')=~', ~',0,long(mid(flight_bar_vis,'+string(getrow())+',1)))"'&
)
trigger event timer()
else
ll_sql_code = sqlca.sqlcode
ls_sql_err1 = string(sqlca.sqldbcode)
ls_sql_err2 = sqlca.sqlerrtext
rollback;
if ll_sql_code <> 0 then
messagebox("Error Updating Database! "+ls_sql_err1,ls_sql_err2)
end if
end if
end if

?

Kogda proishodit doubleclick srabativaet dragdrop event.