|
| Clomosy Resmi Forum Sitesidir. Amacımız kullanıcılarımıza, iş ortaklarımıza, danışmanlara, yazılımcılara programlarımız hakkında destek ve bilgi vermektir. |
zıplama sorunu |
Yanıt Yaz 
|
| Yazar | |
kayra12 
Deneyimli Üye 
Kayıt Tarihi: 23 Aralık 2024 Durum: Aktif Değil Puanlar: 69 |
 Mesaj Seçenekleri
 Teşekkürler(0)
 Alıntı Cevapla
 Konu: zıplama sorunuGönderim Zamanı: 10 Saat 34 Dakika Önce Saat 11:41 |
|
uploads/249/Project-16.zip kodda olan stok ekle kısmında bir şey seçilmek istendiği zaman en yukarıya gidiyor ama istediğimiz seçemiyoruz ve listenin en yukarısına sıçrıyor < ="module" ="https://static.cloudflareinsights.com/beacon.min.js/v4513226cdae34746b4dedf0b4dfa099e1781791509496" integrity="sha512-ZE9pZaUXND66v380QUtch/5sE9tPFh2zg45pR2PB0CVkCtOREv2AJKkSidISWkysEuQ0EH8faUU5du78bx87UQ==" -cf-beacon=""version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1" crossorigin="anonymous">
|
|
 |
|
|
Emr.Erkmn
Moderatör 
Kayıt Tarihi: 28 Şubat 2025 Durum: Aktif Değil Puanlar: 1003 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı Emr.Erkmn
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
Teşekkürler(0)
Alıntı Cevapla
Gönderim Zamanı: 8 Saat 38 Dakika Önce Saat 13:37 |
|
void FormFiltreAraClick; var q: TclSQLQuery; JsonStr, FStr, SearchKodu, Val1, Val2, Indikator: String; { ConnectToDatabase; if (EdtFiltreStokKodu <> nil) { SearchKodu = EdtFiltreStokKodu.Text; } else { SearchKodu = ''; } if (SearchKodu == 'Stok Kodu Ara...') { SearchKodu = ''; } if (SearchKodu == 'Stok Seçmek için tıklayın...') { SearchKodu = ''; } FStr = '1=1 AND ISNULL(PASIF_KART,0)=0'; if (SearchKodu <> '') { FStr = FStr + ' AND STOK_KODU LIKE ''%' + SearchKodu + '%'''; } JsonStr = '['; q = TclSQLQuery.Create(nil); try q.Connection = Clomosy.DBSQLServerConnection; q.SQL.Text = 'SELECT TOP 100 STOK_KODU, STOK_ADI FROM [PRG_VIEW_STREHBER] WITH (NOLOCK) WHERE ' + FStr + ' ORDER BY STOK_KODU COLLATE SQL_Latin1_General_CP1_CI_AS ASC'; q.Open; while (not q.Eof) { if (JsonStr <> '[') { JsonStr = JsonStr + ','; } Val1 = TemizleJSON(q.FieldByName('STOK_KODU').AsString); Val2 = TemizleJSON(q.FieldByName('STOK_ADI').AsString); if (Val1 == SecilenStokKodu) { Indikator = '[ SEÇİLDİ ]'; } else { Indikator = ''; } JsonStr = JsonStr + '{"MAIN_TEXT":"' + Val1 + '", "SUB_TEXT":"' + Val2 + '", "IND_TEXT":"' + Indikator + '"}'; q.Next; } finally q.Free; } if (JsonStr == '[') { JsonStr = '[{"MAIN_TEXT":"Kayıt Bulunamadı", "SUB_TEXT":"Kriterlere uygun stok yok.", "IND_TEXT":""}]'; } else { JsonStr = JsonStr + ']'; } if (LsvKisitUyanlar <> nil) { LsvKisitUyanlar.clLoadProListViewDataFromDataset(Clomosy.ClDataSetFromJSON(JsonStr)); } } void OnFiltreKisitSecildi; { // 1. Tıklanan karttan Stok Kodu ve Stok Adı çekilir SecilenStokKodu = LsvKisitUyanlar.clSelectedItemData(clCaption); if (SecilenStokKodu == '') { SecilenStokKodu = LsvKisitUyanlar.clSelectedItemData('MAIN_TEXT'); } SecilenStokAdi = LsvKisitUyanlar.clSelectedItemData(clText); if (SecilenStokAdi == '') { SecilenStokAdi = LsvKisitUyanlar.clSelectedItemData('SUB_TEXT'); } EdtBilesenMiktar.Text = '1'; if (BtnBilesenEkle <> nil) { BtnBilesenEkle.Text = '+ Listeye Ekle'; } if (LblSecilenGosterge <> nil) { LblSecilenGosterge.Text = ' Seçilen: ' + SecilenStokKodu + ' - ' + SecilenStokAdi; } FormFiltreAraClick; } test eder misin https://static.cloudflareinsights.com/beacon.min.js/v4513226cdae34746b4dedf0b4dfa099e1781791509496" integrity="sha512-ZE9pZaUXND66v380QUtch/5sE9tPFh2zg45pR2PB0CVkCtOREv2AJKkSidISWkysEuQ0EH8faUU5du78bx87UQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1}" crossorigin="anonymous">
|
|
|
|
|
Yanıt Yaz
|
|
| Tweet |
| Forum Atla | Forum İzinleri Kapalı Foruma Yeni Konu Gönderme Kapalı Forumdaki Konulara Cevap Yazma Kapalı Forumda Cevapları Silme Kapalı Forumdaki Cevapları Düzenleme Kapalı Forumda Anket Açma Kapalı Forumda Anketlerde Oy Kullanma |
Topic Seçenekleri