|
#16
|
|||
|
|||
Возникла ещё одна проблема. Мне необходимо считать из MaskEdita Число и символ вида 90-00,0 N и преобразовать его в дробь в такой вид 90,000N Как это возможно сделать?
|
#17
|
||||
|
||||
Код:
procedure TForm1.Button1Click(Sender: TObject); var s: string; begin s:= MaskEdit1.Text; Delete(s, Pos(',', s), 1); MaskEdit1.Text:= StringReplace(s, '-', ',', [rfReplaceAll]); end; Я не понял Вашего вопроса, но всё же Вам на него отвечу! |