2013年6月19日

Delphi 编译错误信息表(转载自万一博客)

摘要： ; not allowed before ELSEElSE前不允许有“;” clause not allowed in OLE automation section在OLE自动区段不允许“”子句 is not a type identifier不是类型标识符 not previously declared as a PROPERTY前面没有说明PROPERTYGOTO leads into or out of TRY statement GOTO进入或超出TRY语句的范围 clause expected, but found要求子句，但出现16-Bit fixup encountered .. 阅读全文

posted @ 2013-06-19 12:11 shellcode 阅读(1157) 评论(0) 推荐(0)

Delphi程序流程三(1)(while)PS:顺便写了个最简单的任务管理器(包含申明API 自己申明参数为结构型API 组件LISTVIEW的用法)

摘要： unit Unit1;interfaceuses Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls;type TForm1 = class(TForm) btn1: TButton; ListView: TListView; procedure btn1Click(Sender: TObject); private { Private declarations } public { Public declaration... 阅读全文

posted @ 2013-06-19 00:57 shellcode 阅读(207) 评论(0) 推荐(0)

2013年6月18日

Delphi程序流程二(for)

摘要： unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) btn1: TButton; procedure btn1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TFor... 阅读全文

posted @ 2013-06-18 15:04 shellcode 阅读(170) 评论(0) 推荐(0)

dlephi程序流程一(if then)

摘要： unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) stredit: TEdit; btn1: TButton; procedure btn1Click(Sender: TObject); procedure FormCreate(Sender: TObject); procedure streditKeyPress(Sen... 阅读全文

posted @ 2013-06-18 12:18 shellcode 阅读(262) 评论(0) 推荐(0)

2013年6月17日

Delphi中异常捕获的简单应用

摘要： unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) btn1: TButton; procedure getdeugbtn(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TFo... 阅读全文

posted @ 2013-06-17 21:53 shellcode 阅读(446) 评论(0) 推荐(0)

Delphi程序API申明调用及参数传址与传值

摘要： unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) btn1: TButton; procedure apitest(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1... 阅读全文

posted @ 2013-06-17 21:29 shellcode 阅读(300) 评论(0) 推荐(0)

2013年6月16日

Delphi中的数据类型

摘要： 类型 名称 字节数 取值范围Integer 整型 4 -2147483648-2147483647Cardinal 实数型 4 0-4294967295longword 长字型 4 0-4294967295 smallInt 小整型 2 -32768-32767Word 实数小整型 2 0-65535shortInt 短整型 1 -128-127Byte 实数短整型 1 0-255Boolean 逻辑型 1 False(假)0/True(真)1string 文本型 255个字符 可以指定长短 比如:var mystring:string[100] 占100个字节的空间数组 定义数组a:arra 阅读全文

posted @ 2013-06-16 19:27 shellcode 阅读(504) 评论(0) 推荐(0)

2013年6月12日

VPS远程服务器修改登陆用户名

摘要： 1.开始->运行->输入 gpedit.msc(组策略)->回车2.依次点开,计算机配置->windows 设置->安全设置->本地策略->安全选项3.在右边的地方,拉到最下面,找到重命令管理员帐户,双击4.输入你要的用户名,确定5.然后注销一下,就可以用新用户名登陆了 阅读全文

posted @ 2013-06-12 23:24 shellcode 阅读(244) 评论(0) 推荐(0)

如何保证windows远程连接安全

摘要： Windows的远程连接能够让出差在外，不在公司的管理员提供管理公司服务器的窗口，同时也给服务器带了隐患，3389是标准的远程连接端口，而且网上已经有过利用3389来攻击服务器的方法，所以咱们得把定时炸弹拆除。工具/原料Windows server 2003法/步骤点击开始运行，输入”regedit”打开注册表 然后找到：[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\TerminalServer\Wds\rdpwd\Tds\tcp]下找到PortNamber，默认是0x00000d3d(3389)，这是十六进制字符，括号里面为十进制的 阅读全文

posted @ 2013-06-12 11:52 shellcode 阅读(294) 评论(0) 推荐(0)

导航