Question

在delphi中用pagecontrol组件编写成各分页折叠的效果时，在编译时，按钮老是被覆盖，有什么方法解决吗

Answer 1

[要点说明]
⑴ PageControl 组件的使用与如何添加一个新页。选中 Pagecontrol 组件，单击右键，在他出的菜单中单击 NewPage命令即可。
⑵ 如何选中一个页面组件。有 3 种方法：在对象树中或者对象观察器中选中该页面，或者在窗体中单击该页面，然后再单击该页面的中部。
⑶ 如何给每个页面添加一幅图片。可以在每个页面添加一 Image 组件，设置该组件的 Picture 属性来实现。
⑷ 如何任意选取其他图片代替现有图片,可以为窗体添加一个OpenPictureDialog组件，该组件的使用类似 Opendialog组件。由于5个页面的 Image组件的 Tag属性一次设置为 1－5，编写好一个事件过程后，在其他 Image组件的 OnClick事件右边的空白处共享同一事件。
[程序代码]
procedure Tform1.image2click(sender:tobject);
begin
openpicturedialog1.execute;
case(sender as timage).tag of
1:Image1.Picture,LoadFromFile(OpenPictureDialog1.FileName);
2:Image1.Picture,LoadFromFile(OpenPictureDialog1.FileName);
3:Image1.Picture,LoadFromFile(OpenPictureDialog1.FileName);
4:Image1.Picture,LoadFromFile(OpenPictureDialog1.FileName);
5:Image1.Picture,LoadFromFile(OpenPictureDialog1.FileName);
end;
end;

Answer 2

没有明白你问的，如果当前activepage激活的时候，始终显示当前页的内容！