yani? :D:D

form ekle bitane onu showmodal la çağır işte zart zurtexplorer olduğu form un on create olayına webbrowser1. navigate("'http://'+form2. edit1. text")gibi yaparsan olur punto cero

hacı anasyfa gibi bi değişken atıcan. anasayfa:=form2. edit1. text die sonra formun on create olayına webbrowser1. navigate gbi bişiydi (: mesela butona koydun control panelini form2 olsun bu panelbutton1 in on click şeyineform2. showmodal yaparsan form2 kapanmadan form1 e geçiş yapamazsın (: yani yapmasanda olurform2 deki değeri çağırarak yapıcaksın punto cero

Delphide internet explorer gibi bir kontrol paneli yapmak istiyorum.. Kullanıcı oradan anasayfasını seçebilsin vs..

anlatayım o olayı şimdi delphi webbrowser olayında internet explorerı kullandığı içininternet explorer giriş sayfası neyse gohome dediğinde oraya gidecektirinternet explorer giriş sayfasını değiştirmek için register girer devreye :)yapman gereken delphiden internet explorerın start page anahtarını değiştirmek.. onuda anlatayım tam olsunişin içine register girince ncelikle formununuses kısmına Registry ekledaha sonra var bloğuna Tregistery türünden bir değişken tanımlayalım ben web1 dedimvar Form1: TForm1; Web1:TRegistry;şimdi 2 buton 1 webbrowser 1 tanede edit koyalım butonlardan biri anasayfa olacak diğeri ise edit1 den girilen değeri start page yani anasayfa değeri ile değiştircekdeğiştirme olayını yapıyoruz butonlardan birine geliyosunWeb1:=TRegistry. Create;uygulama için bir registery objesi oluşturuyoruz... registery da 6 ana anahtar bulunur internet explorer start page olayının olduğu anahtarı açıyoruzWeb1. RootKey:=HKEY_CURRENT_USER;şimdi işlem yapacağımız anahtarı açıyoruzWeb1. OpenKey ;ve son olarak Web1. WriteString('Start Page', edit1. text);anahtarımıızın değerini değiştiriyoruz detaylı satır satır anlattım kafan karışmasın procedure TForm1. Button1Click ;beginWeb1:=TRegistry. Create;Web1. RootKey:=HKEY_CURRENT_USER;Web1. OpenKey ;Web1. WriteString('Start Page', edit1. text);end;şu şekilde olcak :) farklı farklı yerlere yazma ve programı çalıştır :) sırıtma la.

ncekini boşver(3mr3 verdiği değil)editlendi gene bunu yap iki form 1. forma buton ve webbrowser koyon craete olayınıa (form1) vardeger:TRegistry;sonuc:AnsiString;altklasor:AnsiString;begindeger:=TRegistry. Create;deger. RootKey:=HKEY_CURRENT_USER;//Bu ana Rootla ilgileniyorumaltklasor:='Software\exploit\';deger. OpenKey ;deger. readString ;sonuc:=deger. ReadString ;deger. CloseKey;if sonuc='' then webbrowser1. navigate else webbrowser1. navigate ;bunu koy butona bunu koy form2. show form 2buton ve edit kot butona bunu koyvardeger:TRegistry;altklasor:AnsiString;begindeger:=TRegistry. Create;deger. RootKey:=HKEY_CURRENT_USER;//Bu ana Rootla ilgileniyorumaltklasor:='Software\exploit\';deger. OpenKey ;deger. WriteString('ana sayfa', edit1. Text);deger. CloseKey;end; ve ikisindede uses kısmına Registry koymayı unutma |sadece aptalların başarısı ders notu ile lçülür|

aga sadece anasayfa olayını nsaıl yapcam diyoprum yani bi control paneli olucak adam oradan anasayfasını seçicek..

anladığım kadarı ile basit bir web browser yapcan gerekli malzemeler - 1 adet web browser- keyfe gre 3-4 kaşık pardon buton :)bunlar yeterli misal dur butonu yapcaksın diyelimbutonun click olayına webbrowser1. stopyada yenile için bi buton yaptın diyelimwebbrowser1. refreshdiye gider... edit ansayfa olayını anlatmayı unutmuşum :Dwebbrowser1. gohome; :) sırıtma la.