1

我在使用旧的 delphi.net 应用程序时遇到了一些麻烦。

我需要在页面上的特定位置显示一些缩略图，并且当用户单击图像时显示图像。

图像相当小，所以我没有为缩略图生成而烦恼。

问题是我无法让 onclick 事件正常工作。

这是我的代码：（这是在 page_load 事件中）

filer := Directory.GetFiles(dirstr,soegestr);
for f in filer do
begin
   img := ImageButton.Create;
   img.ImageUrl := f;
   img.Width := 30;
   img.Height := 50;
   img.Style.Add('margin-right','10px');
   include(img.Click, FragtbrevsBilledeClick);
   PanelBilleder.Controls.Add(img);
end;

包括什么也不做。onclick 事件只是触发回发。

FragtbrevsClick 定义如下：

procedure TWebForm1.FragtbrevsBilledeClick(Sender: TObject;
   e: ImageClickEventArgs);
begin
  Response.Redirect((sender as ImageButton).ImageUrl);
end;

在 fragtbrevs 点击中设置断点永远不会被击中。

我不是一个规范的网络开发人员，所以也欢迎使用其他方法来解决问题！:-)

4

1 回答 1

1

您需要做的就是设置 ImageButton 的 PostBackURL 属性（以及您喜欢的任何其他属性）。不需要 Click 事件处理程序。单击该按钮时，它将自动重定向到 PostBackURL 位置。这应该足够了，因为您没有在 FragtbrevsBilledeClick 事件处理程序中执行任何其他操作。

于 2009-07-10T23:31:23.477 回答