Giriş yapmadınız. Lütfen giriş yapın yada kayıt olun.
arkadaşlar ;
bir tabloda iki float field var a ve b olsun
a b
5.0 2.10
a stünü 5 saat
b sütünu 2 saat 10 dakika
veriler bu şekilde
sorum şu bu degerler saat deger a sütünunda olması gereken b sutununda gerçekleşen saat şimdi,aradaki farkı saat cinsinden nasıl bulurum ?
Çok uzun zamandır vfp de yazmıyordum. İyi geldi. Sağol.
? fark(5,2.10)
Function fark
Lparameters a, b
if(a < b)
temp = a
a = b
b = temp
EndIf
time1 = Int(a) * 60 + ((a - Int(a))*100)
time2 = Int(b) * 60 + ((b - Int(b))*100)
fark = time1 - time2
saat = Int(fark / 60)
dakika = fark - saat*60
Return saat + dakika/100Sayın tbasoz ;
Öncelikle ilginiz ve cevabınız için çok teşekkür ederim
bende sabaha karşı cöze bildim ve ve uyudum bende böyle çözmüştüm
aynı sorunla karşılaşan arkadaşlar olursa 2 yöntemide kullana bilirler
sizinki daha sade olmuş
tekrar teşekkür ederim 
)
bede aşagıdaki gibi cözmüştüm
deger1=ALLTRIM(STR(5.00,12,2))
deger2=ALLTRIM(STR(2.10,12,2))
fark=(VAL(SUBSTR(deger1,1,LEN(deger1)-3))*60+VAL(right(deger1,2)))-(VAL(SUBSTR(deger2,1,LEN(deger2)-3))*60+VAL(right(deger2,2)))
saat=ALLTRIM(STR(int(fark/60)))
dakika=ALLTRIM(STR(MOD(fark,60),2))
IF LEN(dakika)=1
dakika="0"+dakika
ENDIF
sonuc=saat+":"+dakika
Eğer saat değeri yerine datetime olsaydı;
set date ansi
a=ctot(ttoc(datetime1))
b=ctot(ttoc(datetime2))
c=b - a && saniye cinsinden /60 dakika /60 saat
set date british