WebBrovserde GoLoadImage()yi Delphi'den Aşmak ?

[Necatiozbek]

Arkadaşlar merhaba ;
Delphide yazdığım bir programda Web Browser kullanıyorum..Web Browser de açtığım bir sayfada resim yükleme yeri var..
Web sayfasında resim yükleme butonunun onclick olayına :

Kod: Tümünü seç

<INPUT onclick=GoLoadImage() type=button value="Import Person Picture" name=b22> 

GoLoadImage() fonksiyonunu eklemişler.. Butona bastığında resim seçmek için pencere açılıyor ,resmi seçiyorsun resim asp sayfasına loaad olup hemen gözüküyor ve sayfa submit edilip işleme devam edilebiliyor. resim yoksa devam edemiyorsun. GoLoadImage Fonksiyonunu ise sayfalarının altında aşağıdaki gibi tanımlamışlar

Kod: Tümünü seç

if confirm("?? ???? ??????")=true then 
      if ImageFilename<>"" then
         GetImageData()
         form1.submit()
      else
         alert("?? ??? ????? ?????? ???????")
      end if
  end if
end function

dim ImageFilename
function GoLoadImage()
   ImageFilename=""
   fg =AddPic1.LoadPic()
   if fg=0  then 
      ImageFilename=AddPic1.GetFileName()
      document.all("pimage").src=ImageFilename
   else
      alert("Image Error")
   end if
end function

function GetImageData()
   data1=AddPic1.GetCode(ImageFilename)
   document.all("idata").value=data1
end function

Ben bu durumu delphi kısmından aşabilirmiyim ? Yani web sayfasındaki butona basmadan delphi tarafında bir butona vs basarak web sayfasında değişken olarak tanımlanmış ImageFilename 'ye resim adını yada yolunu atayıp GetImageData() fonksiyonunu tetikleyerek web sayfasına resmi load ettirebilir ve sayfayı submit edttirebilirmiyim ?

Daha önce de böyle bir iki problemim olmuştu ama halledememiştim maalsef..
Çözüm üretebilecek, yol gösterebilecek arkadaşlara şimdiden teşekkür ederim..