Runtime oluşturulan Webbrowserda goback,goforward işlemleri

[Delhici]

Merhaba arkadaşlar run time oluşturduğum bir webbrowserda goback ve goforward işlemlerini nasıl yapabilirim. ayrıca burdan bulduğum bir kodla webbrowserdaki enter sorununu çözmüştüm. Ama bu kodu runtime oluşturduğum webbrowsera uygulayamadım. nasıl yapacağım konusunda fikri olan var mı yardımcı olur musunuz?

[Delhici]

Şimdiye kadar sorduğum sorulara hep bir cevap geliyordu. Bu sefer ki soruma kimse cevap vermemiş.. Şaşırdım valla.

Neyse yine de teşekkür ederim.

[Jire]

Bence biraz önyargılısın, burada ki herkesin kendine has işleri ve sorumlulukları var, yani burada ki kişiler robot değil ki 3 saatte içinde sana yanıt verebilsin .

Soruna dönersek, bunun basit olduğunu düşünüyorum. Tek yapman burada ki koda göre uyarlamak.

Kod: Tümünü seç

..
var
WB: TWebBrowser;

implementation

{$R *.dfm}
..

..
procedure TForm.Dugme_Geri(Sender: TObject);
begin
WB.GoBack;
WB.GoForward;
end;

valla daha nasıl geri ileri yapılır bilemiyorum benim bildiğim bu . gerisini diğer üyelere bırakıyorum.

[ikutluay]

Şimdiye kadar sorduğum sorulara hep bir cevap geliyordu. Bu sefer ki soruma kimse cevap vermemiş.. Şaşırdım valla.

Neyse yine de teşekkür ederim.

aşıl şaşırılması gereken konu mesaj atıp sonra 3 saatin ardından nasıl olduda cevap gelmemiş diye şaşırmanız bence. sonuçta burası bir forum çağrı merkezi değil. sitem etmeden önce bir kere daha düşünün bence

[Delhici]

Günaydın arkadaşlar

Kod: Tümünü seç

procedure TForm.Dugme_Geri(Sender: TObject);
begin
WB.GoBack;
WB.GoForward;
end;

yukarıdaki kodları kullanmıştım zaten. ama wb yaratılmadığınaa dair bir mesaj veriyor.. yhani accesc violation hatası veriyor.. Bu kodlar bu yüzden işe yaramıyor..

ayrıca tepkiler için teşekkür ederim.

[aslangeri]

s.a.
a.v. alıyorsan kodları yazdığın yerde demekki bileşen daha create edilmemiş.
düğmeye yazdığın koddaki bileşen ile create ettiğin bileşen aynı bileşen mi?
kolay gelsin.

[Delhici]

öncelikle bir butonla aşağıdaki kodları kullanarak webbrowseri oluşturuyorum.

Kod: Tümünü seç

 var 
wb: TWebBrowser; 
begin 
  wb := TWebBrowser.Create(Form1); 
  TWinControl(wb).Name := 'yeni'; 
  TWinControl(wb).Parent := Form1; 
  wb.Align := alClient; 
  

daha sonra sayfaları yükledikten sonra bir buttona

Kod: Tümünü seç

var wb:twebbrowser
begin
wb.goback

kodlarını gösteriyorum

ama butona bastığımda acces violation hatasını veriyor. tekrar webbrowser yaratıyorum bu noktada .. tabiki sizinde anlayacağınız gibi hiç bir işime yaramıyor

[emin_as]

Yanlis yapiyorsun.

wb ile yarattigin degisken stack ta kullanildigindan procedure den çıkınca bilginin tutuldugu degisken gidiyor. Global bir wb degiskeni kullanmalısın.

Öbür tarafta kullandıgın wb ise henüz oluşmamış oluyor.
Şu şekilde yapabilirsin.

Kod: Tümünü seç

 TForm1 = class (tform)
    ....
    .....
  public
     wb : TWebBrowser;
  end; 

var wb: TWebbrowser; tanımlarını sil ve sadece form public içindeki wb tanımlı kalsın.

wb yi kullanman gerektiginde de assigned ile kontrol et.

Kod: Tümünü seç

  if assigned(wb) then
     wb.GoBack;

[ikutluay]

emin_as arkadaşımız gayet güzel bir cevap vermiş. bu yazdığım sadece ek bilgi mahiyetinde olacak o bakımdan. bir procedure içinde tanımladığın değişkene procedure çalıştığında oluşturulur ve sonlandığında da hafızadan silinir. bunlara local değişkenler denir.

emin_as arakdaşın bahsettiği gibi unit içinde tanımladığın değişkenler ise global olduklarından tüm işlemler boyunca hafızada tutulurlar ve o unit yada tanımlandığı form içindeki her procedure fonksiyon vs ona erişebilirler.

eğer içeride oluşan değer silinmesnin istiyorsan bu kullandığın yerde mantıksız olacaktır ama fonksiyon kullanıp dönüş değerini saklamak bir yol olabilir.

[Delhici]

Cevaplar için teşekkür ederim. şu an en son ki cevabı bilgisayarım başında olmadığım için kontrol edemedim. ancak çalışacağına eminim. Tekrar teşekkür ederim.

Kolay gelsin.

[Delhici]

Goback ve Goforward sorunları emin_as sayesinde çözülmüştür.. ANcak şimdi başka büyük bir sorunda yine uğraşmaktayım. create edilen bu webbrowserda da enter tuşu çalışmamaktadır. Burdaki webbrowser enter sorunu konusunda anlatılan herşeyi yapmama rağmen yine sorun devam etmektedir. Ve yine ikinci büyük sorun.. Pagecontrol bileşeni içerisinde tabsheetslerde create ettiğim webbrowserlar da goback işlemini yaptığımda en son create edilen tabsheetteki wb. bileşenini sadece geri alıyor. Bu sorunu nasıl halledebilirim.. Ayrıca şu an çok acelem olduğu için konuyu tam da detaylı olarak anlatamadım. yardımcı olur musunuz?