nih gan .. :1thumbup function TfrmMain.Terbilang(aNumber: String): String; var S, S1 : String; Q1, Q2 : String; I, J : Integer; begin S := Trim(aNumber); if (S = ') then begin S := '000'; end; try StrToInt64(S); except on EConvertError do begin ShowMessage('H
