Не могу найти ошибку

← →
Regent © (2007-05-04 08:37) [0]

Здравствуйте.
Предположжим у меня есть Label1.В ней записано число с плаваюшей точкой.Я его округляю,компилирую программу ивыдаёться ошибка о несовместимости Real и String.А код выглядет Вот так:

var
x:real;
y:real;
begin
x:=StrToFloat(Label1.Caption);
y:=FormatFloat(0.00,x); //На этой строчке выдаёт ошибку
Label2.Caption:=FloatToStr(y);
end;

Помогите пожалуйста разобраться!

← →
ЮЮ © (2007-05-04 08:46) [1]

function FormatFloat(const Format: string; Value: Extended): string; overload;

Если 0.00 и y для тебя строки, то метлу в руки и на свежий воздух :)

FormatFloat аналогична FloatToStr, только с предопределенной маской вывода. Для округления посмотри RoundTo

← →
Regent © (2007-05-04 08:51) [2]

Ну написал я
function FormatFloat(const Format: string; Value: Extended): string; overload;

а чё дальше писать???

← →
EvS © (2007-05-04 08:56) [3]

> а чё дальше писать???

Тебе не писать, тебе читать надо

← →
ЮЮ © (2007-05-04 08:59) [4]

>Ну написал я

Вот я спрашиваю, зачем ты написал функцию FormatFloat(0.00,x), если она предназначена не для этого.
В твоем случае надо
Label2.Caption := FormatFloat("0.00", x);

← →
smirnov (2007-05-04 11:16) [5]

> y:=FormatFloat(0.00,x); //На этой строчке выдаёт ошибку

На этой строчке у тебя 2 ошибки:
1. Первый параметр FormatFloat должен быть string.
2. Результат FormatFloat имеет тип string, а ты его, несчастного, пытаешься присвоить y:real

Короче, совсем не понимаешь, что пишешь...

← →
Правильный Вася (2007-05-04 12:02) [6]

> Ну написал я function FormatFloat(const Format: string;
> Value: Extended): string; overload;

пацталом!!!

ты ему еще скажы "компилируйся, блин!" и удивись, что жаргона не понимет

← →
sadasd (2007-05-04 14:03) [7]

почитайсначала какую-нибудь умную книжку по дельфи, или F1...
а так ты недалеко уедешь...

Не могу найти ошибку Найти похожие ветки