Форум: "Основная";
Текущий архив: 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