OSDN Git Service

・リンクバーのフォルダーをクリックしたときのおかしな動作を改善
authordeux <deux>
Mon, 1 Dec 2003 16:30:38 +0000 (16:30 +0000)
committerdeux <deux>
Mon, 1 Dec 2003 16:30:38 +0000 (16:30 +0000)
Giko.pas

index c1da0f6..2e21d78 100644 (file)
--- a/Giko.pas
+++ b/Giko.pas
@@ -7045,7 +7045,7 @@ var
 begin
        TToolButton( Sender ).DragMode := dmManual;
        if ssLeft in Shift then begin
-               TToolButton( Sender ).Down := true;
+//             TToolButton( Sender ).Down := true;   // \83\8a\83\93\83N\83c\81[\83\8b\83o\81[\82Ì\8b\93\93®\95s\90R\82Ì\8c´\88ö\82Ì\82æ\82¤\82È\82Ì\82Å\83R\83\81\83\93\83g\83A\83E\83g\82µ\82½(2003-dec-02)
                if FDragTime = 0 then begin
                        FDragTime := GetTickCount();
                end else begin