J'ai un peu de mal avec une ancienne application delphi.net.ASP.net Delphi image dynamique onclick événement
J'ai besoin d'afficher des images miniatures sur un emplacement spécifique de la page et lorsque l'utilisateur clique sur l'image, affiche l'image. Les images sont plutôt petites, donc je n'ai pas été dérangé par la génération de vignettes.
Le problème est que je n'arrive pas à faire fonctionner l'événement onclick.
Voici mon code: (Ceci est dans le cas 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;
comprennent ne fait rien. L'événement onclick déclenche juste une publication.
FragtbrevsClick est défini comme suit:
procedure TWebForm1.FragtbrevsBilledeClick(Sender: TObject;
e: ImageClickEventArgs);
begin
Response.Redirect((sender as ImageButton).ImageUrl);
end;
Définition d'un point d'arrêt en fragtbrevs clics ne se fait frapper.
Je ne suis pas un développeur Web de régule donc d'autres façons de résoudre le problème sont également les bienvenues! :-)