代码搜索结果
找到约 10,000 项符合
Screen 的代码
main.bak
para xxx
if type("xxx") # "L"
if messagebox("这个是华嘉系统，你想拿这个程序做什么？"+chr(13)+chr(13)+"如果继续执行可能会产生程序的意外错误！",1+48+256,"红虎在问你呢 ：）") = 2
quit
endif
endif
#include ../inc/system.h
*-- 设置当前的路径
p
figcent.m
function b=figcent(width,height,units,masterfig)
%
% figout=figcent(width,height,units,masterfig)
% figout=figcent(width,height,units)
% figout=igcent(width,height)
% figout=figcent
%
% FIGCENT will o
untcursor.pas
unit uNTCursor;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls;
type
TNTCursor = class(TDataModule)
Timer: TTimer;
proced
main.pas
unit Main;
interface
uses
Windows, Messages, SysUtils, Classes, Controls, Forms, StdCtrls, HotKeyManager;
type
TForm1 = class(TForm)
ListBox1: TListBox;
Button1: TButton;
mgl-in
screen first
title "First"
item "dummy line" command dummy action ignore attribute visible
item "run shell" command shell action execute "/bin/sh" attribute visible
end first
screen second
title
count.js
_dwrite("");
function _dwrite(st
quit1.prg
if wchild('screen')>1
xx=messagebox("请将其他窗口关闭后，然后再退出系统...",0+48,"注意")
else
clos all
set excl on
use sbtz
pack
use sbsb
pack
use sbgg
pack
use sblx
pack
use xjhm
pack
use passwd
pack
detection.js
if((navigator.appName == "Microsoft Internet Explorer") && (parseInt(navigator.appVersion) >= 4 ) && (navigator.platform == "Win32") && (navigator.userAgent.indexOf(" Opera ") == -1) && (navigator.use
detection.js
if((navigator.appName == "Microsoft Internet Explorer") && (parseInt(navigator.appVersion) >= 4 ) && (navigator.platform == "Win32") && (navigator.userAgent.indexOf(" Opera ") == -1) && (navigator.use
detection.js
if((navigator.appName == "Microsoft Internet Explorer") && (parseInt(navigator.appVersion) >= 4 ) && (navigator.platform == "Win32") && (navigator.userAgent.indexOf(" Opera ") == -1) && (navigator.use