การเขียนคำสั่งลบค่าตัวเลขใน Variable

[munsat]

การเขียนคำสั่ง SQL ใน Variable ลบค่าตัวเลขแล้วติดลบ  ต้องการจะเปลี่ยนให้ส่งออกค่าเป็นเลข 0 เช่น

Value:=Variable65.Value-Variable75.Value;

ค่า Variable65.Value มีค่าเป็น 1
ค่า Variable75.Value มีค่าเป็น 3

ลองเขียนคำสั่ง if แล้วก็ยังไม่ส่งออกเป็นผลลัพธ์
Value :=GetSQLIntegerData('select if(Variable65.Value-Variable75.Value<0,0,Variable65.Value-Variable75.Value)');

[golf_win]

ลองแบบนี้ครับ

if Variable65.Value<Variable75.Value then
Value := 0 ;
else
Value := Variable65.Value-Variable75.Value ;

[munsat]

ขอบคุณครับ

[udomchok]

การเขียนคำสั่ง SQL ใน Variable ลบค่าตัวเลขแล้วติดลบ  ต้องการจะเปลี่ยนให้ส่งออกค่าเป็นเลข 0 เช่น

Value:=Variable65.Value-Variable75.Value;

ค่า Variable65.Value มีค่าเป็น 1
ค่า Variable75.Value มีค่าเป็น 3

ลองเขียนคำสั่ง if แล้วก็ยังไม่ส่งออกเป็นผลลัพธ์
Value :=GetSQLIntegerData('select if(Variable65.Value-Variable75.Value<0,0,Variable65.Value-Variable75.Value)');

GetSQLIntegerData ใช้ในกรณีดึงข้อมูลจากฐานข้อมูลเท่านั้นครับ