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

Вниз

Естъ ли какая функцыя в Delphi ?   Найти похожие ветки 

 
sergeii   (2002-05-13 12:05) [0]

Есть ли функция которая возвращалабы там к примеру true or false при конвертировании текста в число и наоборот. Или ето надо какнибуд посвоиму организовивать?

Спасибо


 
Alx2   (2002-05-13 12:08) [1]

Наподобие этого, может?

Result := True;
try
SomeThing := StrToFloat (....);
except
Result := False;
end;


 
Alx2   (2002-05-13 12:09) [2]

А так смотри процедуру Val там практически все готово.


 
PVOzerski   (2002-05-13 12:20) [3]

Прямо в библиотеках - не припомню. Но организуется элементарно.

1) Число -> строка

А в какой ситуации, по-Вашему, число непредставимо в строковом виде? :^)

2) Строка -> число

function IsNumber(const s:string):boolean;
var
code:integer;
x:extended;
begin
val(s,x,code);
Result:=code=0;
end;

Чуть усложнить эту штуку придётся, если десятичный разделитель
может быть не точкой, а запятой, или если есть знак-разделитель тысяч.
Но тоже ничего особенного нет.



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

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

Наверх




Память: 0.45 MB
Время: 0.007 c
14-73398
Rammish
2002-04-13 12:05
2002.05.23
Как проинсталлировать компонент?


3-73056
qqqq
2002-04-27 12:13
2002.05.23
TDBListBox - MultiSelect?


7-73420
Nigth
2002-02-23 16:50
2002.05.23
Прикол так сказать....


6-73330
SerVS - S
2002-03-12 16:50
2002.05.23
Variant + TCP


14-73379
Nest
2002-04-16 09:42
2002.05.23
Кто нить соображает в зарядке картриджа струйного? (hp6614N)





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский