SDL & Object Pascal (Delphi) [3] 制作一个选单
一个选单大致是这样：
1.可以被以某种形式呼叫出来，如按下esc；
2.在这个选单中功能键有不同的定义，如原本方向键控制走路，但现在改为控制光标的位置；
3.按下确定键后有对应功能被执行；
4.可以被关闭。
那么我的办法是编写两个子程，其中一个处理选单中的事件，另外一个专门负责画选单。
在从步行切换到选单的时候，可能需要清除当前的键值。如果步行中使用了SDL_EnableKeyRepeat方法把键盘的频率变高，对于选单来说就太快了。所以可能要在调用选单之前写上：
SDL_EnableKeyRepeat(0, 0);
event.key.keysym.sym := 0;
这样降低了键盘的反应，同时清除当前的键值，要不然呼出选单之后它可能还会自己转一会（如果之前用了PollEvent方式，我还没搞清楚原因）。不过如果在行走中使用的是WaitEvent方式，事情就会简单很多。PollEvent方式看来是太快了，在选单中不合适。
处理选单事件的子程：
procedure MenuSystem;
var
menu: integer;
begin
while (SDL_WaitEvent(@event) >= 0) do
begin
case event.type_ of
SDL_QUITEV: //这里处理窗口退出事件
if messagebox(0, 'Are you sure to quit?', 'KYS Windows', MB_OKCANCEL) = IDOK then Quit;
SDL_KEYUP:
begin
if (event.key.keysym.sym = sdlk_down) then
begin
menu := menu+1;
if menu > 3 then menu := 0; //按下下键的溢出
showMenusystem(menu); //每次当前选中发生变化时, 均重画选单
end;
if (event.key.keysym.sym = sdlk_up) then
begin
相关文档：
常用的BCB & Delphi 函数
关键字：BCB,delphi,函数
作者：鲁小班 更新：2003-08-12 浏览：12686
翻译的不好，请见谅。
翻译：鲁小班
文件： ActnList
CreateAction 函数 创建一个指定类型的Action，显示在action list editor中。
EnumRegisteredAction 过程 枚举已经注册的 ......
消息的处理流程，流程如下：
其派发处理过程详细如下：
注意：TWinControl里面WndProc有调用系统API DefWindowProc,该函数调用缺省的窗口过程来为应用程序没有处理的任何窗口消息提供缺省的处理。而TWinControl里面DefaultHandler又调用了系统API CallWindowProc，该函数CallWindowProc将消息信息传送给指定的窗� ......
技术交流,DH讲解. 这个是在CSDN上面看见的问题.我说说自己的想法. procedure TForm1.btn1Click(Sender: TObject);
var
Str:String;
begin
Str:='abc' ;
Str:=str+'d';
str:=copy(Str,1,3);
str:=UpperCase(str);
end;
问题1答案:2010下
Unit4.pas.29: begin
005144E0 55 p ......
在编制了一个应用程序后的维护阶段，我们会面临给应用程序升级的工作.无疑，手工升级的工作是十分繁琐的，你可能会需要到用户的机器上去更新文件.可是，如果能编一个自动升级程序，放在网络上，让用户下载，只需执行一下就完成升级工作，不是很方便吗？其实，用Delphi可以很方便地编制出这样一个的程序.
以下是我们的例子� ......
在编译delphi程序时会出现在些提示，全是E文的，现在给大家一个对照表，可以更好的理解错误提示信息！
';' not allowed before 'ELSE' ElSE前不允许有“;”
'' clause not allowed in OLE automation section 在OLE自动区段不允许“”子句
'' is not a type identifier 不是类型标识符
'' not prev ......
