ㅤㅤㅤ

[tugsat]

ㅤㅤㅤ

[Battosai]

O kadar şeyi yapmışın böyle basit bir mevzuda takılmışın:)
Kayıt işleminden sonra kayıt butonunu enabled:=false yap....yeni bir işlem yapılacağında da true yap.

[tugsat]

ㅤㅤㅤ

[tugsat]

ㅤㅤㅤ

[aslangeri]

s.a.
aramıza hoşgeldiniz.
lütfen sorunuzun başlığını düzenleyin.

* Mesajınıza uygun ve konuyu özetleyen kısa bir başlık yazın. Acil, Çok Acil, Önemli gibi ifadeler veya konuyla alakasız bir başlık kullanmayın.

[conari]

Birde şu konuda yardımcı olursanız çok sevinirim. Stringgrid bilgim pek yok
stringgriddeki Satılan Adet alanını her kayıtta 0 olacak şekilde nasıl yapabilirim yani adam satışa işle butonuna bastığında stringgridde ürün geliyor ama satılan adete bişey gelmiyor dbgridden oraya programı kullanan kişi kendisi giriyor ama boş bırakılırsa hata veriyor
onun için otomatik o alan hep ilk başta 0 olacak nası lyapabilirim..

ürünün geldiği satırı beliyorsanınz;
stringgrid.cells(1,1):=0; ile atama yapabilirsiniz.syntax hatası olabilir.

[tugsat]

ㅤㅤㅤ

[Battosai]

Yanlış anlayan yok sen çözemedin sadece...
stringgrid.cells(1,1):=0; bu ifade bir stringgrid hücresine değer atar bildiğin gibi...sen hesapla butonuna basınca bir döngü kuruyorsundur muhtemelen...sana örnek bir kod göndereyim bunu uygularsın

Kod: Tümünü seç

var
tutar:double;
adet:integer;
Begin
for i:=1 to stringgrid.rowcount-1 do 
Begin
........................
adet:=strtointdef(stringgrid.cells(2,i),1);
tutar:=adet*satis_fiyat;
stringgrid.cells(4,i):=floattostr(tutar);
.......................
end;
End

[tugsat]

ㅤㅤㅤ

[conari]

Anlamadım valla biz başka bir şey mi söylemişiz.

Kod: Tümünü seç

StringGrid1.Cells[2,StringGrid1.RowCount-1] := '0';

bunların arasında ne fark var?sadece parantezler

Kod: Tümünü seç

stringgrid.cells(1,1):=0