Ввести число в экспоненциальной форме, через edit

@Peoples · Регистрация: 06.02.2016

Author24 — интернет-сервис помощи студентам

Как ввести число в экспоненциальной форме, через edit?

@Peoples · 09.12.2016, 13:46 **[ТС]**

Вот типо такого

@vlisp · 09.12.2016, 14:43

попробуй MaskEdit. Если не подойдет, пиши свой компонент

@volvo · 09.12.2016, 14:47

Peoples, и чего? Ввести-то в Edit можно любой текст, в чем проблема? Что дальше делать с ним будешь?

@Peoples · 09.12.2016, 14:55 **[ТС]**

volvo, дальше strtofloat и в переменную надо бы

@Puporev · 09.12.2016, 15:38

Pascal

procedure TForm1.Button1Click(Sender: TObject);
var a:double;
begin
  Edit1.text:='0.5e10';
  a:=strtofloat(Edit1.text);
  Edit2.Text:=floattostr(a);
end;

@edukra · 09.12.2016, 15:41

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

дальше strtofloat и в переменную надо бы

там получается не число, а арифметическая операция, на которую strtofloat выругается и все. А вот если записывать без дробей 2,8e6 или 2e-11, то strtofloat сработает правильно.

@volvo · 09.12.2016, 15:43

И что ты хочешь получить при вводе 1/5E10? 0.00000000002?

Pascal

procedure TForm1.Button10Click(Sender: TObject);
var
  L : TStringList;
  f : Double;
begin
  L := TStringList.Create;
  try
    L.Delimiter := '/';
    L.DelimitedText := Edit1.Text;
    f := StrToFloat(L[0]) / StrToFloat(L[1]);
  finally
    L.Free;
  end;
end;

@Peoples 1624 / 954 / 782 Регистрация: 06.02.2016 Сообщений: 2,452 Записей в блоге: 31
		1
	Ввести число в экспоненциальной форме, через edit 09.12.2016, 13:45. Показов 4501. Ответов 7 Метки нет (Все метки) Как ввести число в экспоненциальной форме, через edit? 0

@Peoples 1624 / 954 / 782 Регистрация: 06.02.2016 Сообщений: 2,452 Записей в блоге: 31
	09.12.2016, 13:46 [ТС]	2
	Вот типо такого Миниатюры 0

@vlisp 618 / 938 / 150 Регистрация: 10.08.2015 Сообщений: 4,987
	09.12.2016, 14:43	3
	попробуй MaskEdit. Если не подойдет, пиши свой компонент 0

@volvo Супер-модератор 32830 / 21168 / 8147 Регистрация: 22.10.2011 Сообщений: 36,429 Записей в блоге: 8
	09.12.2016, 14:47	4
	Peoples, и чего? Ввести-то в Edit можно любой текст, в чем проблема? Что дальше делать с ним будешь? 0

@Peoples 1624 / 954 / 782 Регистрация: 06.02.2016 Сообщений: 2,452 Записей в блоге: 31
	09.12.2016, 14:55 [ТС]	5
	volvo, дальше strtofloat и в переменную надо бы 0

@edukra 600 / 548 / 210 Регистрация: 24.01.2012 Сообщений: 1,348
	09.12.2016, 15:41	7
	Сообщение от Peoples дальше strtofloat и в переменную надо бы там получается не число, а арифметическая операция, на которую strtofloat выругается и все. А вот если записывать без дробей 2,8e6 или 2e-11, то strtofloat сработает правильно. 0

	09.12.2016, 15:43

Опции темы

Ввести число в экспоненциальной форме, через edit

Решение