Code: Select all
Calculate:
; set variables
distance := 0
; calculate distance between locations first
Gui, Submit, NoHide
if(Blong = 0 and Blat = 0 and Elong = 0 and Elat = 0)
MsgBox 49, Missing Data Points, There is insufficient Data to Continue
else if(Button1 = 1)
distance := % GetDistanceTwoPoints(Blong, Elong)
ControlSetText, Edit5, % distance
else if(Button2 = 1)
MsgBox, 1, Message, GRID
return
Suggestions?
TIA
doco