[Zames]

На форме есть MaskEdit с маской в виде 99-99,9 N Как считать маску?

[Uniq!]

Что значит "считать"?

[Zames]

допустим в вожу в поле вот такое значение 85-33,6 N мне необходимо для дальнейших вычислений 85-33,6 N преобразовать в вид 85,5211 с учётом знака если N то положительное значение если S то отрицательное значение.

[Alegun]

Сообщение от Zames

...85-33,6 N преобразовать в вид 85,5211...

Как 33,6 превращается в 5211? Просветите

[Zames]

85-33.6 N это тоже самое что и 85,56 N 33.6/60=0.56+85=85.56N

[Alegun]

Ну тогда немного G-кода

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14

procedure TForm1.Button1Click(Sender: TObject); var s: string; begin  s:= MaskEdit1.Text;  if s[Length(s)]= 'S' then  Label1.Caption:= '-'  else  Label1.Caption:= '';    Label1.Caption:= Label1.Caption +  FloatToStr(StrToFloat(s[1]+s[2])+  StrToFloat(s[4]+s[5]+','+s[7])/60); end;