Отловить движение курсора, диалоговые сообщения.

[Deight]

1.Как отловить перемещение курсора вне программы, и узнать его положение?
2.Как предотвратить появление окна об ошибке если знать его заголовок и текст сообщения?

[Terran]

1.Как отловить перемещение курсора вне программы, и узнать его положение?

Попробуйте так, я этот код написал на скорую руку. Если понадобится, то оптимизируйте его:

Var
X,Y: Integer;
T: TPoint;
Procedure TForm1.Timer1Timer(Sender: TObject);
Begin
GetCursorPos(T);
Edit1.Text:=IntToStr(T.X);
Edit2.Text:=IntToStr(T.Y);
If (T.X=X) And (T.Y=Y) Then
Begin
Label1.Caption:='Курсор не двигается';
End;
If (T.X<>X) And (T.Y<>Y) Then
Begin
Label1.Caption:='Курсор двигается';
End;
End;
Procedure TForm1.Timer2Timer(Sender: TObject);
Begin
X:=T.X;
Y:=T.Y;
End;

2.Как предотвратить появление окна об ошибке если знать его заголовок и текст сообщения?

Можно сделать так:

Var
H: HWnd;
Begin
H:=FindWindow(Nil, 'Заголовок окна');
If H=0 Then
Exit;
ShowMessage('Окно появилось');
End;

[Stilet]

Можно сделать так:

По-моему это не сработает. Самое лучшее средство это заNOPить MessageBoxA прям в экзешнике.

[Deight]

Что значит заNOPить?
А как-нибудь с помощью tmessage можно один из этих вопросов решить?

[mihali4]

1.Как отловить перемещение курсора вне программы, и узнать его положение?

Вам уже дали правильный ответ.

2.Как предотвратить появление окна об ошибке если знать его заголовок и текст сообщения?

"знать его заголовок и текст сообщения" совершенно не обязательно. То место в программе, где возможно появление ошибки, обложите try..except.

[Deight]

Ошибка не в моей программе возникает.

[Stilet]

Что значит заNOPить?

Ну изменить код Экзешника, убрав вызов процедуры отображения сообщения...

А как-нибудь с помощью tmessage можно один из этих вопросов решить?

Для начала узнай класс окна того сообщения скажем с помошью WinSight или SpyXX. Потом уж можно будет ему посылать нажатие клавиши если оно вылезет.

Но подумай коли программа неверно работает то и результат может давать неверный, разве это хорошо? Тряси автора дабы он ее переработал

[Deight]

А возможно не закрывать уже открывшееся сообщение, так я уже делал, а не дать ему вообще появиться или хотя-бы от звука характерного избавиться.

[Stilet]

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

Ок. расскажу как делаю я.
Есть у нас одна прожка, которая малость достает своими окнами сообщений, причем не ошибками а пустячными сообшениями. Ессно она в Экзе файле. Я беру OllyDebuger, открываю ее в нем, и нахожу вызов функции MessageBoxA. Вид которого будет примерно такой:

/*4040F6*/  PUSH    0
/*4040F8*/  PUSH    d21.0045E074
/*4040FD*/  PUSH    d21.0045E054
/*404102*/  PUSH    0
/*404104*/  CALL    <JMP.&user32.MessageBoxA>

Это вызов пресловутого окна сообшений.
Начинаю редактировать и вместо этих команд пишу команды NOP (ниче не делать) сабо самой после сохранения файла сообщение исчезает, как будто его и не было.

P.S. На всякий случай скажу - это не хакерство и не взлом, просто когда у авторов ручки кривые, а пользователи потом с мигренью и подарками ко мне приходят (типа выручай, ато апстену пора) я ну очень добренький становлюсь

[Deight]

Лабогадорю, Можно только ссылочку на olldebuger, если не сложно.