PDA

View Full Version : ขอความช่วยเหลือหน่อยครับ



ratchai
16-06-2008, 12:52 AM
อันนี้ต้องออกตัวไว้ก่อนว่าผม มือใหม่Delphi :P เพราะเป็นแต่ C

เข้าเรื่องเลยนะครับ

คือ ผมต้องการที่จะเอาค่าที่เราเก็บค่าไว้ นำมาคำนวณแต่มันErrorอ่านๆดูพอจับใจความได้ ว่า

ค่าที่ผมนำมาคำนวณมันนำมา บวก ลบ กันไม่ได้ เพราะว่ามัน เป็น TEdit ทำนองนี้อ่ะครับ

ใครแนะนำได้บ้างไหมครับ

ขอบคุณล่วงหน้าครับ :D

n.ktw
17-06-2008, 08:05 AM
รายละเอียดน้อยไปนิดนึงนะครับ เท่าที่เข้าใจคือใช้ TEdit รับตัวเลขมาเพื่อใช้ในการคำนวน
แต่เนื่องจากใช้ TEdit.Text มันมีชนิดแบบตัวอักษร ดังนั้นต้องทำการแปลงจากตัวอักษรให้เป็นตัวเลขก่อน ซึ่งก็มีหลายฟังก์ชั่นให้ใช้งาน

**Hidden Content: Check the thread to see hidden data.**

หมายเหตุ ผลจากการแปลง
ถ้าแปลงได้ ค่าในตัวแปร Code จะมีค่าเป็น 0 แล้ว ตัวแปร I จะเก็บค่าตัวเลขที่แปลงแล้ว

หรือจะใช้แบบนี้ก็สะดวกดี

**Hidden Content: Check the thread to see hidden data.**

ลองดูนะครับ

oumzza
28-04-2009, 09:48 AM
นี่เลยครับ

Tmp := StrToFloatDef(Edit1.text,0);

StrToFloatDef คือคำสั่งที่ใช้ในการแปลง String เป็น Float ส่วน 0 ถ้าไม่สามารถแปลงได้จะส่งค่า 0 ใช้คำสั่งนี้จะป้องกัน Error ได้ครับ

ถ้าเกิดมี ',' ก็ใช้ตัดออกครับ

Edit1.Text := StringReplace(Edit1.Text,',','',[rfReplaceAll]);

Edit1.text := FormatFloat(',##0.00',Tmp);

Tmp คือ ค่าตัวเลขเป็นชนิดอะไรก็ได้ครับ ส่วน ',##0.00' เป็นการกำหนดรูปแบบในการแสดงผล ลองดูครับ