![]() |
| 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. |
Tcl Bileşenleri |
Yanıt Yaz
|
| Yazar | |
ltfiyepinar
Yeni Üye
Kayıt Tarihi: 02 Mayıs 2026 Durum: Aktif Değil Puanlar: 2 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı ltfiyepinar
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
Teşekkürler(0)
Alıntı Cevapla
Konu: Tcl BileşenleriGönderim Zamanı: 9 Saat 24 Dakika Önce Saat 14:49 |
|
Clomosy ana kodunda oluşturulan SQLite veritabanındaki verileri bir TclComboBox bileşenine nasıl bağlayabiliriz?https://static.cloudflareinsights.com/beacon.min.js/v8c78df7c7c0f484497ecbca7046644da1771523124516" integrity="sha512-8DS7rgIrAmghBFwoOTujcf6D9rXvH8xm8JQ1Ja01h9QX8EzXldiszufYa4IFfKdLUKTTrnSFXLDkUEOTrZQ8Qg==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">
|
|
![]() |
|
Emr.Erkmn
Moderatör
Kayıt Tarihi: 28 Şubat 2025 Durum: Aktif Değil Puanlar: 820 |
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ı: 1 saat 60 Dakika Önce Saat 22:13 |
|
Merhaba Lütfiye
Bunun için bir örnek hazırladım sana umarım yardımcı olur var MyForm: TclForm; CmbKullanicilar: TclComboBox; VeriSorgusu: TclSQliteQuery; void VeritabaniniHazirla; { Clomosy.DBSQLiteConnect(Clomosy.AppFilesPath + 'BenimVeritabanim.db', ''); Clomosy.DBSQLiteQuery.Sql.Text = 'CREATE TABLE IF NOT EXISTS Kullanicilar (ID INTEGER PRIMARY KEY AUTOINCREMENT, KullaniciAdi VARCHAR(50))'; Clomosy.DBSQLiteQuery.OpenOrExecute; Clomosy.DBSQLiteQuery.Sql.Text = 'DELETE FROM Kullanicilar'; Clomosy.DBSQLiteQuery.OpenOrExecute; Clomosy.DBSQLiteQuery.Sql.Text = 'INSERT INTO Kullanicilar (KullaniciAdi) VALUES (''Ali Yılmaz''), (''Ayşe Demir''), (''Mehmet Kaya'')'; Clomosy.DBSQLiteQuery.OpenOrExecute; } // VERİLERİ COMBOBOX BİLEŞENİNE BAĞLAMA void ComboBoxaVeriYukle; { VeriSorgusu = TclSQliteQuery.Create(Nil); VeriSorgusu.Connection = Clomosy.DBSQLiteConnection; VeriSorgusu.Sql.Text = 'SELECT ID, KullaniciAdi FROM Kullanicilar'; VeriSorgusu.OpenOrExecute; CmbKullanicilar.Clear; while (not VeriSorgusu.EOF) { CmbKullanicilar.AddItem(VeriSorgusu.FieldByName('KullaniciAdi').AsString, VeriSorgusu.FieldByName('ID').AsString); VeriSorgusu.Next; } VeriSorgusu.Free; } { MyForm = TclForm.Create(Self); MyForm.SetFormColor('#F8FAFC', '', clGNone); VeritabaniniHazirla; CmbKullanicilar = MyForm.AddNewComboBox(MyForm, 'CmbKullanicilar'); CmbKullanicilar.Align = alTop; CmbKullanicilar.Margins.Top = 50; CmbKullanicilar.Margins.Left = 20; CmbKullanicilar.Margins.Right = 20; ComboBoxaVeriYukle; MyForm.Run; } https://static.cloudflareinsights.com/beacon.min.js/v8c78df7c7c0f484497ecbca7046644da1771523124516" integrity="sha512-8DS7rgIrAmghBFwoOTujcf6D9rXvH8xm8JQ1Ja01h9QX8EzXldiszufYa4IFfKdLUKTTrnSFXLDkUEOTrZQ8Qg==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" 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 |