游戏脚本管理 (一)(2)

2008-04-09 04:23:02来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折



interface

uses
Windows
, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms;

const

//四个指令的常量定义
COMMAND_PRINTSTRING
= ''''PrintString'''';
COMMAND_NEWLINE
= ''''Newline'''';
COMMAND_PRINTSTRINGLOOP
= ''''PrintStringLoop'''';
COMMAND_WAITFORKEYPRESS
= ''''WaitForKeyPress'''';

type
TScript
= class
private
FCommandList
: TStrings; //保存脚本
procedure GetCommand
(Index: integer; var strCommand: string); //获取一个命令
procedure GetStrParam
(Index: integer; var strParam: string); //获取一个字符串参数
procedure GetIntParam
(Index: integer; var intParam

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:2004.11.27.What''''s New in Delphi 2005

下一篇:dbgrideh如何实现点击标题排序