Вниз
Скачать: CL | DM;

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

← →
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...
а так ты недалеко уедешь...



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.956 c
1-1174544437
XsID
2007-03-22 09:20
2007.05.20
Противостояние принтера


3-1171882209
vani
2007-02-19 13:50
2007.05.20
Delphi7 ADO MSSQL2k


15-1177337676
rus_Mess
2007-04-23 18:14
2007.05.20
Сообщения на рус


2-1177622294
SerJaNT
2007-04-27 01:18
2007.05.20
Сохранить в csv


15-1176898096
Ega23
2007-04-18 16:08
2007.05.20
Поясните, как правильно пользоваться CPU-window?




   Наверх