Delphi Dünyası Facebook'ta

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

Gönderen Konu: Veritabanı program yardımı [Çözüldü]  (Okunma sayısı 346 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı xexus

  • Delphi 1 Level 1
  • *
  • İleti: 7
  • Rep: +0/-0
Veritabanı program yardımı [Çözüldü]
« : 07 Aralık 2011 12:51:39 »
Daha öncleri delphide dbgrid lerle işlem yapmıştım ama şimdi bir program yazmak istemekteyim access veri tabanında formdaki butona tıkladığımda 1 sayı artırımı yapıcak.

Örnek: Elimde iki form var ilk formda elma, armut ... isimlerinde tuşlar var elmayı tıkladığımda ikinci form açılıyor ve açılan form üstünde grany smith, amasya... isimlerinde tuşlar var burada ilk form veritbanında elma tablosuna erişimi ikinci formda ise tıklanıcak butona göre grany veya amasya olduğunu kayıt altına alıcam yani veri tabanında grany e tıklarsa 1 artacak sayı amasyaya tıklarsam amasya 1 artacak.

Bunu nasıl sağlarım fikir ve görüşleriniz için şimdiden teşekkürler...
« Son Düzenleme: 12 Aralık 2011 17:33:30 by xexus »

Çevrimdışı atmazg

  • Delphi 6 Level 1
  • *
  • İleti: 257
  • Rep: +0/-0
  • Delphi Sürümü: Delphi 6, Delphi 2010, Delphi XE2
Ynt: Veritabanı program yardımı
« Yanıtla #1 : 07 Aralık 2011 14:12:39 »
amasya := amasya + 1 ;

Çevrimdışı xexus

  • Delphi 1 Level 1
  • *
  • İleti: 7
  • Rep: +0/-0
Ynt: Veritabanı program yardımı
« Yanıtla #2 : 07 Aralık 2011 23:45:16 »
amasya := amasya + 1 ;
Vermiş olduğun cevap için teşekkürler bunu ADOQuery ile kod içerisinde bu formlardan veritabanlarına nasıl bağlanacağımı açıklayabilirsen daha müteşekkir olurum.

Çevrimdışı selchuk

  • Delphi 6 Level 3
  • ***
  • İleti: 274
  • Rep: +0/-0
  • Cinsiyet: Bay
    • Arma Ticari Sistem
Ynt: Veritabanı program yardımı
« Yanıtla #3 : 08 Aralık 2011 02:54:12 »
Forumda veri tabanına bağlanmak ve sorgu örnekleri çok fazla. Biraz inceleyip araştırmacı olun.

Bu şekilde siteye yeni üye olup siparişle ödev yaptırmak forumun amacı değil...
Knowledge is power (Bilgi Güçtür)

Çevrimdışı xexus

  • Delphi 1 Level 1
  • *
  • İleti: 7
  • Rep: +0/-0
Ynt: Veritabanı program yardımı
« Yanıtla #4 : 08 Aralık 2011 10:31:15 »
Forumda veri tabanına bağlanmak ve sorgu örnekleri çok fazla. Biraz inceleyip araştırmacı olun.

Bu şekilde siteye yeni üye olup siparişle ödev yaptırmak forumun amacı değil...


Forumda belirttiğiniz gibi araştırmayı daha önce yaptım ve hala daha araştırmam sürüyor ama bu bahsettiğim şekilde bağlamaya örnek bulamadım. Artı olarak öğrenci değilim Allah'a şükür :) 34 yaşındayım bilmediğim bir konuda merak yaptım kendim birşeyler yapayım dedim orada yeni uye geciyorum galiba sifremi sıfırladığımdan dolayı sanırım gecen senelerde de bir kac defa bu forumda sorular sorup bazı konularda yardım almıştım. Gecen sene Fatih beyin bir makalesinde gecen telefon defterini dbgridle yapmıştım ki onu hala hatırlıyorum burada dbgrid kullanmadan sadece acılan formlarda tuşlara basara veritabanında sayı artırımını gerçekleştirmek istiyorum ondan sıkıntıya düştüm.

Not: Site arayüzü değişmiş debian türkiye forumları gibi olmuş güzelde olmuş kanımca emeği geçenlere teşekkürler.

Çevrimdışı sheshman

  • Delphi 2007 Level 1
  • *
  • İleti: 501
  • Rep: +10/-0
  • Cinsiyet: Bay
  • So others may live...
    • http://www.sheshman.com
Ynt: Veritabanı program yardımı
« Yanıtla #5 : 08 Aralık 2011 16:06:14 »
örnekle daha iyi anlayacağınızı düşünerek örnek yaptım burdan indirebilirsiniz

Kod: [Seç]
https://www.rapidshare.com/files/3010498087/Rakam_Arttir.rar

rar dosyasını C:\ sürücüsüne açın çalışacaktır
« Son Düzenleme: 08 Aralık 2011 16:07:26 by sheshman »
Dünya sizden nefret ederse sizden önce benden nefret etmiş olduğunu bilin. Dünyadan olsaydınız dünya kendisine ait olanı severdi.
http://www.sheshman.com

Çevrimdışı xexus

  • Delphi 1 Level 1
  • *
  • İleti: 7
  • Rep: +0/-0
Ynt: Veritabanı program yardımı
« Yanıtla #6 : 08 Aralık 2011 23:52:09 »
örnekle daha iyi anlayacağınızı düşünerek örnek yaptım burdan indirebilirsiniz

Kod: [Seç]
https://www.rapidshare.com/files/3010498087/Rakam_Arttir.rar

rar dosyasını C:\ sürücüsüne açın çalışacaktır

Elleriniz dert görmesin sağolun tam düşündüğüme yakın en azından kafamda canlandırmama yardımcı olacak... Teşekkür ederim...

Çevrimdışı sheshman

  • Delphi 2007 Level 1
  • *
  • İleti: 501
  • Rep: +10/-0
  • Cinsiyet: Bay
  • So others may live...
    • http://www.sheshman.com
Ynt: Veritabanı program yardımı
« Yanıtla #7 : 09 Aralık 2011 10:14:42 »
rica ederim işinizi gördüyse ne ala
Dünya sizden nefret ederse sizden önce benden nefret etmiş olduğunu bilin. Dünyadan olsaydınız dünya kendisine ait olanı severdi.
http://www.sheshman.com

Çevrimdışı xexus

  • Delphi 1 Level 1
  • *
  • İleti: 7
  • Rep: +0/-0
Ynt: Veritabanı program yardımı
« Yanıtla #8 : 11 Aralık 2011 18:37:39 »
Herşey güzel iken tekrardan takıldım aşağıdaki kod veri tabanına butona bastığımda 1 sayısını ekliyor ama ben veritabanında elma tablosundaki adet sütununda satırda 1 var ise butona bastığımda satırdaki 1 rakamının 2 olmasını yani butona bastıkça tablodaki satırda 1 artsın ayrı bir satıra 1 yazılmasın istiyorum bir nevi sayaç gibi

Kod: [Seç]
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('insert into elma(adet) VALUES(:adet)');
ADOQuery1.Parameters.ParamByName('adet').Value:=1;
ADOQuery1.ExecSQL;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from elma);
ADOQuery1.Open;
Form2.Close;
Form1.Show;

Bu kodları o şekilde nasıl düzenlerim acces kullandığımı tekrar edeyim ve bir sorumda bu yazdığım program ile 2 farklı bilgisayardan veri girişi sağlayabilirmiyim?

Çevrimdışı atmazg

  • Delphi 6 Level 1
  • *
  • İleti: 257
  • Rep: +0/-0
  • Delphi Sürümü: Delphi 6, Delphi 2010, Delphi XE2
Ynt: Veritabanı program yardımı
« Yanıtla #9 : 12 Aralık 2011 08:09:38 »
adoquery1.edit;
adoquery1elmaadet.value:=adoquery1elmaadet.value + 1 ;
adoquery1.post;

veritabanındaki elmaadet filedının sayı olması gerekiyor. en basit haliyle anlatmam gerekirse budur.

Çevrimdışı xexus

  • Delphi 1 Level 1
  • *
  • İleti: 7
  • Rep: +0/-0
Ynt: Veritabanı program yardımı
« Yanıtla #10 : 12 Aralık 2011 17:32:55 »
adoquery1.edit;
adoquery1elmaadet.value:=adoquery1elmaadet.value + 1 ;
adoquery1.post;

veritabanındaki elmaadet filedının sayı olması gerekiyor. en basit haliyle anlatmam gerekirse budur.
Üstad ellerine sağlık bu sefer tam tutturdum bu kadar basit bir kod ile işin içinden çıktığıma çok sevindim sağolasın...

Çevrimdışı atmazg

  • Delphi 6 Level 1
  • *
  • İleti: 257
  • Rep: +0/-0
  • Delphi Sürümü: Delphi 6, Delphi 2010, Delphi XE2
Ynt: Veritabanı program yardımı [Çözüldü]
« Yanıtla #11 : 13 Aralık 2011 08:08:11 »
rica ederim. yardımcı olabildiysem ne mutlu bana.