-=-
.
.....
  
 
RSS
Direkomendasikan menggunakan brower Opera/Chrome/Firefox. Resolusi minimal 1024x768 | Powered by ____ |
 
  
 
Nikmati Delphi-ID dalam berbagai versi tampilan :
Basic View (LOW Bandwidth)
Default View (Full)
Mobile Edition
Main Menu
..:: onWebTools ::..
..:: onLastPosts ::..
goto Postjumlah komponen maksimal dalam sebuah project(6)
 by d4mnf1y32
 on 21.May at 12:16
goto Posttanya grayscale to biner dengan scanline(1)
 by luckynvic
 on 20.May at 20:44
goto Posttanya looping biner to matriks(1)
 by luckynvic
 on 20.May at 20:10
goto Postsql error:acces denied for user....(2)
 by nasbms
 on 19.May at 16:54
goto Postpemanggilan frame(4)
 by nasbms
 on 19.May at 16:14
goto Posttanya AvLock(0)
 by azuriza
 on 19.May at 11:24
goto PostGet TDBEdit Value Menggunakan LookUp Grid(10)
 by henry_sys
 on 18.May at 11:27
goto Postmenghitung record dalam perulangan(4)
 by idhiel
 on 16.May at 13:53
goto Posttanya ascii(4)
 by mas_kofa
 on 16.May at 12:11
goto PostRawPrint Untuk Delphi XE2(0)
 by adewijaya
 on 15.May at 22:34
goto Postdatabase error..(4)
 by idhiel
 on 15.May at 15:57
goto Postbekasi, pt arila putra mahkota(3)
 by mas_kofa
 on 15.May at 15:37
goto Postbagaimana cara membaca file *.doc dg delphi?(0)
 by ficky
 on 15.May at 06:14
goto Posttanya biner to matriks(13)
 by diandewi
 on 14.May at 20:30

..:: onLast Articles ::..
..:: New Download ::..
Pascal-id.Org
Feeds -  Popular -  Latest
RE: The Longue
8 months, 3 weeks ago
RE: belajar pascal
8 months, 3 weeks ago
RE: The Longue
8 months, 3 weeks ago
RE: belajar pascal
8 months, 3 weeks ago
RE: Perkenalan dan Absen
8 months, 3 weeks ago
RE: Alhamdulillah Buka Puasa Bersama
8 months, 4 weeks ago
RE: تَقَبَّلَ اللهُ مِنَّا وَمِنْكَ - Selamat Hari Raya Idul Fitri
8 months, 4 weeks ago
Lintas Situs
«
free web site stats and visitor tracking

Post new topic   Reply to topic
View previous topic Printable version Log in to check your private messages View next topic
Author Message
ichan29Offline
Location:
Post subject: Berbagi pengalaman aneh  PostPosted: 20/Jan/2009 14:33
onProfessional


Joined: 23-Feb-2007
Posts: 603

Status: Offline
sekedar berbagi mungkin, tp ini sungguh aneh berdasarkan trace yg sy lakukan nilai variable hasil tdk bisa masuk tp menjadi nilai awal atau nol (0), kenapa penyebabnya kali ada temen2 bisa menganalisa.
      Code:
Ilustrasi:
isi=10 --> dr data
nilai2=5 --> dr data
Q.fields[0].value=2
x=0 --> dr data
.....
xx1:= ((isi*nilai2)-(Q.fields[0].value-x)) mod isi; //bener=8
xx2:= (isi*nilai2)-x; //bener=50
{nilai ini tdk berfungsi walau nilai isi n nilai2 benar,tp jumlah tdk masuk kexx3 alias xx3=0}
xx3:= isi*nilai2; //salah=0, harusnya=50
xx4:= xx3-xx1; //bener=-8
nah, kenapa yg xx3 tdk normal ya, nilai xx3=0
kenapa ya, ini sy pecah nilai secara manual spt diatas karena melihat ada nilai yg aneh, ternyata disetelah dipecah pas dipoin itu.
 
 View user's profile Send private message  
Reply with quote Back to top
mas_kofa
Location: New York Arto
Post subject: RE: Berbagi pengalaman aneh  PostPosted: 20/Jan/2009 14:54
onElite


Joined: 18-Mar-2006
Posts: 1753
Location: New York Arto
nikmati aja keanehan tsb cause aku juga sering ngalami yg aneh2 di delphi....

Semangat terus............

_________________
Pay Per Day | Pesbuk
Me isn't mine
Aku Ini adalah satu

Cerdik seperti ular, Tulus seperti merpati
 
 View user's profile Send private message  
Reply with quote Back to top
wahyu_elrahmaOffline
Location: NewYork karto
Post subject: RE: Berbagi pengalaman aneh  PostPosted: 20/Jan/2009 19:26
onConfident


Joined: 26-Feb-2008
Posts: 27

Status: Offline
Mas ichan29, aku nyoba hasilnya xx3= 50 tuh,...mungkin sampean ngantuk..kebanyakan proyek ya ? Smile

procedure TForm1.Button1Click(Sender: TObject);
var isi,x, nilai2, xx1,xx2,xx3,xx4 : integer;
begin
isi:=10;
nilai2:=5;
//Q.fields[0].value=2
//x=0 --> dr data
x:=0;
xx1:= ((isi*nilai2)-(2-x)) mod isi; //bener=8
xx2:= (isi*nilai2)-x; //bener=50
{nilai ini tdk berfungsi walau nilai isi n nilai2 benar,tp jumlah tdk masuk kexx3 alias xx3=0}
xx3:= isi*nilai2; //salah=0, harusnya=50
xx4:= xx3-xx1;
ShowMessage('Jawabannya adalah : '+IntToStr(xx3)); // hasilnya tak showmessage = 50

end;
 
 View user's profile Send private message  
Reply with quote Back to top
RoenZOffline
Location:
Post subject: RE: Berbagi pengalaman aneh  PostPosted: 20/Jan/2009 22:04
onSkilled


Joined: 05-Apr-2007
Posts: 72

Status: Offline
setahu saya kalau kita trace satu persatu nilai yang kita cari seperti xx3, terkadang hasil dari trace suka error tapi kalau kita tampilkan ke form, misalnya seperti bro wahyu pake show message hasilnya memang benar.

saya juga bingung, hasilnya benar tapi ko pas ditrace hasilnya error. Smile
 
 View user's profile Send private message  
Reply with quote Back to top
jrpOffline
Location:
Post subject: RE: Berbagi pengalaman aneh  PostPosted: 21/Jan/2009 14:10
onKnowledgeable


Joined: 12-Sep-2006
Posts: 198

Status: Offline
@ichan29
Bisakah dijelaskan :
- konteks dimana kode anda diletakkan
- tipe data yg digunakan (variabel dan field)
- penjelasan mengenai " --> dr data"

Soalnya kode anda melibatkan isi field database. Mungkin saja "keanehannya" berasal dari sana.

jrp
jrp
 
 View user's profile Send private message  
Reply with quote Back to top
donlego
Location: on the jail
Post subject: RE: Berbagi pengalaman aneh  PostPosted: 21/Jan/2009 14:18
onSkilled


Joined: 06-Mar-2007
Posts: 118
Location: on the jail
he he gw jg prnah tuh ngalamin kya gtu bos,pas ngitung di oncalcfields nya dataset klo di trace pasti 0 valuenya tpi result akhirnya ga 0

_________________
http://donlego.wordpress.com/
 
 View user's profile Send private message  
Reply with quote Back to top
ichan29Offline
Location:
Post subject: Re: RE: Berbagi pengalaman aneh  PostPosted: 21/Jan/2009 16:23
onProfessional


Joined: 23-Feb-2007
Posts: 603

Status: Offline
      wahyu_elrahma wrote:
Mas ichan29, aku nyoba hasilnya xx3= 50 tuh,...mungkin sampean ngantuk..kebanyakan proyek ya ? Smile
seharusnya memang begitu mas, cuman ngga tau ditempatku komputernya lg males ngitung kali ya.. klo ngantuk si masih blum la wong pas baru mandi, sikat gigi dan makan pagi.
alhamdulillah mas, mudah2an aja begitu Smile

      jrp wrote:
Bisakah dijelaskan :
- konteks dimana kode anda diletakkan
- tipe data yg digunakan (variabel dan field)
- penjelasan mengenai " --> dr data"

Soalnya kode anda melibatkan isi field database. Mungkin saja "keanehannya" berasal dari sana.
xixixi... OnClick, sebenernya utk poin 2 ini, kan udah jelas bahwa isi=10, dimana 10 adalah diambil dr data.
terlepas isi adalah integer/double, itu udah tertampung di isi dr hasil data dan terus keanehan dateng dr sana, la wong udah ditrace pake F8 kok.

Thx semua ya, ini cuman pengalamanku aja, dicoba ke komputer lain OK tdk terjadi itu dg kondisi sama persis baik data atau apapun, is OK.
 
 View user's profile Send private message  
Reply with quote Back to top
Display posts from previous:     
Jump to:  
All times are GMT - 12 Hours
Post new topic   Reply to topic
View previous topic Printable version Log in to check your private messages View next topic





Powered by PNphpBB2 © 2003-2009 The Zafenio Team
Credits


| Register | Lost Password ? |