1.如果要创建一个mdi child,先看是否有这个child 存在,如果有,则用它,如果没有再创建 //该函数判断MDI 子窗体是否存在,再进行创建和显示function isInclude(formclass: TFormClass): boolean;var  i: Integer;  form: TObject;begin  result := false;  for i := 0 to frmMain.MDIChildCount do  begin    form := frmMain

网易 博客 LOFTCam-用心创造滤镜 LOFTER-最美图片社交APP 送20张免费照片冲印 > 注册登录  加关注 techiepc的博客 万事如意 首页 日志 LOFTER 相册 音乐 收藏 博友 关于我     日志       关于我 techiepc   加博友   关注他 文章分类 ·默认分类(249) LOFTER精选 注册免费冲印20张照片 > 网易考拉推荐 网易新闻 湖南郴州现"多彩空调墙" ·男孩溺亡同伴藏其物品瞒23天 ·男子撞人逃逸后与伤者同病房

delphi操作文本文件的方法简介减小字体 增大字体 作者佚名来源不详发布时间2008-5-31 10:31:16发布人xuedelphi1 文件类型和标准过程       Delphi同Object Pascal一样支持三种文件类型,即:文本文件.记录文件.无类型文件.1.1文本文件        文本文件类型的变量用如下方法声明:varTextFileVar: Text ;         文本文件是以行为单位进行读.写操作的.由于每一行长度不一定相同,不能计算出给定行在文件中的确切位置,因

一.查看已开放的端口: 1.借助系统自带MS-DOS命令查看开放的端口(Win2000/XP/server2003) 在开始-运行-输入cmd,打入netstat -an(注意-前有个小空格),在IP地址“,”后面就是端口号了.(-a表示显示当前所有连接和侦听端口,-n表示以数字格式显示地址和端口号) 小常识:TCP(Transmission Control Protocol,传输控制协议)和UDP(User Datagram Protocol,用户数据包协议)都是网络上传输数据的通信协议,UD

摘自:http://www.hackbase.com/tech/2011-05-17/63766.html 查看Windows端口及端口关闭方法 一.查看已开放的端口: 1.借助系统自带MS-DOS命令查看开放的端口(Win2000/XP/server2003) 在开始-运行-输入cmd,打入netstat -an(注意-前有个小空格),在IP地址“,”后面就是端口号了.(-a表示显示当前所有连接和侦听端口,-n表示以数字格式显示地址和端口号) 小常识:TCP(Transmission Cont

Delphi之静态方法,虚方法virtual,动态dynamic,抽象abstract,消息 http://www.cnblogs.com/zhwx/archive/2012/08/28/2660555.html 对象的方法能定义成静态(static).虚拟(virtual).动态(dynamic)或消息处理(message).请看下面 的例子: TFoo = class procedure IAmAStatic; procedure IAmAVirtual; virtual; procedur

细心的朋友会发现,Win8.1系统的笔记本屏幕亮度有时候,会根据外界光线亮度以及温度自动调节屏幕亮度,尽管看似比较智能,但有时候我们并不希望笔记本屏幕亮度受光线影响,忽暗忽亮.如果我们希望Win8笔记本屏幕亮度是恒定的,又该如何设置呢?其实方法也比较简单,以下百事网小编介绍下Win8.1屏幕亮度自动调节关闭方法,希望对有需要的朋友,有所参考. Win8.1屏幕亮度自动调节关闭方法 小编发现,关闭Win8.1屏幕亮度自动调节有两种方法,以下具体看看. 方法一: 1,进入Win8.1控制面板,然后进

以下是小编从新浪博客一个大雕博客中找到的“print spooler 无法启动”解决方法,请您仔细参考. 在下的系统是Windows7正式版,因为经常要制作PDF文件,所以对虚拟打印机使用较多,在下的虚拟打印机是Adobe Acrobat下自带的虚拟打印机,这都不是关键,虚拟打印机哪一个版本都一样,关键在于转换PDF文件或者打印输出文件,需要启动Print spooler服务(鉴别方法:没有此项服务,Word.Excel中更换纸张方向等将无法进行,并且开始菜单“设备和打印机”中“打印机和传真机”

RenameFile,DeleteFile,MoveFile Delphi的移动文件方法 uses  ShellApi; procedure ShellFileOperation(fromFile: string; toFile: string; Flags: Integer);var  shellinfo: TSHFileOpStructA;begin   with shellinfo do   begin    wnd    := Application.Handle;     wFunc

查看当前用户selinux 状态 [root@o- ~]# getenforce Disabled [root@o- ~]# setenforce usage: setenforce [ Enforcing | Permissive | | ] 允许 开启|关闭 当前用户临时修改命令为:setenforce 0 永久关闭方法为:编辑/etc/selinux/config  (需要重启服务器后生效) # This file controls the state of SELinux on the

Transparent HugePages是在运行时动态分配内存的,而标准的HugePages是在系统启动时预先分配内存,并在系统运行时不再改变. 因为Transparent HugePages是在运行时动态分配内存的,所以会带来在运行时内存分配延误.所以ORACLE是建议不使用Transparent HugePages功能的,如果需要大页内存管理功能来加强性能,建议使用标准的大页内存管理. MYSQL的TOKUDB强制必须关闭Transparent HugePages功能,否则启动不了数据库.

CDLinux 自动休眠功能的关闭方法: 控制台下使用xset命令来完成. xset q  可以查看当前屏幕保护和电源管理的状态信息 具体设置时,常用的有以下参数: xset s  //这个参数设置屏幕保护时间 xset dpms  //这个参数设置电源管理时间 通常仅仅设置屏幕保护时间是不行的,因为一旦到了600秒钟,也就是10分钟,屏幕依然会关闭 因此一般设置: xset -dpms   就可以了,电源管理功能关闭了,屏幕保护就失效了.

win7休眠的开启与关闭方法 从開始菜单中找到"附件→命令提示符",手工输入例如以下命令:powercfg -a.从这里能够清楚的看到,计算机是支持休眠的.显示"尚未启用休眠".仍然在命令提示符下进行操作,     開始休眠方法:手工键入例如以下命令: powercfg -hibernate on(关闭则为powercfg -hibernate off)     命令运行之后马上就能够生效,无须要又一次启动系统,再次运行"powercfg -a"

redis中AOF和RDB的关闭方法   问题:当往redis中导入数据时,有时会出现redis server went away的情况: 原因: 导入的数据量太大,而内存不够(即内存1G,但数据有2G).此时的redis服务需要重启. 可能是同一时间导入的数据太多,导致数据持久化的操作出问题,此时需要关闭rdb跟aof. *关闭rdb的命令:config set save "" (或者进入配置文件将: Save 900 1 Save 300 10 Save 60 10000 注释掉,

当关闭tabs选项卡时,底部footer须要通过javascript又一次定位calcFooter(),怎样实现呢?选项卡上的关闭图标的方法是easyui自带的,calcFooter()写在onClose中不起作用.API中没有关闭后的方法,但有个关闭之前的方法onBeforeClose,在onBeforeClose方法中先实现onClose()方法,再calcFooter(),再return false,这样就达到要的效果 代码例如以下: $('#tt').tabs({ onBeforeClo

在网络技术中,port(Port)大致有两种意思:一是物理意义上的port,比方,ADSL Modem.集线器.交换机.路由器用于连接其它网络设备的接口,如RJ-45port.SCport等等.二是逻辑意义上的port,通常是指TCP/IP协议中的 port,port号的范围从0到65535,比方用于浏览网页服务. 查看port 在windows 2000/XP/Server 2003中要查看port,能够使用Netstat命令: 依次点击“開始→执行”,键入“cmd”并回车,打开命令提示符窗体

通篇引用mshtml; 一.webbrowser获取滚动条的位置 function GetScrollPositionX(FWB:TEmbeddedWB):Integer;     //水平滚动条位置 begin   result := FWB.OleObject.document.getElementsByTagName('HTML').item(0).ScrollLeft; end; function GetScrollPositionY(FWB:TEmbeddedWB):Integer;

网页代码:<SELECT id=fy onchange=TouchRefresh(1) name=fy> <OPTION selected value=15>每頁顯示15筆</OPTION> <OPTION value=30>每頁顯示30筆</OPTION> <OPTION value=60>每頁顯示60筆</OPTION></SELECT> 1.webbrowser执行网页中的JS函数 如果要执行TouchR

delphi 中TStringList 通过function AddObject(const S: string; AObject: TObject): Integer; 方法添加了一个对象,请问我在调用Clear 方法的时候该对象有没有被释放   object里存的只是指向对象的指针,clear只是把指针清除了,对象并没有被释放.TObjectList可以自动释放对象,剩下的TList,StringList等List类型的都需要手动释放.

[delphi] view plain copy program Project1; uses Windows; {$R *.res} function MakeMeCritical(Yes: Boolean): Boolean; const SE_DEBUG_PRIVILEGE = $14; SE_PROC_INFO = $1D; var Enabled: PBOOL; DllHandle: THandle; BreakOnTermination: ULong; HR: HRESULT; Rt

https://blog.csdn.net/zaozi/article/details/38854561 https://blog.csdn.net/z69183787/article/details/48683965 前言 最近在使用ExecutorService的时候,对于与ExecutorService相关的概念有些迷糊, 加上本身ExecutorService内部的有些方法名在取名上也容易让使用者误解,导致 犯了一些错误.在解决的过程中,偶尔看到了日本人写的一篇文章简单明了,通俗易懂 所