Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

тип single - в чем ошибка? [D6, WinXP]

Roobee © (2004-12-19 07:40:00)
код >>>

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
n : single;
begin
n := StrToFloat(Edit1.Text);
Edit2.Text := FloatToStr(n);
end;

end.

>>>>>>>>>>>

если в Edit1 >> ,6 то после нажатия на Button1
в Edit2 получаю 0,600000023841858

ЭТО ГЛЮК???

Leonid Troyanovsky (2004-12-19 13:02:00) [1]

> roobee © (19.12.04 12:40) [2]

> между прочим если использовать не single а любой
> другой real тип то число не изменяется. так вот.

RTFM: Object Pascal Language Guide. Real types

--
Regards, LVT.

roobee (2004-12-19 12:40:00) [2]
ну конечно, облаять проще всего. носом ткнуть - учись мол.

учусь. просто думаю что число не должно стать
ни больше ни меньше в результате этих преобразований.
между прочим если использовать не single а любой
другой real тип то число не изменяется. так вот.

Palladin (2004-12-19 08:00:00) [3]
Сколько глюкофилов развелось... кошмар... Нет чтоб поискать, подумать, обратится к первоисточникам, у себя ошибки поискать. Нет. Все нужно свалить на когото. Это ваш основной глюк! :)

http://www.delphikingdom.ru/asp/viewitem.asp?UrlItem=/helloworld/reals.htm

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »