Türkiye'nin en eski ve aktif online oyun platformu, Ultima Online, Counter-Strike ve diğer online oyunlar hakkında Türkçe haber, bilgi ve forum sunuyor. Türkiye'nin en eski ve aktif online oyun platformu, Ultima Online, Counter-Strike ve diğer online oyunlar hakkında Türkçe haber, bilgi ve forum sunuyor.
  • ANASAYFA
  • FORUM
  • DOKÜMAN
  • DOWNLOAD
  • DISCORD
  • İLETİŞİM
   Üye ol    Giriş
    Doküman > Ultima Online > Client & Connector > Vb Connector Anlatımı (Yeni)
Tymaron

Vb Connector Anlatımı (Yeni)

  • Tymaron
  • 2008-06-20 18:58
  • 29 Yorumlar
  • 11534 Görüntüleme
Evet arkadaşlar benden beklenmedik bir döküman belki bir daha böyle bir döküman yapmam kıymetini bilin neyse. Konuya gelelim. Sizlere Basit görünümlü connector yapımını ve işinize yariyacak bir kaç kod göstericem. Önce aşağıdaki link'ten visual basic 6.0 sürümünü indirelim.


Visual Basic 6.0

Serial: Yasak olduğunu düşündüğümden vermiyorum
Rar Pass : zaxo7


Şimdi dosyamızı indirip programımızı kurduktan sonra vb'yi açalım. Karşımıza bir tablo çıkıcak bu tabloda Standart.exe yi seçerek yeni projemize ilk adımı atalım.
Karşımıza aşağıdaki gibi bir görüntü çıkması lazım




Bundan sonrasını bölüm bölüm anlatacağım.

1. Bölüm Button Ekleme

Connectorumuzu kullanmak için doğal olarak bir button olması lazım aşağıdaki resimlerde sizlere nasıl button ekleneceğini anlattım. Önce 1. Resimdeki CommandButtonu tıklıyoruz daha sonra projemizin herhangibi bir yerine istediğimiz şekilde buttonu çiziyoruz ve 2. resimdeki gibi bir buttonumuz olacak. Bu buttonları projemizin istediği yerine taşıyabilir ve boyutunu ayarliyabiliriz. Buttonların isimlerini değiştirmek içinde 3. resimdeki gibi caption kısmındaki yazıyı değiştirmemiz yeterli olacak.


CommandButtonu
https://img178.imageshack.us/img178/8060/resim2ha9.jpg

Ve çizdiğimiz Buttonlar


Button İsmi değiştirme


2. Bölüm Resim ekleme ve Font Rengini değiştirme
Evet button kısmının bir çok yerini geçmiş bulunmaktayız şimdi isterseniz diye resim eklemeyide göstericem ve arka font renginin değiştirilmesini. Daha sonrada işinize yarayabilecek bir kaç kod göstericem sizlere...

Resim eklemek için 1. resimdeki PictureBox bölümünü tıklıyoruz daha sonra buttonlarda yaptığımız işlemin aynısını burada yapıyoruz. Resmin büyüklüğünü çiziyoruz. daha sonra bu çizdiğimiz yer seçiliyken 3. Resimde çizdiğimiz resim alanı bulunmakta 3. resimdede gösterdiğim gibi picture bölümünü seçiyoruz ondan sonrasını zaten biliyorsunuz ama dikkat etmeniz bir dokta var ekliceğiniz resim yaptığınız yer kadar bir büyüklükte olması lazım vb de bunun ayarını yapamıyorsunuz. 4. resimde ise font renginin değiştirildiği bölümü gösterdim


Resim Ekleme


Resim için Ayırdığımız Bölüm



Resim Bulma



Font Renk Ayarı




3. Bölüm Kod ekleme Ve Bir Kaç Kod

Bu bölümde ise sizlere nasıl buttonlara fonksiyon verebilceğinizi anlatıcam ve bunun içindede bir kaç tane işinize yarayabilecek kodlar bulunmakta.
İlk Önce sizlere bağlan butonunu gösterim. Bağlan buttonuna işlev vermek için buttonu çift tıklıyoruz ve karşımıza Bağlan buttonunun kodlarını yazabileceğimiz kısım çıkıyor o kısma aşağıdaki kodu yazabilirsiniz.


code]Private Sub Command1_Click()
On Local Error GoTo hata
Dim K
K = Shell("C:\Program Files\EA Games\Ultima Online Mondain's Legacy\client.exe", 1)
Exit Sub
hata:
MsgBox ("Client Dosyası Bulunamadı")
end
End Sub

Siz [ K = Shell("C:\Program Files\EA Games\Ultima Online Mondain's Legacy\client.exe", 1) ] kısmını kendinize göre ayarliyabilirsiniz. ben burada sizlere ultimanın içindeki orjinal clientti tanıttım siz kendi clientinizi tanıtmak için onun ismini yazabilirsiniz örnek sphere-wiki.exe

Dediğim gibi önce kod eklemek istediğiniz buttonu çift tıklıyorsunuz daha sonra aşağıdaki gibi kod eklemek istediğiniz buttonun bölümü çıkıyor oraya vermiş olduğum kodları ya da öğrenmiş olduğunuz kodları yazıyorsunuz.


Artık diğer buttonların nasıl eklendiğini anlatmama gerek kalmadı bu yüzden farklı 2 kod daha vereceğim size bu kodlardan ilki siteye yönlendirme bir diğeri ise connectoru kapatmak. Daha fazla bilgi vermek isterdim ama bu sefer bu işe emek harcamış olan arkadaşların emeği boşa giderdi daha fazla bilgi edinmek isteyen bir vb kitabı falan alıp kendini daha iyi geliştirebilir.

Siteye Yönlendirme Kodu


Dim ver
ver = "explorer.exe" & " https://" & "www.xxxxxx.com/"
Shell ver, vbNormalFocus
End Sub
Connectoru Kapatmak çıkış Buttonu Yani

End
End Sub

Tamamen kendi emeğim ile anlattım umarım işinize yarar kolay gelsin

// Link Yenilenmiştir

www.ultima-strike.com ailesine Tymaron tarafından yazılmıştır. Sorulmadan paylaşılması yasaktır.

Üye Ol veya Giriş Yap

Bu içeriğe yorum atmak istiyorsanız hemen üye olun veya giriş yapın.

Yorumlar (29)

Crany 2013-10-18 04:45

link ve resimler güncelleştirilmesi gerek bazı resimler ve dowloand edilecek programlar edilmiyor yardım.

No Avatar
beckham35 2011-06-30 12:50

Aga Ben Dediğin Herşeyi Yptm Ve Hazırladım Ama Nasıl Giricem Oyuna Fln Nasıl Ayarlıcam Bi Yrdmcı Olurmsun . Özel msj veya buradan yazabilirsin .

No Avatar
orcun.baskaya 2011-01-08 20:30

Arkadasım Su Lınkıne Bakarmısın Acmıyor Bu Vb

No Avatar
slayerfurkan 2010-05-20 15:01

arkadaşım icon ekleyemiyoruz nasıl yapcaz bunu

MtHan 2010-01-22 13:56

Bu kadar kolay şeyi, p dili başlangıç seviyesinde bile yaparsın. Millet bu işten ekmek yiyor diyorsun. Peki ms ofis le openofis i karşılaştıralım. Biri açık kaynak ve kodlar gözüküyor. Neden hala ms ofis para kazandırıyor? Buna connector anlatımı denmez bir de. Ancak küçük bir arayüz uyguaması denebilir...

No Avatar
anlkysrn 2010-01-05 11:53

[b]Kendide kazanıo para ondan orasindan burasindan ortasindan anlatmıs ya anlatıosan tam anlat yada milleti boştan yere kandırma..[/b]

No Avatar
aphelion 2009-12-22 01:01

[b]Kardesım gorsellıgı naapsın bu arkaslar speedı,easyuo ve ınj engellıyemedıkden sonra adam nıye ugrassın clıent 2.0.3 kullansın.Madem mıllet bu ısden para kazanıyor dıye kesıp atıyorsun bosa burda fazladan konu acmıssın.Asıl senın bu cocuklara yaptıgın ayıp alala[/b]

Tymaron 2009-09-26 12:18

]https://img71.imageshack.us/img71/332/connector1bb3.jpg Son görünüm olarakta yukarı bakabilirsiniz ancak yukarıdaki kodlarla bu kadar ileri düzey olmaz malesef

Tymaron 2009-09-26 12:07

Konuyu zaten genel olarak anlattım saçma bir yanı olduğunu düşünmüyorum.

Silindi 2009-09-25 23:26

Çok saçma ya konuyu tam anlat yada hiç anlatma.

No Avatar
batraxia 2009-08-08 21:44

tymaron Bu Connectorun Son gorumu ne ? Acaba -- Client Yapılır No ıp Acılır Static Alınır Setup Yapılır Static Silinir Yardım İsteyen Msn mı Eklesın [email protected]

Unqown 2009-07-12 13:37

[red][b]Tymaron MSN adresin varmı ya bunlar biraz zor geldi bana 3 kere okudum yapamadım.MSN adresinden bana yapsan atsan ?[/b][/red]

Aldis 2009-06-06 04:21

[b][sea]Teşekkürler güzel anlatım[/sea][/b]

Tymaron 2009-06-02 05:23

Link yenilenmiştir arkadaşlar

No Avatar
ZeneX 2009-05-03 04:39

Şöyle birşey var, herkesin oyunu "C:\Program Files\EA Games\Ultima Online Mondain's Legacy\client.exe" dizininde değil. Bunu kendime göre düzenlesem bile başkasının bilgisayarında benim oyunumun kurulu olduğu yerde olmayabilir. Bu durumda clienti bilgisayarda otomatik bir şekilde arayıp bulamak gerekiyor. Yani Bağlan butonuna basıldığında client.exe nin bilgisayarda otomatik bulunup açılması gerek ki her kullanan açabilsin. Bu konuda ne demek istersiniz? Anlatımınız çok açıklayıcı ve örnek kodlara dayanıyor. Bu denli ayrıntılı anlattığınız için teşekkürler.

Wally_Fatih 2009-05-02 23:55

ya link verebilirmisiniz ?indiremiyorum

berkancık 2008-11-02 14:56

yükleniyor nette arastırma yapın

Some_one 2008-09-27 21:37

vb yüklenmiyor.

berkancık 2008-09-06 02:28

vb yüklenmioyr!

axuare 2008-09-04 00:51

[b]Guzel Paylasim.Kendini Gelistirmen Güzel Ardil...[/b]

Ch4cKi3 2008-09-01 03:13

+ bu vb yüklenmiyor

Ch4cKi3 2008-09-01 02:26

[b]+ Öğretmemek tamamen bencillik.[/b]

Ch4cKi3 2008-09-01 02:26

[b]Öğretmenlerde para kazanıyor fakat bildiklerini öğretiyor.[/b]

Tymaron 2008-08-22 02:36

[b][red]Arkadaşlar kodlamaya ilk adım olarak koydum bütün kodları vermedim bu işten para kazanan arkadaşalr var onlara saygısızlık olmasın. @Owsk haklısın delphi bu konuda çok ileri düzey ama biraz karışık bir program geldi ilk vb başladım ondan sanırım ama ilerde ikisinide en iyi şekidle ilerletmeyi düşünüyorum[/red][/b]

canat 2008-08-09 00:11

connectoru yapmak tamam çok kez anlatıldıda. Dll enjekte etmek yada herhangi bir programın açılmasını engellemeyi anlatsaydınız daha iyi olurdu.

No Avatar
Hypnos 2008-07-31 19:15

[quote=Hocam Bu connectörü Kaydettikten Sonra Acmıyor.. Bunu Nasıl Ayarlıcaz.. ][/quote] .exe olarakmı kaydettin ?

Owsk 2008-07-25 18:36

Teşekkürler Yinede Ancak Delphi 7 ile yapılanlar daha iyi oluyor.

No Avatar
moonspell666 2008-07-18 16:39

Hocam Bu connectörü Kaydettikten Sonra Acmıyor.. Bunu Nasıl Ayarlıcaz..

No Avatar
cnrakqn 2008-07-12 11:42

yanlız bu vb yüklenmiyor :con

Sadece kayıtlı kullanıcılar yeni yorum yapabilir.


Ultima-Strike Discord
Benzer Sayfalar
  • Connector

    2005-05-16 18:58

  • Edit - Connector Görünümü

    2006-01-14 19:54

  • .yeni

    2007-06-20 12:34

  • 2 Yeni Set

    2008-10-24 22:30

  • Cs Sistemi [Yeni]

    2009-08-06 13:59



  • Son Forumlar
  • Sayfalar
  • Nefrelius
    Randomspawn yardım !

    Sphere Scripting 3 gün önce

  • firehellsly
    Royal UO

    Sunucular 6 gün önce

  • EgeERKEK
    [U.S.] Kalan

    Counter-Strike 1 hafta önce

  • Nefrelius
    Merhaba arkadaşlar Nefrelius ben.

    Ultima Online 2 hafta önce

  • EgeERKEK
    [ÜCRETSİZ] | Sunucu Sahibinin El Kitabı

    Ultima Online 2 hafta önce

  • firehellsly
    Richard GARRIOTT, Ultima Online 2'yi yapmak istiyor ama bir şartı var!

    Ultima Online 2 hafta önce

  • Tymaron
    Usec ve Bear Arasındaki Farklar

    Escape From Tarkov 1 ay önce

  • Tymaron
    Escape From Tarkov Wipe!

    Escape From Tarkov 1 ay önce

  • ClassicUO Web, bildiğiniz ve sevdiğiniz oyunu tarayıcınıza getiriyor.

    Ultima Online’ı Küllerinden Doğuracak Client; ClassicUO Web

    2023-08-05 04:49

  • #Sponsorluİçerik

    Pyramid Ultima Online

    2023-08-04 21:01

  • Yeni Yayın Platformu Kick!

    2023-08-04 15:22

  • Bütün bir yıl çok çalıştılar, çok fazla mücadele ettiler ve artık sona geldiler.

    ESL One Cologne 2017

    2017-06-30 17:45

  • Activision yetkililerinin yaptığı açıklamaya göre Cod:MW Remastered, Infinite Warfare’den ayrı bir oyun olarak satılmaya başlanacak.

    Call of Duty Modern Warfare Remastered açıklandı!

    2017-06-24 23:21

  • Artık gelenekselleşen Steam mevsim indirimlerinin en sevileninin zamanı geldi kapımıza dayandı.

    Steam Yaz İndirimi 2017 Rehberi

    2017-06-22 15:11

  • Ultima Online için unoffical DLC

    Ultima LandFall

    2017-06-18 22:34

  • Simple Radar - Kullanışlı ve Basit Radar

    2017-06-03 04:18

Menü

ANASAYFA
FORUM
DOKÜMAN
DOWNLOAD
İLETİŞİM
Ideamedia
© 2004 - 2023 Ultima-Strike. Her hakkı saklıdır.