Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Прозрачность TextBox / 10 сообщений из 10, страница 1 из 1
31.12.2008, 04:29
    #35742333
sadem
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
Подскажите как сделать фон TextBox прозрачным в VB6 (требуется чтобы виднелась картинка за ним). Либо подскажите, как исправить проблему с отображением русских букв в TextBox из набора Microsoft Forms 2.0 Object Library (файл FM20.dll, идет с Ms Office'ом, лежит в папке system32), т.к. в этой библиотеке уже есть TextBox со свойством прозрачности. Эти вопросы поднимались и ранее, но ответа на них я так и не нашел.
...
Рейтинг: 0 / 0
31.12.2008, 15:33
    #35742754
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
TextBox прозрачный
где то было дома посмотрю
...
Рейтинг: 0 / 0
31.12.2008, 16:44
    #35742793
sadem
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
michael R, буду очень благодарен если найдете примерчик.

Немного добавлю насчет проблем с FM20.dll, русский текст можно исправить по команде TextBox.Font.Charset = 255 и далее прописывать текст TextBox.Text="", однако это исправляет кодировку только при вводе данных в TextBox только из кода программы. Если вводить текст с клавиатуре в запущенной программе, то русская кодировка все-равно выводит иероглифы.
...
Рейтинг: 0 / 0
31.12.2008, 20:11
    #35742862
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
вот пример
думаю что с буквами тоже можно решить

С Новым Годом
...
Рейтинг: 0 / 0
31.12.2008, 20:36
    #35742870
sadem
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
michael R, спасибо, то что надо, но не совсем. Дело в том, что мне необходима постоянная прозрачнось TextBox, не только когда этот элемент неактивен, но и при вводе в него с клавиатуры, когда программа работает. В Вашем же примере, как только начинаешь ввод текста в TextBox, фон становится белым и снова приходится наживать клавишу, чтобы придать прозрачность. Можно конечно тупо постоянно запускать процедуру прозрачности TextBoxTrans (например через Timer), однако при этом возникает мерцание и вся система начинает притормаживать. Как решить эту проблему?

Небольшое замечание по поводу иероглифов в русской раскладке в TextBox в FM20.dll: на одном из форумов было предложение воспользоваться функцией LoadKeyboardLayout, ничего не вышло, использовал следующие параметры:

Private Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long

в теле программы: LoadKeyboardLayout "00000419", 1
...
Рейтинг: 0 / 0
04.01.2009, 14:13
    #35744106
sadem
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
Ну что, больше ни у кого нет предложений. А если поставить вопрос немного шире: как сделать любой контрол прозрачным TextBox, ComboBox, CommandButton и т.д. Постоянная прорисовка фона не выход. Можно ли как-нибудь добавить само свойство прозрачности для контрола, например, как это имеет элемент Label - свойство BackStyle=0?
...
Рейтинг: 0 / 0
28.10.2009, 10:47
    #36276411
winww
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
Всем привет!

Гулг мне не помог (( Нашел тему на вашем форуме!

Как все таки решить проблему с кодировкой в VB6 c MS Forms 2.0? (FM20.dll)

Добавляю textBox или ComboBox. Когда пишешь в русской раскладке, то поле заполняется палочками, или иероглифами, в зависимости от выбранного шрифта.
А вот если в коде написать textBox.text="Привет" то текст отображается нормально!

Товарищи!!!! может кто знает как решить эту проблему??
...
Рейтинг: 0 / 0
28.10.2009, 13:04
    #36277018
Настенька
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
Да, хороший вопрос. тожа попробовала из forms2 взять тексбокс, там действительно то палки, то иероглифы вместо русских букв. Очень интересный вопрос. Он по ходу так и останется открытым.
...
Рейтинг: 0 / 0
28.10.2009, 13:11
    #36277060
Настенька
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
Ура, я нашла ответ. юзаем текстбокс из forms2. далее в коде пишем:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)


Private Sub TextBox1_KeyPress(KeyAscii As MSForms.ReturnInteger)
    Dim b() As Byte, a As String, s As String, iKeyCode As Integer
    a = ChrW(KeyAscii)
    b = StrConv(a, vbUnicode)
    CopyMemory iKeyCode, b( 0 ),  2 
    KeyAscii = iKeyCode 'AscW(ChrW(iKeyCode))
End Sub
...
Рейтинг: 0 / 0
28.10.2009, 15:31
    #36277633
winww
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прозрачность TextBox
Настенька

Спасибо! Работает) Но правда если контролов много для каждого придется писать обработчик, хотя можно и массив элементов делать..
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Прозрачность TextBox / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]