UR5FCM Logger ver. 3b

**UR5FCM** · 02.04.2009, 16:57

to UA3LIZ

Письмо получил. Mail.ru на работе не работает что-то сервер глючит
Сообщите Ваш номер в ICQ

Продолжаем работать - уже есть успехи скоро закончу
Надо много окон переделать
Упор на карту сейчас - тоже пытаюсь с размером настроить
Если успею то сделаю, если надо отдельную панель САТ

Кто может проверить программу на Висте - есть вопросы, но Висты у меня нет?

**UA3LIZ** · 02.04.2009, 17:07

Понял. Аська 429738533.

**RX3QFY** · 02.04.2009, 17:11

Сообщение от UR5FCM

to UA3LIZ

Письмо получил. Mail.ru на работе не работает что-то сервер глючит
Сообщите Ваш номер в ICQ

Продолжаем работать - уже есть успехи скоро закончу
Надо много окон переделать
Упор на карту сейчас - тоже пытаюсь с размером настроить
Если успею то сделаю, если надо отдельную панель САТ

Кто может проверить программу на Висте - есть вопросы, но Висты у меня нет?

Игорь! Мнение человека который неплохо знает компьютер Вам нужно?
Если да, то оптимизируйте программу под одну операционную систему, а потом уже дорабатывайте под другие.

**UR5FCM** · 02.04.2009, 17:18

Сообщение от RX3QFY

Игорь! Мнение человека который неплохо знает компьютер Вам нужно?
Если да, то оптимизируйте программу под одну операционную систему, а потом уже дорабатывайте под другие.

Да конечно согласен, работаем, но у пользователей есть вопросы по работе программы под Вистой. Нельзя их игнорировать ...
Скажите что Вы считаете оптимизацией под ОС: скорость запуска или размещение окон ?

Вот что пока получается (15" 1027х768) - но еще не финал еще есть что оптимизировать

**UR5FCM** · 06.04.2009, 15:14

Вышла новая тестовая версия 238

http://ur5fcm.narod.ru/update/ur5fcm_log.rar

Распакуйте все в папку программы
UR5FCMLogger.exe - 238 версия программы
На вопрос перезаписать отвечаем "ДА" для всех файлов

**UR5FCM** · 08.04.2009, 20:47

Вышла новая тестовая версия 244

http://ur5fcm.narod.ru/update/update...r-08.04.09.rar

Распакуйте все в папку программы
UR5FCMLogger.exe - 244 версия программы
qsomap.bmp - карта
На вопрос перезаписать отвечаем "ДА" для всех файлов

**RX1AL** · 11.04.2009, 00:16

Игорь, по поводу resize форм. Ниже прикреплён файл сетапа одного компонента, который бесплатен и делает, то, что надо. Пример будет с исходным текстом, после установки в какую-нибудь директорию. Свой исходный код, сейчас подкомментирую и выложу тоже.

ПС По поводу PictureBox - для изменения размеров карты, не все так просто. Нужен ручной пересчет. Завтра/послезавтра сделаю пример, чтобы нормально перерисовывался и мелькал.

**UR5FCM** · 11.04.2009, 00:21

Сообщение от RX1AL

Игорь, по поводу resize форм. Ниже прикреплён файл сетапа одного компонента, который бесплатен и делает, то, что надо. Пример будет с исходным текстом, после установки в какую-нибудь директорию. Свой исходный код, сейчас подкомментирую и выложу тоже.

ПС По поводу PictureBox - для изменения размеров карты, не все так просто. Нужен ручной пересчет. Завтра/послезавтра сделаю пример, чтобы нормально перерисовывался и мелькал.

Наконец
Спасибо!!!
Хотя я сечас статистикой занят
Позже буду разбирать

**RX1AL** · 11.04.2009, 00:48

Игорь, вот исходный текст примера. Работает, как я и писал, только для стандартных визуальных контролей или контролей derived от стандартных. Иначе надо думать...

**UR5FCM** · 11.04.2009, 01:27

Сообщение от RX1AL

ПС По поводу PictureBox - для изменения размеров карты, не все так просто. Нужен ручной пересчет. Завтра/послезавтра сделаю пример, чтобы нормально перерисовывался и мелькал.

Так у меня уже все работает по ресайзу я же писал

**RX1AL** · 11.04.2009, 21:47

UR5FCM:
Игорь, относительно ресайзинга карты в PictureBox. Тебе надо в свойствах контроля указать, как его содержимое будет изменяться. Установи свойство в "Zoom". Далее на событие Form_Open вешаешь обработку вычисления dx, dy приращения по длине и высоте от me.PictureBox0.InnerWidth и me.PictureBox0.InnerHeight. Заведи только две переменные типа integer. А в событии Form_Resize ты просто вычисляешь новые размеры для me.PictureBox0.Width и Height по этим dx, dy приращениям. И все. Я код могу запостить, но он настолько тривиальный оказался, что думаю сам найдешь. Примерчик был свaян в Аксесс за 10-15 минут всего. Все работает.

**UR5FCM** · 12.04.2009, 01:27

Сообщение от RX1AL

Игорь, относительно ресайзинга карты в PictureBox. Тебе надо в свойствах контроля указать, как его содержимое будет изменяться. Установи свойство в "Zoom". Далее на событие Form_Open вешаешь обработку вычисления dx, dy приращения по длине и высоте от me.PictureBox0.InnerWidth и me.PictureBox0.InnerHeight. Заведи только две переменные типа integer. А в событии Form_Resize ты просто вычисляешь новые размеры для me.PictureBox0.Width и Height по этим dx, dy приращениям. И все. Я код могу запостить, но он настолько тривиальный оказался, что думаю сам найдешь. Примерчик был свaян в Аксесс за 10-15 минут всего. Все работает.

Михаил у меня все работает. Я нашел еще давно ну посмотрите в новой версии
Это что из ДотНет команды Form_open ?
У меня только Form_Load
Я вообще сейчас занят статистикой дипломов
Да 2-3 сек и результат
Проблемы CQ Field Там только идут большие квадраты
Попробую сделать поле для этого

**RX1AL** · 12.04.2009, 01:50

Сообщение от UR5FCM

Я вообще сейчас занят статистикой дипломов
Да 2-3 сек и результат

Посмотрю...

Насчет Form_Open из Аксесса, я просто проверял функциональность на нем в VBA. А зачем тебе отдельное поле для CQ Field? Сделай просто через Substring(), Trim() - нормальные операции для работы со строками. Лишнее поле тут даже и не нужно... мое мнение. WWL у тебя же есть при вводе, отсекаешь два первых символа и все. Если для статистики, так считай ее в памяти, а потом сгенеренный репорт сохраняй. В базе хpанить все данные для репортов не очень хорошо.

**UR5FCM** · 12.04.2009, 01:56

Сообщение от RX1AL

Посмотрю...

Насчет Form_Open из Аксесса, я просто проверял функциональность на нем в VBA. А зачем тебе отдельное поле для CQ Field? Сделай просто через Substring(), Trim() - нормальные операции для работы со строками. Лишнее поле тут даже и не нужно... мое мнение. WWL у тебя же есть при вводе, отсекаешь два первых символа и все. Если для статистики, так считай ее в памяти, а потом сгенеренный репорт сохраняй. В базе хpанить все данные для репортов не очень хорошо.

Да как сделатьв запросе отсекание двух символов?

TRANSFORM Count(QSO.date_time) AS [Count-date_time]
SELECT QSO.locator, Count(QSO.date_time) AS cntTotal
FROM QSO
WHERE (((QSO.[ContestNR])>-1) AND ((QSO.[operator])='UR5FCM') AND ((QSO.[locator])>''))
GROUP BY QSO.locator
PIVOT Val(Band);

**RX1AL** · 12.04.2009, 03:30

Элементарно, Ватсон... Есть команда SELECT SUBSTR(<твое поле>, Х, Y) , где Х - стартовая позиция, а Y - длина.
Имеем SELECT SUBSTR(QSO.locator, 1, 2) и всё. Можешь завести себе алиас - SELECT SUBSTR(QSO.locator, 1, 2) AS CQField, если надо.

Для Access в твоем случае, я не знаю какая у тебя версия (так как SUBSTR только в 2003 или 2007 есть), есть альтернатива - использовать RIGHT или LEFT для отсечки. То есть для тебя LEFT(YourField, 2) в селекте. Либо используй MID() с теми же параметрами, что и для SUBSTR().

PS Пора тебе и в T-SQL или ANSI-92 окунуться...