Текущий архив: 2006.09.24;
Скачать: CL | DM;
Вниз
Конвертация Exp в Extended Найти похожие ветки
← →
ГореПрограммер (2006-09-04 14:25) [0]Здравствуйте, есть такая задача:
имеется число: предположим 2.42e-05 как его сконвертировать в обычный extended ?
← →
Elen © (2006-09-04 14:28) [1]Вот тебе Горе-ответ :
unit Unit1;
procedure TForm1.FormCreate(Sender: TObject);
var e:extended;
begin
e:=2.42e-05;
end;
← →
ГореПрограммер (2006-09-04 14:31) [2]e:=strtofloat("2.42e-05");
Не будет работать, почему ?
у меня есть текст в таком виде, как мне его преобразовать ?
← →
Loginov Dmitry © (2006-09-04 14:32) [3]> e:=strtofloat("2.42e-05");
Что еще-то нужно?
← →
Elen © (2006-09-04 14:34) [4]
> ГореПрограммер
У меня работает. Как проявляется твое "не работает"?
← →
ГореПрограммер (2006-09-04 14:34) [5]2.42e-05 is not a valid floating point value
а при присваивании
e:=2.42e-05;
все корректно
← →
Elen © (2006-09-04 14:36) [6]
> ГореПрограммер
У меня :unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var e:extended;
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
e:=strtofloat("2.42e-05");
caption:=floattostr(e);
end;
end.
Все работает. Какая у тебя Делфа?
← →
PVOzerski © (2006-09-04 14:38) [7]А с DecimalSeparator всё в порядке?
← →
han_malign © (2006-09-04 14:38) [8]DecimalSeparator
- для русской локали - по умолчанию - ","
← →
MBo © (2006-09-04 14:38) [9]DecimalSeparator в системе кривой
← →
ГореПрограммер (2006-09-04 14:38) [10]Абсолютно аналогичный код вызывает описанную выше ошибку. использую Delphi 2006
← →
Elen © (2006-09-04 14:40) [11]
> ГореПрограммер
e:=strtofloat("2,42e-05");
А так?
← →
ГореПрограммер (2006-09-04 14:43) [12]Все, всем спасибо, про DecimalSeparator не подумал (
Страницы: 1 вся ветка
Текущий архив: 2006.09.24;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.037 c
