Помогите переключить клаву программно.

28.07.2007, 17:46. **Показов** 1376. **Ответов** 11

Студворк — интернет-сервис помощи студентам

Привет всем кто откликнется!
В режиме проекта SQL запросы работают нормально, но стоит создать exe-file работает не понятно как.
Заранее всем благодарен.

@Леон · 28.07.2007, 17:55

Какая связь клавы с SQL запросами?
Уточни

28.07.2007, 19:05

Не правильно ищет данные, если они на русском.
Когда работаю с проектом, ищет всё нормально, а когда запускаю готовый EXE неправильно.
Обратил внимание, что вовремя работы с проектом,
если клава включена на русский всё хорошо, а когда запускаю EXE клава переключается на английский автоматически. Может я чего-то не понимаю, но мне кажется, если вписать при запуске в моей проге переключение клавы на русский, поможет.
Спасибо, что откликнулся.

@Alexey · 28.07.2007, 19:38

Пример есть здесь http://www.relib.com/code.asp?id=185 но тебе он врядли поможет, т.к. так не бывает, что раскладка клавиатуры влияет на работу приложения.

28.07.2007, 20:05

Попробовал этом пример вставить не помогло.
Может у кого ещё идеи или советы есть?
Заранее признателен.

@Alexey · 28.07.2007, 20:08

Так я ж тебе и говорю - не поможет. Что значит 'ведут не понятно как'? Приведи полный пример того, где у тебя проблема, тогда возможно станет яснее...

28.07.2007, 20:31

Вот полный пример.
Когда запускаю проект всё работает нормально.
Отбирает записи из базы как надо, хоть русские слова, хоть английские, а когда создаю EXE-file,
то начинает выкидывать лишние записи.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Private Sub txtName_Change()
    Dim lvwItem, cnt
    Dim db As Database, rs As Recordset
    Set db = OpenDatabase("C:\DataBase\Data\Data.mdb")
    
    Set rs = db.OpenRecordset("SELECT Name,Data1,Data2,Data3,Data4,Data5,Data6 FROM Films WHERE Name LIKE '' & txtName.Text & "*'')
    lvwData.ListItems.Clear
    cnt = 0
    With rs
       Do While Not .EOF
            cnt = cnt + 1
            Set lvwItem = lvwData.ListItems.Add(, , !Name)
            lvwItem.SubItems(1) = !Data1
            lvwItem.SubItems(2) = !Data2
            lvwItem.SubItems(3) = !Data3
            lvwItem.SubItems(4) = !Data4
            lvwItem.SubItems(5) = !Data5
            lvwItem.SubItems(6) = !Data6
            lblCount.Caption = cnt
            .MoveNext
        Loop
    End With
    
    rs.Close
    Set rs = Nothing
    db.Close
    Set db = Nothing
End Sub

А тот пример мне тоже пригодился, спасибо.

@Alexey · 28.07.2007, 20:42

Вроде бы все нормально на первый взгляд... Может кто-нибудь еще поглазастей попадется?

По крайней мере, разницы между отладкой и откомпилированным приложением не должно быть.

@borm · 29.07.2007, 11:47

А какие лишние записи находит? Может быть в этом есть какая-то зависимость?

@CyberSlider · 29.07.2007, 20:21

А кому ты запросы отсылаешь, SQL Server'у ?.. Если да, то у него есть тулза SQL Trace - ей можно посмотреть, что за запросы на сервер приходят...

29.07.2007, 21:32

Спасибо, что откликнулись.

1. Не, это не сервере всё ищет, просто в файле mdb.

2. В проекте работает, вводишь первую букву имени отбирает по ней все записи как надо, а когда создаю EXE-file ещё и лишние записи начинает показывать.

Может есть другой, какой способ отбора данных?
Если есть какие примерчики, может кто кинет.
Заранее благодарен.

06.08.2007, 12:56

SELECT DISTINCT .....
Попробуй, может поможет

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

Vlad2

	Помогите переключить клаву программно. 28.07.2007, 17:46. Показов 1376. Ответов 11 Метки нет (Все метки) Привет всем кто откликнется! В режиме проекта SQL запросы работают нормально, но стоит создать exe-file работает не понятно как. Заранее всем благодарен.

@Леон 0 / 0 / 1 Регистрация: 28.07.2007 Сообщений: 177
	28.07.2007, 17:55
	Какая связь клавы с SQL запросами? Уточни 0

Vlad2
	28.07.2007, 19:05
	Не правильно ищет данные, если они на русском. Когда работаю с проектом, ищет всё нормально, а когда запускаю готовый EXE неправильно. Обратил внимание, что вовремя работы с проектом, если клава включена на русский всё хорошо, а когда запускаю EXE клава переключается на английский автоматически. Может я чего-то не понимаю, но мне кажется, если вписать при запуске в моей проге переключение клавы на русский, поможет. Спасибо, что откликнулся.

@Alexey 0 / 1 / 3 Регистрация: 27.03.2012
	28.07.2007, 19:38
	Пример есть здесь http://www.relib.com/code.asp?id=185 но тебе он врядли поможет, т.к. так не бывает, что раскладка клавиатуры влияет на работу приложения. 0

Vlad2
	28.07.2007, 20:05
	Попробовал этом пример вставить не помогло. Может у кого ещё идеи или советы есть? Заранее признателен.

@Alexey 0 / 1 / 3 Регистрация: 27.03.2012
	28.07.2007, 20:08
	Так я ж тебе и говорю - не поможет. Что значит 'ведут не понятно как'? Приведи полный пример того, где у тебя проблема, тогда возможно станет яснее... 0

@Alexey 0 / 1 / 3 Регистрация: 27.03.2012
	28.07.2007, 20:42
	Вроде бы все нормально на первый взгляд... Может кто-нибудь еще поглазастей попадется? По крайней мере, разницы между отладкой и откомпилированным приложением не должно быть. 0

@borm 0 / 0 / 0 Регистрация: 16.07.2007 Сообщений: 458
	29.07.2007, 11:47
	А какие лишние записи находит? Может быть в этом есть какая-то зависимость? 0

@CyberSlider 0 / 0 / 1 Регистрация: 16.04.2007 Сообщений: 50
	29.07.2007, 20:21
	А кому ты запросы отсылаешь, SQL Server'у ?.. Если да, то у него есть тулза SQL Trace - ей можно посмотреть, что за запросы на сервер приходят... 0

Vlad2
	29.07.2007, 21:32
	Спасибо, что откликнулись. 1. Не, это не сервере всё ищет, просто в файле mdb. 2. В проекте работает, вводишь первую букву имени отбирает по ней все записи как надо, а когда создаю EXE-file ещё и лишние записи начинает показывать. Может есть другой, какой способ отбора данных? Если есть какие примерчики, может кто кинет. Заранее благодарен.

Ghost
	06.08.2007, 12:56
	SELECT DISTINCT ..... Попробуй, может поможет