Kütüphane programı

Katılım
31 Mys 2011
Mesajlar
16
Beğeniler
0
Yaş
24
#1
Acil bir ödevim var. Yardımcı olmanızı istiyorum. projede Görsellik Önemli değildir.Sanırım bu proje bu sitede yayınlanmıştı ancak çalışmıyor. Yardımlarınızı Bekliyorum

Kütüphane Programı
Veri Tabanı: Access
Kullanılacak İtemsler: ADO Elemanları
Üye Kayıt Sayfası Olacak.
Kitap kayıt sayfası olacak.
Ödünç Ver kısmından Üye ve Kitap seçilecek ve bunu raporlayacak bir program lazım.

20 Tl ye kadar ücret ödemesi yapılabilir. ( Ücret İstenmemesi makbule geçer :) )
Ödeme Türleri:
Turkcell,Avea,Vodafone Tl

Saygılar

mail: by-hawk[at] hotmail [dot] com [dot] tr
 

YoRuMSuZ

Biz işimize bakalım...
Katılım
7 Hzr 2006
Mesajlar
37,354
Beğeniler
8,983
Takım
GALATASARAY
#2
İletişim site üzerinden kurun hocam mail adresine gerek yok. Ayrıca burası Çerezforum sanırım bir yanılgı oldu.

Benim kodladığım 2 adet kütüphane program mevcut (Sınıf Kütüphane ve Okul Kütüphane). ADO bileşenleri ve access veritabanı kullanıldı. Programları inceleyebilirsiniz. Tasarım ve çalışma prensibi açısından incelemeniz yararlı olabilir. Ancak kodları paylaşmayı ya da ücret karşılığı vermeyi düşünmüyorum.

Takıldığınız yerde yardımcı olmaya çalışırım.

http://www.cerezforum.com/www-e-cozum-net-programlari/586-okul-kutuphane-1-1-egitim-kurumlar.html

http://www.cerezforum.com/www-e-cozum-net-programlari/57930-sinif-kutuphane-1-2-yeni-versiyon.html
 
Katılım
31 Mys 2011
Mesajlar
16
Beğeniler
0
Yaş
24
#3
Ben Kitap ekle,Listeme kısmını ve yeni üye ve listele kısmını yaptım. Ödünç ver kısmında seçilen üyenin ve seçilen kitabı nasıl birleştireceğimi ve yeni tabloda nasıl göstereceğimi bilmiyorum yardımcı olur musunuz

Rahatsız ediyorum ama siz bana kitap ödünç ver kitap al kısmının teknik bilgilerini ve kodlarını verseniz..

Projeyi yapamazsam sınıfta kalacam.. Lütfen Yardım Edin..
 

YoRuMSuZ

Biz işimize bakalım...
Katılım
7 Hzr 2006
Mesajlar
37,354
Beğeniler
8,983
Takım
GALATASARAY
#4
Bunlar için yeni tablolar oluşturmalısınız hocam. Master tabloda kullandığını otomotik artan alan id ile detail tablolarda ayarladığınız ID no'ları eşleştirmelisiniz ki sorunsuz iletişim kurulsun.

Master detail tablo yapısını bildiğinizi varsayıyorum.

Böylece kitap ver bölümünde ayarladığınız buton yordamına yazacağınız kodlarla tablolardan gerekli alanları aktarırsanız sorunsuz kullanabilirsiniz.

Benim bu program için kullandığım tablolar şu şekilde...



Kitap ver buton yordamına yazdığım kodları kopyalıyorum.
Kod:
procedure TForm1.Button1Click(Sender: TObject);
begin
  if MessageDlg(QuotedStr(Form1.Query1.FieldByName('KitapAdi').AsString)
  + ' adlı kitap '+'"'+DBText16.Caption+'"'+ ' adlı üyeye verilecek. ' + chr(13) + chr(13) +' Onaylıyor musunuz?',mtWarning,[mbYes,mbNo],0) = mrYes then
  begin
    QOdunc.Insert;
    QOduncOgrenciNo.AsInteger := StrToInt(Edit3.Text);
    QOduncOgrenciAdi.AsString := QUyeUyeAdi.AsString;
    QOduncDemirbasNo.AsString :=  Query1DemirbasNo.AsString;
    QOduncKitapAdi.AsString := Query1KitapAdi.AsString;
    QOduncCiltSayisi.AsInteger := Query1CiltSayisi.AsInteger;
    QOduncAdet.AsInteger := Query1Adet.AsInteger;
    QOduncYazari.AsString := Query1Yazari.AsString;
    QOduncCeviren.AsString := Query1Ceviren.AsString;
    QOduncBasimYili.AsInteger := Query1BasimYili.AsInteger;
    QOduncBasimYeri.AsString := Query1BasimYeri.AsString;
    QOduncFiyat.AsString := Query1Fiyat.AsString;
    QOduncEbat.AsString := Query1Ebat.AsString;
    QOduncSayfa.AsString := Query1Sayfa.AsString;
    QOduncATarih.AsDateTime := StrToDate(Label26.Caption);
    QOduncVTarih.AsDateTime := StrToDate(Label27.Caption);
    QOdunc.Post;
    Query1.Delete;
  end;
end;
Kodları kendinize göre değiştirebilirsiniz. Kullandığım tablo ve alanlara göredir.

Benzer şekilde de kitabı geri alıyoruz.
 
Katılım
31 Mys 2011
Mesajlar
16
Beğeniler
0
Yaş
24
#5
Programı versem siz halletseniz olur mu. Veritabanı kendi programınızda kullandığınız veri tabanını kullanıyorum(Kusura Bakmayın) ?

İndir

Tarama Sonuçları: Buraya Dıkla

Gerçekten bir el atarsanız çok makbule geçer.
 

YoRuMSuZ

Biz işimize bakalım...
Katılım
7 Hzr 2006
Mesajlar
37,354
Beğeniler
8,983
Takım
GALATASARAY
#6
Hocam bakıcam ama söz vermiş olmayım vakit bulabilirsem bakıcam. Bu gece nete gelebilirsem bakarım olur mu?
 
Katılım
31 Mys 2011
Mesajlar
16
Beğeniler
0
Yaş
24
#7
hocam salı gününe projeyi tesllim etmemiz lazım en geç pazar gününe bana lazım.. Yapailirseniz sevinirm
 

YoRuMSuZ

Biz işimize bakalım...
Katılım
7 Hzr 2006
Mesajlar
37,354
Beğeniler
8,983
Takım
GALATASARAY
#8
Tamam o kadar vaktin varsa hallederiz kkkjj, keşke anlamsız bir nick de almasaydın forumumuzda bu tarz isimleri tasvip etmiyoruz.
 
Katılım
31 Mys 2011
Mesajlar
16
Beğeniler
0
Yaş
24
#9
tamam isterseniz "By-Hawk" ile değiştirebilirsiniz. Birde Bu kitap alındıkça adet kısmı bir azalacak eğer adet 0 ise kitap verilemeycek bunu da yapabilirseniz çok mutlu olurum
 

YoRuMSuZ

Biz işimize bakalım...
Katılım
7 Hzr 2006
Mesajlar
37,354
Beğeniler
8,983
Takım
GALATASARAY
#10
İlettiğin program üzerinde çalışacak vakti maalesef bulamadım kendi yazdığım programdaki gereksiz birkaç özelliği kaldırarak iletiyorum. Gerekli alanlar mevcut, sadece veritabanı onarma, yedekleme, yazdırma ve ini dosyasına kayıt olayları vs extraları kaldırdım. Arama kriterleri de aynen mevcut.

Birkaç component kullanmıştım default ile değiştirdim ancak kalıntıları kalmışsa ilgili satırları silersin kkkjj. ilettiğim programda hem kaynak kodları hem de çalışan exe dosyası öevcut. Güle güle kullan işini rahatlıkla göreceğini umuyorum. Tasarım aynı şekilde mevcut. Kendine göre bunları da düzenleyebilirsin.

Kütüphane programını ve kaynak kodlarını aşağıdaki linkten indirebilirsin.

http://www.cerezforum.com/kutuphane.zip

Veritabanı şifresi "kutuphane10" önceden olduğu gibi yani, istersen kaldırabilirsin.

Forumda kalıcı olursan artık nickini de yukarıdaki mesajda belirttiğin şekilde değiştiririz :)
 

Benzer konular

Top