|
MEVCUT XGRID KODLAMA BÖLÜMÜNDE ONDBLCLICK E YAZARSAN ALTTAKI OLAYI
ISINI GÖRÜR.
BENDEKI XGRIDIN ADI XGRID OLARAK DEGISTIRDIM
XGRID.Active = TRUE
satir=XGRID.ROW
---EGER MEVCUT XGRID STRINGINI GETIRMEYECEKSEN BUNUDA EKLE VE XGRIDIN DIZAYN BÖLÜMÜNDE TSTRINGS INE WHERE 1=2 YAZ ASAGIDAKI 1 INCI ÖRNEKTEKI GIBI YANI SCRIPT KODLAMA BÖLÜMÜNE XGRID IN ONDBLCLICK OLAYINA 2. ÖRNEKTEKI SQL CÜMLENI YAZABILIRSIN WHERE SARTINIDA BELIRTEBILIRSIN ORADA VE YAPTIGIN HER KAYDET - SIL - GÜNCELLE ISLEMLERI IÇIN 2. ÖRNEKTEKI OLAYI EKLEMELISIN..
1. Örnek
SELECT TBLSTHAR.FISNO, TBLSTHAR.STOK_KODU, TBLSTSABIT.STOK_ADI, TBLSTSABIT.KOD_5 AS KALINLIK, TBLSTHAR.EKALAN, TBLSTHAR.STHAR_GCMIK2 AS ADET, TBLSTHAR.STHAR_GCMIK AS MIKTAR, TBLSTSABIT.OLCU_BR1, TBLSTHAR.STHAR_ACIKLAMA, TBLSTHAR.STHAR_GCKOD, TBLSTHAR.INCKEYNO FROM dbo.TBLSTSABIT INNER JOIN TBLSTHAR ON TBLSTSABIT.STOK_KODU = TBLSTHAR.STOK_KODU WHERE 1=2
KENDINE GÖRE UYARLARSIN
2.ÖRNEK
XGRID.Sql.Text="SELECT FISNO, STOK_KODU, VSVS FROM TBLSTHAR WHERE FISNO ='"&UM_BELGENO.Text&"'"
---EGER MEVCUT XGRID STRINGINI GETIRECEKSEN SADECE ORTADAKI OLAYI EKLEMENE GEREK YOK ASAGIDAKI CÜMLE ISINI GÖRÜR (XGRID.Active = TRUE
satir=XGRID.ROW CÜMLELERINI UNUTMA TABIKI EN ÜSTE KOYMAYA :))
UM_KLMSTOKKODU.TEXT=XGRID.Cells(1,satir)
UM_KLMSTOKADI.TEXT=XGRID.Cells(2,satir)
UM_KLMKALINLIK.TEXT=XGRID.Cells(3,satir)
UM_KLMENBOY.TEXT=XGRID.Cells(4,satir)
UM_KLMADET.TEXT=XGRID.Cells(5,satir)
UM_KLMMIKTAR.TEXT=XGRID.Cells(6,satir)
UM_KLMBIRIMI.TEXT=XGRID.Cells(7,satir)
UM_KLMMAKINA.TEXT=XGRID.Cells(8,satir)
UM_KLMSTOKKEY.TEXT=XGRID.Cells(9,satir)
Elimde 4 haftadir çalistigim bir proje var bitsin NDI ILE ÖGRENDIKLERIMI PAYLASAGIM BURADA HERKEZ ILE BENDE ILK BASLARDA ÇOK ZORLANDIM TAKILDIM SAGA BAKTIM SOLA BAKTIM AMA HIÇ NET BIR BILGI YOK AMA SUAN IÇIN HERSEYI YAPABILIYORUM KENDI ÇAPIMDA BILGI PAYLASTIKÇA ARTAR.. Umarim yardimci olabilmisimdir. Rastgele...
-------------
Susmak kabullenmek değil, cevaptır anlayabilene... Bilki kısa cümleler kuruyorsa insan, uzun yorgunlukları vardır sadece..
|