СЕРВИС ПОИСКА И ПОДБОРА ПОСТАВЩИКОВ ДВУТАВРА STEEL-RADAR
VetCAD

Определение расчетного сопротивления грунта c возможностью нахождения предварительных габаритов фундаментов и проверкой слабого слоя.

    6 оценок

Ratmir

размещено: 26 Сентября 2021
обновлено: 26 Сентября 2021
Новая версия программы «Определение расчетного сопротивления грунта основания по СП 22.13330.2016».

Кроме вычисление расчетного сопротивления грунта, добавлена кнопка «Нахождения предварительных габаритов фундаментов» (если не выбрано «Подошва фундамента имеет форму круга или правильного многоугольника»).
После нажатие на кнопку, в новом окне задаются нагрузки на обрез фундамента, высота фундамента, соотношение сторон (должна быть больше или равно 1), после вычисление в табличной форме, можно выбрать габариты фундамента и посмотреть угловые давления, среднее давление под подошвой, если давление под подошвой не превышает расчетного сопротивления грунта и нет отрыва подошвы то те габариты фундаменты выделены зеленым цветом (серым цветов выделен фундамент в заданной шириной который вы считали до этого). После выбора нужного габарита фундамента, вы можете создать отчет или согласно пункта 5.6.25 проверить слабый слой грунта.
В окне проверка слабого слоя задаются характеристики слоя и на какой глубине от подошвы он залегает. Вычисляется ширина условного фундамента, расчетное сопротивление грунта на его границы и сверяется напряжение под подошвой условного фундамента. Возможно создание отчета.
Установка не требуется. В архиве есть и 32 битная версия.
Определение расчетного сопротивления грунта c возможностью нахождения предварительных габаритов фундаментов и проверкой слабого слоя.1
Определение расчетного сопротивления грунта c возможностью нахождения предварительных габаритов фундаментов и проверкой слабого слоя.2
Определение расчетного сопротивления грунта c возможностью нахождения предварительных габаритов фундаментов и проверкой слабого слоя.3

Комментарии

Комментарии могут оставлять только зарегистрированные участники
Авторизоваться
Комментарии 1-10 из 13
eilukha , 26 сентября 2021 в 11:27
#1
Процесс разрушения монополии ФОК ПК пошёл.
zloy1653 , 26 сентября 2021 в 11:53
#2
Добрый день. При нажатии на кнопку "Нахождение предварительных ..." выдает следующую ошибку: "0,600 is an invalid float. Press OK to ignore and risk data corruption. Press Abort to kill the program". Для Win10 x64
Ratmir , 26 сентября 2021 в 13:16
#3
zloy1653, попробуй скачать заново, я заново откомпилировал программу (хотя такой ошибки не должно быть)
Genf , 26 сентября 2021 в 15:01
#4
Цитата:
Сообщение #2 от zloy1653

Добрый день. При нажатии на кнопку "Нахождение предварительных ..." выдает следующую ошибку: "0,600 is an invalid float. Press OK to ignore and risk data corruption. Press Abort to kill the program". Для Win10 x64

Такая же ошибка
Ratmir , 26 сентября 2021 в 16:46
#5
Genf и zloy1653, поменяйте разделитель целой и дробной части на "," (запятую). Это меняется в настройках параметра windows 10
zloy1653 , 26 сентября 2021 в 22:49
#6
Спасибо. Всё работает
voltron , 28 сентября 2021 в 13:18
#7
Спасибо!
AlexKniga , 29 сентября 2021 в 15:34
#8
Цитата:
Сообщение #5 от Ratmir

Genf и zloy1653, поменяйте разделитель целой и дробной части на "," (запятую). Это меняется в настройках параметра windows 10

Лучше в программе использовать системный разделитель DecimalSeparator
https://docs.microsoft.com/en-us/dotnet/api/system.globalization.numberformatinfo?redirectedfrom=MSDN&view=net-5.0
Ratmir , 01 октября 2021 в 07:15
#9
AlexKniga, Как не странно я использую данную функцию
function MyStrFloat(stPer: string): real;
var
inNom: integer;
begin
// Преобразует String in Real
chRaz:= DecimalSeparator;
inNom:= pos('.', stPer);
if inNom 0 then
begin
Delete(stPer, inNom, 1);
Insert(chRaz, stPer, inNom);
end;
inNom:= pos(',', stPer);
if inNom 0 then
begin
Delete(stPer, inNom, 1);
Insert(chRaz, stPer, inNom);
end;
Result:= StrToFloat(stPer);
end;
На первой форме при вычислении ошибка не возникает, а при открытии второй формы возникает.
AlexKniga , 01 октября 2021 в 12:23
#10
Лучше не делать самому замены предполагаемых разделителей на действительный, а настроить AFormatSettings в:
function StrToFloat(const S: string; const AFormatSettings: TFormatSettings): Extended;
zip

3.49 МБ

СКАЧАТЬ