VPF::масштабирование в TScrollBox - Форум программистов

Sаnsаrа

Дата 30.5.2008, 10:27 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 24.3.2008

Репутация: нет
Всего: нет

Работаю с компонентом TScrollBox(карту рисую), и возникла проблема с масштабированием. Вот часть кода:

Код


//изменение масштаба катры
TMessage Msg;
//передаю в параметрах сообщения новый масштаб и приращение
Msg.LParamHi = CurrentScale;
Msg.LParamLo = fMinLongitude*CurrentScale + scrlMap->HorzScrollBar->Position;
Msg.WParamHi = fMaxLongitude*CurrentScale;
Msg.WParamLo = fMaxLatitude*CurrentScale - scrlMap->VertScrollBar->Position;
//обновляю скролбокс
frmMapForm->scrlMap->Visible = false;
frmMapForm->scrlMap->Broadcast(&Msg);
frmMapForm->scrlMap->Visible = true;

...

Код


//код компонента (функция объявлена в разделе Protected и прописана в карте сообщений)
void __fastcall TRegionLine::CMChangeZoom(TMessage &Message)
{
 CurrentScale = Message.LParamHi;
 Top = Message.WParamLo-LatitudeMax*CurrentScale;
 Left = LongitudeMin*CurrentScale - Message.LParamLo;
 Height = (LatitudeMax - LatitudeMin)*CurrentScale+10;
 Width = (LongitudeMax - LongitudeMin)*CurrentScale+10;
}

Проблема же состоит вот в чем: при увеличении масштаба все рисуется корректно. При уменьшении, если видимая часть скролбокса находится в правом нижнем углу, то корректно рисуется только эта видимая часть, а все остальное сдвигается. Помогите пожалуйста обойти эту проблему.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »