Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.05.20;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.05.20;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.074 c
2-1177592173
sadasd
2007-04-26 16:56
2007.05.20
TClientSocket


2-1177444555
tigraman
2007-04-24 23:55
2007.05.20
IdTCPClient


2-1178187768
Marat
2007-05-03 14:22
2007.05.20
Округлить QRExpr


2-1178251152
RomanLN
2007-05-04 07:59
2007.05.20
как создать таблицу через SQL ?


2-1178273173
Doom-2
2007-05-04 14:06
2007.05.20
Как запустить приложения по очереди?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский