Browse Source

screenshot command with brackets

Johann ELSASS 3 năm trước cách đây
mục cha
commit
d22da608dd
1 tập tin đã thay đổi với 1 bổ sung0 xóa
  1. 1 0
      lazpaint/ucommandline.pas

+ 1 - 0
lazpaint/ucommandline.pas

@@ -439,6 +439,7 @@ begin
         if lowerCmd = 'resample' then begin if not NextAsFuncParam or not DoResample then exit end else
         if copy(lowerCmd,1,4)='new(' then begin if not DoNew then exit end else
         if lowerCmd = 'new' then begin if not NextAsFuncParam or not DoNew then exit end else
+        if lowerCmd.StartsWith('screenshot(') then begin if not DoScreenShot then exit end else
         if lowerCmd = 'screenshot' then begin if not NextAsFuncParam or not DoScreenShot then exit end else
         if lowerCmd = 'script' then
         begin