Вверх ↑
Этот топик читают: Гость
Ответов: 8960
Рейтинг: 824
#1: 2009-05-12 14:07:56 ЛС | профиль | цитата
Потребовалось мне определить расстояние между двумя точками на карте, в любимом Excel-е где-то было, но не нашёл. Пришлось делать в не менее любимом HiAsm, вот чем эти программы и хороши - надо и сделал не отходя от кассы (правда ввиду небольшой погрешности не стал учитывать сплюснутую форму Земли)
Вспомнил Tad-а и переименовал файл англицкими буквами
карма: 19

2
файлы: 1calclong.rar [3.7KB] [222]
Голосовали:Konst, kolyan21rus
Ответов: 16884
Рейтинг: 1239
#2: 2009-05-12 14:46:16 ЛС | профиль | цитата
нолевые значения при отличных от ноля меньших единиц проставляются
а по русски это как ?

Казнить нельзя помиловать.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 8960
Рейтинг: 824
#3: 2009-05-12 15:11:16 ЛС | профиль | цитата
Tad, -55гр2мин35.24сек - можно; 55 гр - можно; 55гр2сек - нельзя, надо: 55гр 0 мин 2 сек
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#4: 2009-05-12 15:17:39 ЛС | профиль | цитата
нолевые значения, при отличных от ноля меньших единицах, проставляются
"Я так думаю!" (с)
или так (если для общего пользования)

Add(Edit,3645536,147,84)
{
Left=137
Top=15
Width=20
Text="00"
}
Add(Edit,1025094,224,84)
{
Left=182
Top=15
Width=20
Text="00"
}
Add(Edit,10578391,301,84)
{
Left=220
Top=15
Width=25
Text="00"
}
Add(Edit,11341843,385,84)
{
Left=265
Top=15
Width=20
Text="00"
}
Add(Label,6345520,189,84)
{
Left=162
Top=20
Width=10
Caption="г"
AutoSize=1
}
Add(Label,15533700,266,84)
{
Left=205
Top=20
Width=10
Caption="м"
AutoSize=1
}
Add(Label,6949372,343,84)
{
Left=250
Top=15
Width=10
Font=[MS Sans Serif,10,1,0,1]
Caption=","
AutoSize=1
}
Add(Label,11565434,427,84)
{
Left=290
Top=20
Width=20
Caption="сек."
AutoSize=1
}
Add(ComboBox,15076772,98,84)
{
Left=10
Top=15
Width=122
Height=21
Strings=#15:Северная широта|12:Южная широта|
Text=""
}


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 8960
Рейтинг: 824
#5: 2009-05-12 16:07:27 ЛС | профиль | цитата
Tad, и "Я так думаю!"
Мне было интереснее в одном поле ввода предусмотреть ошибочные действия (всех, конечно, не предугадаешь )
карма: 19

0
5
Сообщение
...
Прикрепленные файлы
(файлы не залиты)