Сколько твипов в сантиметре?

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Lumen
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 841
Зарегистрирован: 03.12.2005 (Сб) 16:09
Откуда: Брянск

Сколько твипов в сантиметре?

Сообщение Lumen » 19.10.2007 (Пт) 12:36

Прошу прощения за такой ламерский вопрос, однако ответа найти не смог: сколько твипов в сантиметре? А вообще задача такова: найти расстояние между между двумя точками на эл-те управления Image. Делаю так:
Код: Выделить всё
Private Sub Image1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
Static c As Integer
If Button = vbRightButton Then Form1.PopupMenu mnuFile
c = c + 1
If c = 1 Then
    cx1 = x
    cy1 = y
ElseIf c = 2 Then
    cx2 = x
    cy2 = y
    c = 0
    rasst = Sqr((cx2 - cx1) ^ 2 + (cy2 - cy1) ^ 2)
    masstab = Image1.Height / Image1.Picture.Height
End If
End Sub

rasst - это расстояние между двумя точками в твипах. Как мне перевести их в сантиметры?
masstab - масштаб картинки...
Подпись проходит рефакторинг

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 19.10.2007 (Пт) 12:40

В одном дюйме 1440 твипов. В сантиметре, соответственно, 567.
Lasciate ogni speranza, voi ch'entrate.

Lumen
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 841
Зарегистрирован: 03.12.2005 (Сб) 16:09
Откуда: Брянск

Сообщение Lumen » 19.10.2007 (Пт) 12:42

alibek
Спасибо, оперативно ты, однако :)
Я только успел страницу обновить...
Подпись проходит рефакторинг


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 62

    TopList  
cron