Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.27;
Скачать: CL | DM;

Вниз

В таблице есть поле summa в котором данные стрингового типа,   Найти похожие ветки 

 
ЕленаКв   (2002-04-30 07:42) [0]

над ними нужно произвести арифметические действия. Как перевести эти данные в тип Real? Заранее благодарна!


 
gek   (2002-04-30 08:02) [1]

r:real;
begin
r:=strofloat(значение поля)

Может все же лучше сделать нормальное поле типа float?


 
ЕленаКв   (2002-04-30 08:37) [2]

Спасибо за ответ, но что-то не работает :(
Файл с таблицей получаю из другой организации, для своих расчетов пытаюсь добавить в него новое поле , т.н. "нормальное поле типа float", но к сожалению, ничего пока не получается с приведением типа.


 
vne   (2002-04-30 08:47) [3]

В каком виде разделитель? Если не стандартный-подменяй на стандартный и смотри выше.Получение станд.разд-
var
DFLTLCID:Integer;
THSND,DCML:Char;
CRNCY,FDGT:String[2];
begin
DFLTLCID:=GetSystemDefaultLCID;
THSND:=GetLocaleChar(DFLTLCID, LOCALE_STHOUSAND, #160);
DCML:=GetLocaleChar(DFLTLCID, LOCALE_SDECIMAL, #160);
CRNCY:=GetLocaleStr(DFLTLCID, LOCALE_SCURRENCY, "");
FDGT:=GetLocaleStr(DFLTLCID, LOCALE_IDIGITS, "2");
end;


 
gek   (2002-04-30 08:48) [4]

Изв, надо конечно же писать strtofloat.


 
Anatoly Podgoretsky   (2002-04-30 10:58) [5]

Приведи здесь хоть одно значение и посмотри какой у тебя в системе десятичный разделитель , если не соответствует, то можешь в начале поставить DecimalSeparator := такой как в таблице


 
dimanchik   (2002-05-03 01:04) [6]

А если так:
В запросе: SELECT CAST(A1 AS FLOAT) FROM ...?



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

Текущий архив: 2002.05.27;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.005 c
1-88422
SuperVK
2002-05-17 07:11
2002.05.27
TWebBrowser - печать сразу после загрузки страницы из потока


3-88361
aka Andre
2002-04-15 13:59
2002.05.27
Ошибка при использовании dbExpress и MySQL


1-88548
SergeyDon
2002-05-16 12:56
2002.05.27
Можно форме присвоить иконку 32х32х16?


14-88624
Shadow
2002-04-18 21:00
2002.05.27
Сколько стоит программа?!!!!!!!!!!


7-88655
Ольга
2002-02-28 17:11
2002.05.27
Запуск приложения





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