| meren | 08.01.2005 - 13:43:23 |
| arkada$lar merhaba, bir bölme işlemi yaptıracam bir türlü yaptıramadım sürekli hata mesajı alıyoprum.. olay $u $ekilde
begin Table1.Edit; asatis := Table1.FieldByName('asatis').AsInteger; rsatis := Table1.FieldByName('rsatis').AsInteger; aciro := Table1.FieldByName('aciro').AsCurrency; rciro := Table1.FieldByName('rciro').AsCurrency; cirotop := Table1.FieldByName('cirotop').AsCurrency; topadet := Table1.FieldByName('topadet').AsInteger; Table1.FieldByName('topadet').AsInteger := asatis + rsatis; Table1.FieldByName('cirotop').AsCurrency := aciro + rciro; If CiroTop > 0 then Table1.FieldByName('ortfiyat').AsCurrency := Trunc(cirotop / topadet); *** burası Table1.Next; end; burada bölme işlemi aldığımda sürekli boş değer veriyor.. aslında cirotop ve topadet kısımları dolu bunları bölüm doğru değeri almam gerekiyor ama alamıyorum bunu nasıl yapabilirim ? yardımcı olursanız çok sevinirim. iyi çalışmalar | |
| husonet | 08.01.2005 - 14:43:41 |
| '/' bunun yerine 'div' kullanmayı denedinizmi?
Kolay Gelsin... | |
| meren | 08.01.2005 - 14:50:08 |
| evet div kullanıyorum ama hata mesajı alıyorum
[Error] Unit1.pas(218): Operator not applicable to this operand type [Fatal Error] Project1.dpr(6): Could not compile used unit 'Unit1.pas' gibi.. | |
| nitrokonat | 08.01.2005 - 15:52:03 |
| cirotop := Table1.FieldByName('cirotop').AsCurrency;
topadet := Table1.FieldByName('topadet').AsInteger; yerine : cirotop: integer; topadet: integer; cirotop:= strtoint64(Table1.FieldByName('cirotop').text); topladet := strtoint64(Table1.FieldByName('topadet').text); Table1.FieldByName('ortfiyat').text := inttostr(cirotop div topadet); kesin çalışır. bu arada çanakkale onsekiz mart üniv.bilg. müh. ile bir alakanız var mı sayın meren? | |
| meren | 09.01.2005 - 14:01:50 |
| merhaba dostum.. hayır çanakkale üniversitesi ile ilgim yok.. bu arada dediğin yöntemlede olay çözülmedi
burada CIROTOP = NUMERIC ORTFIYAT = NUMERIC TOPADET = NUMERIC $eklinde databasede tanımlı ben nasıl bölme işlemi sonucunu doğru alacağım arkadæ$lar??? | |