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

Помогите с исходником, плз....   Найти похожие ветки 

← →
Latent Force   (2002-11-15 20:03) [0]

Всем привет! Люди, если не ломает, пожалуйста намыльте исходный код функции FormatFloat(...) из сырцов Delphi. Я не могу вспомнить в каком модуле она определена. Нужно очень, а взять не у кого... Если не затруднит то в течении часа с момента выхода вопроса.
Спасибо!

----------------
С уважением.
Latent Force.

---

← →
Ketmar ©   (2002-11-15 20:09) [1]

function FormatFloat(const Format: string; Value: Extended): string;
var
Buffer: array[0..255] of Char;
begin
if Length(Format) > SizeOf(Buffer) - 32 then ConvertError(SFormatTooLong);
SetString(Result, Buffer, FloatToTextFmt(Buffer, Value, fvExtended,
PChar(Format)));
end;

помогло? %-)

Satanas Nobiscum! 15-Nov-XXXVII A.S.

---

← →
Latent Force   (2002-11-15 20:25) [2]

Помогло :) , но породило новые вопросы.
А как реализована функция FloatToTextFmt(...)?

---

← →
Ketmar ©   (2002-11-15 20:40) [3]

может, я вам SysUtils на мыло пришлю? так, имхо, проще %-))

Satanas Nobiscum! 15-Nov-XXXVII A.S.

---

← →
Anatoly Podgoretsky ©   (2002-11-15 20:40) [4]

Слущай а у тебя виндоус и справка по Дельфи есть?

---

← →
TTCustomDelphiMaster ©   (2002-11-15 20:41) [5]

Намылил...

---

← →
Latent Force   (2002-11-15 20:45) [6]

to -> Anatoly Podgoretsky
да у меня нет вообще Delphi :(
Завтра-послезавта я его, конечно, куплю и поставлю, но ведь это будет завтра :(

to -> Ketmar
Точно SysUtils! Если не трудно, намыльте, плз. Век помнить буду :)

С уважением.
Latent Force

---

← →
Latent Force   (2002-11-15 20:49) [7]

Спасибо ребята!
Все получил :)
Как говорится, бедете у нас на Колыме... :)

----------------
С уважением.
Latent Force.

---

← →
Ketmar ©   (2002-11-15 21:14) [8]

значицца, ы не мылю, ибо вы, кажись, уже получили...

Satanas Nobiscum! 15-Nov-XXXVII A.S.

---

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

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



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