Delphi Dünyası Facebook'ta

Kodbank İndir

! CODEBANK 2012 !

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

Gönderen Konu: tablodaki alandan hep ilk kayıtı çekme problemi  (Okunma sayısı 230 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı tayfun ışık

  • Delphi 1 Level 1
  • *
  • İleti: 7
  • Rep: +0/-0
  • Cinsiyet: Bay
tablodaki alandan hep ilk kayıtı çekme problemi
« : 19 Kasım 2011 22:00:06 »
merhaba arkadaşlar benim bi problemim var daha önce bu durumla karşılarmış arkadaşlardan yardım istiyorum.
Konu şu: bir veritabanı, iki tablom var
tablo1:menu_adi,fiyati
tablo2:... menu,menu_fiyatı, ... tablo ikide alan çok hepsini yazmıyorum
tablo2 de lookupcombobox ım var ve itemlerini tablo1 deki menu_adi alanından alıyor
combobox dan seçtiğim menu adının fiyatını tablo2 deki menu_fiyatı na yazdırmak istiyorum şöle bi kod kullandım :
Form2.ADOTable2.FieldValues['menu_fiyati']:=Form2.ADOTable1.FieldValues['fiyati'];

bu kod ile tablo1deki fiyatı alanında yazanı tablo2deki menu fiyatı alanına yazıyor buraya kadar bi sorun yok gibi gözüküyor ama sorun şu: lookupcombobox dan seçtiğim alanın fiyatını yazmıyor hep ilk kayıtın fiyatını yazıyor bu problemi nasıl halledicem yani seçilen kayıtın fiyatını nasıl yazdırıcam bu konuda bilgisi olan varsa lütfen yardım etsin okul projem.
repeat
yaş:=yaş+1;
until
ölüm=yaş;

Çevrimdışı atmazg

  • Delphi 6 Level 1
  • *
  • İleti: 257
  • Rep: +0/-0
  • Delphi Sürümü: Delphi 6, Delphi 2010, Delphi XE2
Ynt: tablodaki alandan hep ilk kayıtı çekme problemi
« Yanıtla #1 : 19 Kasım 2011 23:43:52 »
Form2.ADOTable2menu_fiyati.value:=Form2.ADOTable1fiyati.value;

olarak deneyebilirsin.

Çevrimdışı tayfun ışık

  • Delphi 1 Level 1
  • *
  • İleti: 7
  • Rep: +0/-0
  • Cinsiyet: Bay
Ynt: tablodaki alandan hep ilk kayıtı çekme problemi
« Yanıtla #2 : 22 Kasım 2011 16:08:01 »
kardeş böle bi kod yok ki :S
sizin gösterdiğiniz şeklinde bi yerlere vardım ama yine ilk kaydı aktarıyo hep
belki anlatamamış olabilirim derdimi. İşin özü şu:
Kullanıcı programda menu tanımlamasını ayrı yapıcak, Menü1,Menü2 diye menü tanımlamaları yapıcak ve hepsine bi fiyat giricek sonra
 randevu yaparken de açılan kutudan menu 2 yi seçtiğinde fiyatı randevu yapılan veritabanına otomatik yazılacak, yazdırıyorum ama ilk tanımladığım
menünün fiyatını yazıyo hep
sql de kullanabilirim ama işin içinden çıkamadım :S
sql le yardım edebilirsiniz mümkünse eğer bu olay.
repeat
yaş:=yaş+1;
until
ölüm=yaş;

Çevrimdışı atmazg

  • Delphi 6 Level 1
  • *
  • İleti: 257
  • Rep: +0/-0
  • Delphi Sürümü: Delphi 6, Delphi 2010, Delphi XE2
Ynt: tablodaki alandan hep ilk kayıtı çekme problemi
« Yanıtla #3 : 22 Kasım 2011 16:13:48 »
valla kardeş sana gönderdiğim kodu çalışmamsı mümkün değil. senin projende çalışmamış olabilir kod yapını bilmiyorum.

senin istediğin adisyon sistemine benziyor. senin yapmak istediğine benzer bende adisyon kiosk sistemi hazırlamıştım ve sana gönderdiğim kodları kullandım bir problem yok halen çalışıyor. muhtemelen kod yapından kaynaklanıyordur diye düşünüyorum. benimkinden farklı herhalde.

ben data control gird kullanarak hazırlamıştım. incele istesen.

Çevrimdışı tayfun ışık

  • Delphi 1 Level 1
  • *
  • İleti: 7
  • Rep: +0/-0
  • Cinsiyet: Bay
Ynt: tablodaki alandan hep ilk kayıtı çekme problemi
« Yanıtla #4 : 22 Kasım 2011 16:17:28 »
tamam kardeşim saol ilgilendiğin için dediğin hususa bakıcam bi ilerleme olduğunda buraya yazarım saol tekrar.
repeat
yaş:=yaş+1;
until
ölüm=yaş;

Çevrimdışı sheshman

  • Delphi 2007 Level 1
  • *
  • İleti: 501
  • Rep: +10/-0
  • Cinsiyet: Bay
  • So others may live...
    • http://www.sheshman.com
Ynt: tablodaki alandan hep ilk kayıtı çekme problemi
« Yanıtla #5 : 13 Aralık 2011 16:53:11 »
table ile sorgu hiç yapmadım yapmayacağım da :) SQL ile bu işi yapmak oldukça basit ve şu şekilde tablonuzda key value alanının adının pr_id olduğunu düşünerek yazıyorum

Kod:  (Unknown Language)
  1. select * from tablom order by pr_id DESC
  2.  

her zaman en yeni kaydı en üstte gösterir DESC kısmını ASC yaparsanız en eski kaydı en üstte gösterir
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