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

Вниз

про тип Single   Найти похожие ветки 

 
Dwarf   (2005-02-07 00:45) [0]

привет всем!есть такой небольшой вопрос..если у меня 2 переменные типа single  могу я с ними производить математические действия?
или мне надо их фо что-то перевести..


 
Palladin ©   (2005-02-07 00:49) [1]

можешь
попробовать в ломы чтоли? пару строчек написать...


 
Dwarf   (2005-02-07 00:50) [2]

когда я пытаюсь сделать с ними это действие : (х1-х2)/(у1-у2),у меня вылетает ошибка....


 
Palladin ©   (2005-02-07 00:54) [3]

и что это означает? особенно запятая мне интересна...


 
Palladin ©   (2005-02-07 00:57) [4]

а... запятая тут не причем... это ты пробел не поставил, с толку меня сбил... могу предположить (включив своим телепатические способности, ведь текст ошибки ты не привел, не царское это дело, мастера сами догадаются) что ты пытаешься результат присвоить переменной целого типа... так нельзя... или делай round,trunc, ceil либо используюй перменную результата вещественного типа...


 
Юрий Зотов ©   (2005-02-07 01:06) [5]

> Dwarf   (07.02.05 00:50) [2]

У меня программа глючит. Не скажете, в чем причина?

Это означает вот что. Как Вы думаете - если бы Вы привели еще и текст сообщения об ошибке, то было бы больше или меньше шансов сразу получить точный ответ?


 
Fenik   (2005-02-07 01:07) [6]

Ошибка ещё может быть, если (у1 - у2) = 0


 
Dwarf   (2005-02-07 01:15) [7]

dirA1:=arctan((x2-x3)/(y2-y3));вот такая строчка у меня х1,х2,у1,у2 типа Single а DirA1 тоже Single.значение иксов и игриков принимает вид примерно такой : 2321.132131
а ошибка такая 2321.132131 is not a floating value примерно так..
прошу прощения если пропустил какие то буквы или т.д писал по памяти...


 
Palladin ©   (2005-02-07 01:19) [8]

значения 4 перепенных в студию


 
Юрий Зотов ©   (2005-02-07 01:21) [9]

> Dwarf   (07.02.05 01:15) [7]

Ошибка не здесь, а в параметре StrToFloat. Причина - строковое представление числа содержит не тот десятичный разделитель, который установлен в системных настройках.


 
Dwarf   (2005-02-07 01:29) [10]

>Юрий Зотов ©   (07.02.05 01:21) [9]

наверно звучит глупо...и как мне это исправить?=)


 
Юрий Зотов ©   (2005-02-07 01:37) [11]


X1 := StrToFloat(
 StringReplace(
   StringReplace(Edit1.Text, ".", DecimalSeparator, []),
     ",", DecimalSeparator, []));


 
Dwarf   (2005-02-07 02:02) [12]

вот побольше код..
for i:=1 to 119 do begin
x4:=strtofloat(gridob.Cells[1,i]);
y4:=strtofloat(gridob.Cells[2,i]);
dirA3:=(arctan((x4-x1)/(y4-y1)));
gridrez.Cells[3,i]:=FloatToStr(dirA3);
end;
всё равно вылезает ошибка : invalid floating.....дальше не помню..я только начал с этим работать никак не могу вникнуть...


 
Fenik   (2005-02-07 02:04) [13]

>Dwarf  (07.02.05 02:02) [12]

А ответ [11] у тебя в браузере не отображается? :)


 
Dwarf   (2005-02-07 02:06) [14]

с запятой вместо точки я уже разобрался...теперь все перем. принимают значение типа :111,232


 
Dwarf   (2005-02-07 02:15) [15]

всё равно выскакивает ошибка [12]


 
GanibalLector ©   (2005-02-07 02:15) [16]


var   x4,y4,dirA3:Single;
     i:integer;
begin
StringGrid1.Cells[1,1]:="0.25";//для примера
StringGrid1.Cells[2,1]:="0,25";//для примера

for i:=1 to StringGrid1.RowCount-1 do begin

x4 := StrToFloat(
StringReplace(
  StringReplace(StringGrid1.Cells[1,i], ".", DecimalSeparator, []),
    ",", DecimalSeparator, []));
y4:=StrToFloat(
StringReplace(
  StringReplace(StringGrid1.Cells[2,i], ".", DecimalSeparator, []),
    ",", DecimalSeparator, []));
 // x1,y1 = ???
dirA3:=(arctan((x4-1)/(y4-1)));
StringGrid1.Cells[3,i]:=FloatToStr(dirA3);
end;


А ты уверен,что у тебя  119 полей заполнено? Except бы тут не помешал!!!


 
Dwarf   (2005-02-07 02:21) [17]

GanibalLector ©   (07.02.05 02:15) [16]
А ты уверен,что у тебя  119 полей заполнено?

да,заполняеться 119 полей...точно..
мне кажеться что я с типами переменных на мутил..не могу понять вроде бы ничего сложного нету...а задача такая,
взять значение из строк разных таблиц,подставить в формулу,и результат записать в ячейку другой таблицы...и всё это в цикле от1 до 119...


 
GanibalLector ©   (2005-02-07 02:26) [18]

Код,который в [16] работает.
Предлагаю тебе сделать RowCount  равным 5.Заполнить поля вручную и проверить.И увидишь,что все уже давным давно работает.

З.Ы.Слышь,а может у тя пустые Cells-ы есть?


 
GanibalLector ©   (2005-02-07 02:28) [19]

И еще,делаешь ли ты для  x1,y1  то,что ЮЗ в [11] запостил?


 
Dwarf   (2005-02-07 02:30) [20]

[censored]!!!!!точно!только что перебрал таблицу со значениями ,которые попадают в прогу...оказываеться ,вместо одной цифры стоит буква!убрал и всё работет!всем спасибо за помощь таким ботам как я!



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

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

Наверх




Память: 0.48 MB
Время: 0.042 c
3-1106241213
Миха
2005-01-20 20:13
2005.02.20
Не загружается BLOB из MS SQL... Из других СУБД - загружается!


4-1105200919
Лёха
2005-01-08 19:15
2005.02.20
BITMAP


14-1107241397
wal
2005-02-01 10:03
2005.02.20
О том, как программисты обрезают строки.


1-1107455544
ali_tash
2005-02-03 21:32
2005.02.20
Какое послать сообщение окну чтобы его свернуть ?


3-1106207916
Scorpio
2005-01-20 10:58
2005.02.20
Отсеивание даты в SQL





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