Delphi Forum

Teşekkür ederim

Arkadaşlar marhaba. Aşağıdaki kodla açıklama alanında "evet" yazan kayıtları buluyoruz. Peki "evet" dışında olanları (örnek : beklemede, gelmedi, görülmedi vs.) nasıl buruluz. var aciklama:String; begin aciklama:='evet'; DM.iadetable.close; DM.iadetable.SQL.clear; DM.iadetable.SQ...

ertank yazdı: ↑09 Ara 2022 11:47 Merhaba, Büyükten küçüğe sıralamayı deneyin.

Bu şekilde sorun çözüldü Teşekkür ederim.

if sayi1>1 then begin kmkodenek2021:=800; emkodenek2021:=600; itfodenek2021:=700; ilkodenek2021:=750; kurodenek2021:=600; sosodenek2021:=600; tekodenek2021:=600; end aşağıdaki kodda her zaman üstteki kısım çalışıyor. farklı bir yöntem mi denemeliyim ? if sayi1>1 then begin kmkodenek2021:=800; emkod...

Çok teşekkür ederim yardımınız için. yaklaşık 10.000 kayıt var programda ve sürekli de artıyor. Verdiğiniz yöntemler ile şu an hız sıkıntımızı aştık. Yavaşlığın olduğu tek bir yer kaldı orası da sorgu kısmı. Orada da hızlanma için bir kısım kriterler getirirsem her halde sorgudaki hız problemlerini ...

İnsert işlemi benim hız problemimi şu an için oldukça rahatlattı diyebilirim. Şimdi burdan sonra update işlemi için de ... datamodulum.anatablo.selectSQL.Add('UPDATE into anatablo(tcno,adsoyad,gorev,gorevyeri,gorevyeriilce,gorevlendirildigikurum,gorevlendirildigikurumilce,gorevlendirildigikadro,gore...

Hocam çok teşekkür ederim kayıt işlemim hızlandı ancak ben verdiğiniz kodları IBDataSet ile yaptım çünkü generate sayacım ve IBDataSet in BeforePost unda da bazı kontrollerim vardı ve bu işlemleri . IBSQL ile INSERT SQL kullanınca hem generate hem de BeforePost kodlarım çalışmadı.Bu durumda da kayıt...

hocam kusura bakmayın ama

[Error] Unit20.pas(250): String literals may have at most 255 elements

255 karakter hatası veriyor ama ben bir türlü bölemedim kodu.

hocam firebird ve IbDataset kullanıyorum. Ağ üzerinde ortak veritabanı olduğu için yavaş işlem yapıyor. lokalde deneyince hız sorunu yaşamıyorum. Ve hız sorununu da sadece yeni append ile kayıt girişinde yaşıyorum. edit, delete gbi işlemlerde sıkıntı yok.

Ağ üzerinde çalışan bir programımız var ve doğal olarak bütün bilgisayarlar veritabanına ağ üzerinden erişiyor. Programda aşağıdaki kod ile kayıt yaparken kayıt işlemi aşırı 3-5 sn buluyor. Kodlar aşağıdadır. Yeni kayıt işlemi için başka bir yol var mıdır ki acaba ? Farklı bir önerisi olan varsa mem...

Arkadaşlar basit bir uygulama için ACESS veritabanı kullaniyim dedim ama pişman oldum :) access veritabanında ondalık sayı olarak tanımladığım alana accesten manuel 72,46322 olarak giriyorum ama programda 72,4632 olarak görünüyor. Aynı şekilde accesste manuel olarak 64,91697 girdiğim sayı programda ...

Arkadaşlar 4 PC de çalışan bir uygulamam var. Bu uygulamalardan hepsinde kayıt ekleme silme düzeltme çalışıyor sıkıntı yok. Fakat bir tanesinde sorgu hiç çalışmıyor. Diğer PC lerde bulduğunu bir PC de bulmuyor Hata da vermiyor ama aradığımı da bulmuyor. D7 ile yazılmış bir program. Windows ile alaka...

Cevaplar için teşekkür ederim aşağıdaki kod ile noktaları kaldırıp sonrasında toplama işlemini yaptırdım sıkıntı çıkmadı. Yine biraz acemice olmuş olabilir ama işimi gördü. :) var s, sil: string; i,j:integer; begin for j:=1 to 11 do begin For i:=1 to 6 do begin s := Odenekgrid.Cells[i,j]; sil := '.'...

Eski hallerine de çevirmeye kalksam Merhaba, Eski haline çevirme kodunuzu paylaşabilir misiniz? Muhtemelen o noktada bir hatanız var. Kullandığınız değişken isimlerini daha dikkatli seçmeniz konusuna bende katılıyorum. Yerel değişkenler (sadece prosedür/fonksiyon içinde kullanılan) için İngilizce L...

Aşağıdaki kod ile stringgrid içindeki sayıları örnek olarak 1.500,1.300 vs. yapıyorum. Ancak bu sayıları daha sonra toplarken is not a valid floating point value hatası alıyorum. Eski hallerine de çevirmeye kalksam aynı hatayı alıyorum. Nasıl yapabilirim acaba ? for j:=1 to 11 do begin For i:=1 to 6...