发信人: lofe ()感激生活(), 信区: BorlandDev
标  题: .动态创建事件
发信站: 哈工大紫丁香 (Mon Sep  4 16:13:30 2000), 转信

memo.onchange:=memo1Change;

procedure TForm1.Memo1Change(Sender: TObject);
begin
panel1.caption:='Content has been changed';
end;

--
※ 修改:．haojs 于 Sep  4 16:11:07 修改本文．[FROM: bbs.hit.edu.cn]
--
※ 转寄:．武汉白云黄鹤站 bbs.whnet.edu.cn．[FROM: bbs.hit.edu.cn]

--
☆ 来源:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: haojs.bbs@bbs.whnet.]