Delphi Forum

pardon Listview.clear olayına dikkat etmemişim. çok teşekkürler.sorunum çözüldü.

cavap yazdığın için sağol ama, sorun o değil. yani üç itemi nasıl ekleyeceğimi biliyorum.
Asıl sorun şu: her tıkladığımda eklemeye devam ediyor.
Kısaca Treeview ile Listview i senkronize etmek istiyorum. Örneğin Logodaki gibi.

Formumda 1 adet Treeview 1 adet Listview var. Bunları ilişkilendirmek istiyorum.
şöyle diyelim; Treeview de 1.item seçildiğinde Listview'e 3 alan ekleyecek.

sorunumda şu:
Treeview in onclik yordamına
if TreeView1.Items[1].Selected then
begin
ListView1.Items.Add;
ListView1.Items[0].Caption:='emre ...

şimdide 'from yan tümcesinde söz dizimi hatası' diye bir hata veriyor

kusura bakmayın kafanızı ağrıttım ama niye yapmadığını bi türlü çözemedim

acaba alanla ilgili bir sorun olabilir mi?
alan double tanımlı kesirli sayı

öncelikle kusuruma bakma yanlış alana yazdığım için dikkatsizlik yapmışım.

dediğiniz gibi yaptım

adoquery1.open;
Adoquery1.SQL.add('select SUM(malal) as sonuc from HesapOZ');
label1.Caption:=floattostr(adoquery1.fieldbyname('sonuc').value);

fakat şöyle bir hata verdi
'ADOQuery1:Field 'sonuc' not ...

merhaba;

birkaç sattir aşamadığım bi sorunum var :twisted:

forumda da aradım ama tam cevabı bulamadım...

access'te hazırlanmış bir veri tabanı kullanıyorum
üç tane alanım var ve number : double tanımlı
bu alanları sql ile toplatarak label'e veya edit'e aktarmak istiyorum


adoquery1.open ...

husoedit1.textasfloat:=adoquery1.fields[1].value;[/code]
veya olmuyo burda biyerde hata var ama nerde?

amacım bir alanın toplamını bir edite aktarmak sorun nerde bulamıyorum

adoquery1.SQL.Clear;
adoquery1.sql.add('select *from HesapOZ');
adoquery1.open;
husoedit1.TextAsFloat:=Adoquery1.SQL.add('select SUM(malal) as sonuc from HesapOZ');


bu kodlarla malal isinli alanın toplamını edit'e aktarmaya çalışıyorum
ama bi türlü beceremedim
yardımcı olurmusunuz?

hocam yardımınızla husoediti yükledim ve denedim

çok güzel ytl formatı olayı işime yarayacak

fakat hocam haddim olmayarak soruyorum kusura bakmayın ama
bu editte niye kuruş olayı yok? yada varda ben mi bulamadım?

hocam hüsoedit'i çok duydum. kullanmak istiyorum.
ama ben delphide acemiyim.
bişey sorucam bu kodları vermişsiniz sitenizden de indirdim
ama bunu nnasıl komponent olarak kuracağımı bilmiyorum yardımcı olursanız sevinirim

hocam kusura bakma yazdığın örnekte sorun yok ben bi yerde yanlış yapmışım

sonunda problemimi tamamen çözdüm
ellerinize sağlık...
iyi çalışmalar

muldiv nedir yahu? :D

muldiv iki sayıyı çarpıp üçüncüye bölen bir matematiksel fonksiyon

mesela
muldiv(a,b,c);
dediğimizde (a*b/c) yi sonuç olarak döndürüyor


bu arada mrmcop hocam verdiğiniz örnek dediğiniz gibi yuvarlıyo
Var
a,b: Extended;
begin
a := 90.045;
b := StrToFloat(FormatFloat ...

mrmcop

çok teşekkür ederim istediğim oldu
:D

ama affına sığınarak bir şey daha :?:
tam olarak yapmak istediğim kdv hesaplamaktı
500,25*18/100 gibi
cevabında yazdığın fonksiyonla bu oldu ama
500,25*18/100'ün sonucunu 90,045 olarak döndürüyo
YKR olayında iki hane var bilindiği üzere ,045 i nasıl ...

aslangeri

şartmı canım muldiv le yapman.
Kod:

a:=sayi1*sayi2/sayi3;

demişsin
ya tabiki şart değil ama mesela yukarda verdiğin örnekte
a, sayi1, sayi2 ve sayi3 ü Extended olarak atadığımızı farzedelim

edit'e nasıl aktarıcam bunu bilmiyorum

evet başka bir değişkenle (extended gibi) çözeceğimi anladım ama anladığım kadarıyla muvdiv fonksiyonu integer kullanıyor.

dolayısıyla sorunu bir türlü aşamadım. bunları nasıl çeviririm.

yapmak istediğim ondalıklı sayıyla matematik işlemi
500,25*250,12/100 gibi

örnek verebilecek, yardım edecek ...