Vlad04: Значит в определении окна написано что-то подобное [quote .... TITLE "Трата та" ; ICON mainIco ;
rvu: Вставил CHILD у не главных окон и иконки пропали.
rvu: А как отменить закрытие окон по Alt+F4?
Dima: rvu При объявлении окна сделать например ON INTERACTIVECLOSE {|| .F. } PS Почитать что делает SET INTERACTIVECLOSE
rvu: Dima пишет: При объявлении окна сделать например ON INTERACTIVECLOSE {|| .F. } Не помогло...
rvu: Dima пишет: Почитать что делает SET INTERACTIVECLOSE Спасибо!
rvu: А можно делать окна с прокруткой? Хочу сделать большое окно, которое будет заведомо больше экрана.
SergKis: rvu пишет А можно делать окна с прокруткой?[pre2] [ VIRTUAL WIDTH <vWidth> ] ; [ VIRTUAL HEIGHT <vHeight> ] ; [/pre2]
SergKis: PS пример SAMPLES\BASIC\VIRTUALDIM
Andrey: Пример VirtualWinVscroll2 (События и обработчики событий в МиниГуи) в http://abonent4.ru/minigui/
rvu: SergKis пишет: пример SAMPLES\BASIC\VIRTUALDIM Уже смотрю. Пытаюсь понять для каких окон это подходит. Наивная попытка подставить к любому окну не удалась. ))
rvu: А как можно поменять сообщения, типа "Close not allowed" на свое? Посмотрел, оно берется из библиотеки minigui.lib
SergKis: rvu пишет А как можно поменять сообщения, типа Так _HMG_MESSAGE [3] := 'Close not allowed' см. h_init.prg PROCEDURE InitMessages
Dima: rvu пишет: Посмотрел, оно берется из библиотеки minigui.lib Лучше бы с помощью FAR поиск по сырцам устроил и вышел бы на _HMG_MESSAGE [3] := 'Close not allowed' как SergKis и ответил.
rvu: Вопрос такой: интерфейс программы должен быть на русском языке, но выводить информацию из базы она должна на любом языке, видимо, вплоть до китайского. Базы с информацией делаю в UTF-8, а саму программу как делать? Вопрос появился, собственно, потому что написал я пробную программу, сохранил файл программы в UTF-8, на экране вместо русского крякозябры. Способы, которыми решались проблемы с кодировками 1251 и 866 не помогают. Куда копать хоть? Искать дальше возможность написания текста программы в UTF-8 или писать ее в 1251, а потом искать, как в ней иностранный текст показывать?
gfilatov2002: rvu пишет: писать ее в 1251, а потом искать, как в ней юникодный текст показывать? Да. Посмотри готовый пример в папке samples\Advanced\PdfView - как в нем организован вывод интерфейсных строк на русском языке Подсказка: hb_Translate( cText, "UTF8", "CP1251" )
nick_mi: Мне кажется, или все же правда, что когда указать use ... codepage 'UTF8' то Harbour сам будет выполнять перекодировку меж базой и программой? и не надо никаких телодвижений с hb_Translate ?
SergKis: rvu пишет Искать дальше возможность написания текста программы в UTF-8 или писать ее в 1251 Если инф. в базе для разных языков возможна в одном поле, то решения нормального не будет, иначе: - если текст программы только на русском, оставляйте 1251. - базу не помечайте codepage 'UTF8', но инф. в ней utf8 (кодируем при записи из опред. языка) - декодируем по hb_Translate для нужного языка из опред. полей - для показа инф. языков создаем фонты с CHARSET и уст. фонт опред. языка контролу или колонке TsBrowse - если необходимо надписи\подсказки, то храним их в utf8 файлах (формата ini) с расширеинем языка .RU, .LT, .EN, ...
SergKis: PS Пример по исп. CHARSET фонтов тут https://my-files.ru/dofcn3 Пост 1940 из темы http://clipper.borda.ru/?1-1-0-00000532-000-60-0-1533019939