b := StrToInt(Edit2.text); c := SHORT_SUB_2(a,b); Edit3.text := IntToStr(c); end; end. WDT-01 Windows Software User Manual (Version 1.0) ---- 13