Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Giko.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.441 by h677, Tue Sep 28 11:59:37 2004 UTC revision 1.442 by yoffy, Wed Sep 29 00:32:14 2004 UTC
# Line 10095  procedure TGikoForm.BrowserTabMouseUp(Se Line 10095  procedure TGikoForm.BrowserTabMouseUp(Se
10095  begin  begin
10096          if FDragWFirst <> true then begin          if FDragWFirst <> true then begin
10097                  FDragWFirst := false;                  FDragWFirst := false;
10098          end else if (X = FMouseDownPos.X) and (Y = FMouseDownPos.Y) then begin  {       end else if (abs( X - FMouseDownPos.X ) < Mouse.DragThreshold)
10099            and (abs( Y - FMouseDownPos.Y ) < Mouse.DragThreshold) then begin}
10100            end else begin
10101                  if GikoSys.Setting.ListOrientation = gloHorizontal then begin                  if GikoSys.Setting.ListOrientation = gloHorizontal then begin
10102                          if GikoSys.Setting.ListWidthState = glsMin then begin                          if GikoSys.Setting.ListWidthState = glsMin then begin
10103                                  BrowserMaxAndFocusAction.Execute;                                  BrowserMaxAndFocusAction.Execute;

Legend:
Removed from v.1.441  
changed lines
  Added in v.1.442

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26