易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi方法（事件）指针如何入栈。。？

delphi方法指针如何入栈。。？
type TClickObject = procedure (Sender: TObject) Of object;

procedure TForm1.Button9Click(Sender: TObject);
var
  a:TStack;
  b : TClickObject;
begin
    b := Button10.OnClick;
    a.Push(@b);  //这样不报错，但是运行起来程序中断
    a.Push(b);  //这个直接报错[错误] Unit1.pas(320): Not enough actual parameters
end;


delphi菜鸟。 不知道该怎么办了。。求救。。。
我的意图是点击按钮时候把对应的响应事件入栈，点返回的时候执行栈顶元素代表的过程 ，来实现上一步按钮的功能。

引用
最基本 的
a:TStack; 这对象你都没创建，你使用不出错才怪



额。。。失误。。那创建之后就可以直接a.push(@b);  这样用行吗？

顺带问一下。我该怎么取得栈顶元素
这样 ？？x : TClickObject;
        x := a.peek  ???
Delphi(Pascal) code:

type
PClickObject = ^TClickObject;
var
p: PClickObject;
begin
// 前面省略
new(p);
p^ := b;
a.push(p);
end;


注意指针用完后释放
Delphi(Pascal) code:

type
PClickObject = ^TC


相关问答：

请教下，用DELPHI做SOHU的 - Delphi / 非技术区

一般都是怎么接活的？
收入怎么样
sohu？soho？

sohu 可能是small office house unit
小办公室，把家变成单位。

去威客网啊,很多个呢,还有外包的网站

学习学习。

现在Delphi做东西不行了,处于淘汰状 ......

2009学习delphi的前景

我本来在学校是弄的J2EE
昨天去了长沙一家公司应聘 说是有一个项目 delphi的
实习期一个月 四天半的delphi培训 后面25天给你一个设计文档自己做一个项目
走后不久打电话过来叫我星期一去报到 
看到delphi� ......

安装了jre6.17后，Delphi不能关闭？

如题， 点击Delphi的File菜单的Exit退出Delphi， Delphi部分关闭--即不能再操作Delphi，但任务栏和进程里，Delphi还在运行，没有真正的退出。是不是安装了jre改变了某些环境变量导致，请问高手如何解决？ 注：没安装 ......

.net调用delphi写的dll,出错误

错误类型：出错误尝试读取或写入受保护的内存。这通常指示其他内存已损坏。
C#源码
[DllImport("Base64.dll")]
public static extern string Base64ToStr(string Base64);
protected void Page_Load(o ......

delphi简单问题

IF THEN ELSE中多个条件怎么写，如：字符串S1，S2，S3，S4均要不为空。
怎么样把它写到IF中去？
请各位帮帮忙，谢谢！
if (S1<>'') and (S2<>'') and (S3<>'') and (S4<>'') then
begin ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号