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

окруление   Найти похожие ветки 

← →
zep ©   (2004-03-10 21:50) [0]

вопрос такой число хранится в real перед выводом его в edit нужно округлить его до целого
 Зарание спасибо.

---

← →
Алхимик ©   (2004-03-10 21:52) [1]

Round + F1

---

← →
zep ©   (2004-03-10 22:04) [2]

а попадробнее можно

---

← →
Warrior ©   (2004-03-10 22:06) [3]

> а попадробнее можно

1. Написать в Delphiйском редакторе кода "Round"(без кавычек).
2. Установить каретку на этом слове
3. Нажать F1 на клавиатуре

---

← →
zep ©   (2004-03-10 22:10) [4]

нет мнебы хоть какой нить примерчик а то я англейском не очень силен

---

← →
Никто ©   (2004-03-10 22:15) [5]

ну да.... а примерчик из хелпа ну совсем не устраивает -(

---

← →
Bulanov ©   (2004-03-10 22:17) [6]

Edit1.Text:=CurrToStr(Round(123.45));

---

← →
Алхимик ©   (2004-03-10 22:21) [7]

[4] нет мнебы хоть какой нить примерчик а то я англейском не очень силен

А дальше как жить собираешься?
Синтаксис:
function Round(X: Extended): Int64;
Описание
В Delphi, функция Round округляет дробное значение до целочисленного...
Примерчик:
var
  S, T: string;
begin
  Str(1.4:2:1, T);
  S := T + " rounds to " + IntToStr(Round(1.4)) + #13#10;
  Str(1.5:2:1, T);
  S := S + T + " rounds to " + IntToStr(Round(1.5)) + #13#10;
  Str(-1.4:2:1, T);
  S := S + T + " rounds to " + IntToStr(Round(-1.4)) + #13#10;
  Str(-1.5:2:1, T);
  S := S + T + " rounds to " + IntToStr(Round(-1.5));
  MessageDlg(S, mtInformation, [mbOk], 0, mbOk);
end;

---

← →
zep ©   (2004-03-10 22:23) [8]

спасибо всем

---

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

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



Память: 0.46 MB
Время: 0.024 c