TextBox эмулятор.

[Джеффи]

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

[GM]

Юзать Richtextbox
А если серьйозно, то создать свою каретку с помощью CreateCaret, потом ловить keydown, или keyup и т.д.

[GSerg]

Не надо ничего изобретать. Система и так посылает сообщения с той самой частотой.

Код: Выделить всё

Option Explicit

Private Sub Picture1_KeyPress(KeyAscii As Integer)
  If Picture1.CurrentX + Picture1.TextWidth(Chr$(KeyAscii)) >= Picture1.Width Then Picture1.Print
  Picture1.Print Chr$(KeyAscii);
End Sub

[Джеффи]

А если я не использую конролы ваще?

То есть ловлю нажатия вне формы, с помощью API...

[tyomitch]

А если я не использую конролы ваще?

То есть ловлю нажатия вне формы, с помощью API...

Если с помощью GetAsyncKeyState, то сам виноват
Ставь хук, ему нажатия должны приходить уже автоповторённые.

[Джеффи]

А если я не использую конролы ваще?

То есть ловлю нажатия вне формы, с помощью API...

Если с помощью GetAsyncKeyState, то сам виноват
Ставь хук, ему нажатия должны приходить уже автоповторённые.

Поподробнее

[Джеффи]

Помогите мне плиз.

[FaKk2]

Куда подробней? Алгоритм такой примерно:

1. Таймером ловить нажатия кнопок используя GetAsyncKeyState, GetKeyboardState
2. Использую тот же АПИ рисовать самому текстовое поле и писать в нем пойманные символы.

По всем пунктам RTFMь в Инете.

[Джеффи]

А примерчик???=)

Просто необходимо чтобы задержка перед повтором и скорость повтора совпадали с настройками в Windows.