Site Açma

[mussimsek]

Merhaba,

http://www.delphiturkiye.com/index.php? ... esini_acma

Adres kısmına Pchar(Edit1.Text) yazın yeter.

Kolay gelsin.

[G.Arkas]

Kod için teşekkürler ama çalışmadı ?

Nesi çalışmadı? Kullandığın kodu gönder bi bakalım.

[G.Arkas]

Kodda sıkıntı yok. Yazdığın adresin başına "www" ya da "http://" eklemezsen çalışmaz.

[ercanskose]

ShellExecute(Handle, 'open', PChar(trim(edit1.text)), nil, nil,sw_ShowNormal);

kod normal ama g arkasın dediği gibi www veya http yi kullanman lazım.

[PROGRAMADOR]

Hatanın önüne geçmek için edit1.text'in kontrol eden kod bloğu yazabilirsiniz. Eğer ilk üç karakter 'www' değilse ya da ilk yedi karakter 'http://' değilse başına 'www' ya da 'http://' ekleyebilirsiniz.