From: Sebastien B. <sb...@us...> - 2002-11-11 21:10:48
|
Update of /cvsroot/jvcl/jvcl/source In directory usw-pr-cvs1:/tmp/cvs-serv20334 Modified Files: JvBandObject.pas Log Message: no message Index: JvBandObject.pas =================================================================== RCS file: /cvsroot/jvcl/jvcl/source/JvBandObject.pas,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** JvBandObject.pas 7 Nov 2002 20:36:42 -0000 1.5 --- JvBandObject.pas 11 Nov 2002 21:10:43 -0000 1.6 *************** *** 605,609 **** Exit; ShowDW(False); ! //FBandForm.Release; //XXX if FHook<>0 then begin --- 605,609 ---- Exit; ShowDW(False); ! FBandForm.Free; if FHook<>0 then begin *************** *** 1107,1111 **** if IsDialogMessage(FBandForm.Handle,PMsg(Pointer(lParam))^) then PMsg(lParam)^.message := WM_NULL; ! end; except end; --- 1107,1111 ---- if IsDialogMessage(FBandForm.Handle,PMsg(Pointer(lParam))^) then PMsg(lParam)^.message := WM_NULL; ! end; except end; *************** *** 1114,1116 **** --- 1114,1117 ---- end. + |