OSDN Git Service

何も処理しないNOPコマンド追加
authorh677 <h677>
Thu, 13 Mar 2008 16:41:49 +0000 (16:41 +0000)
committerh677 <h677>
Thu, 13 Mar 2008 16:41:49 +0000 (16:41 +0000)
ExtPreviewDatamodule.pas

index 3d34a72..14bb7be 100644 (file)
@@ -172,8 +172,12 @@ begin
         end;
 
         if (rc = ID_YES) then begin
-            GikoSys.CreateProcess(
-                FExecCommand.Command, '"' + FExecCommand.ToURL + '"');
+            // \93Á\8eê\83R\83}\83\93\83h
+            // nop \89½\82à\82µ\82È\82¢
+            if (AnsiLowerCase(FExecCommand.Command) <> 'nop') then begin
+                GikoSys.CreateProcess(
+                    FExecCommand.Command, '"' + FExecCommand.ToURL + '"');
+            end;
         end;
     end;
 end;