Лечится или нет?

← →
Кудесник © (2004-12-24 12:14) [0]

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

← →
Кудесник © (2004-12-24 12:18) [1]

Извиняюсь... система WinXPюндель... %)

← →
PVOzerski © (2004-12-24 12:20) [2]

Интересно, если написать прогу под DOS, перехватить в ней "мышиное" прерывание $33 и вызвать из нее "проблемную "прогу? Всего несколько строчек на TP - можно и попробовать.

← →
wal © (2004-12-24 12:23) [3]

В ярлыке поиграться на предмет "Выделение мышью" или как-то так?

С уважением.

← →
Кудесник © (2004-12-24 12:24) [4]

Пока думаете, устанавлю секретарю VirtualPC с Win98... :)

← →
Кудесник © (2004-12-24 12:25) [5]

> wal © (24.12.04 12:23) [3]
> В ярлыке поиграться на предмет "Выделение мышью" или как-то

Пробовал... и так и сяк... сдвиг - и нет проги...

← →
wal © (2004-12-24 12:38) [6]

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

С уважением.

← →
PVOzerski © (2004-12-24 12:46) [7]

{$M 2048,0,0}
program killmous;
uses
DOS;
var
intvec:array[0..$ff]of pointer absolute 0:0;
oldvalue:pointer;
i:integer;
s:string;
procedure dummy;interrupt;
begin
end;
begin
if paramcount=0 then
begin
writeln("usage killmous <application> [<parameters>]");
halt(1);
end;
s:="";
for i:=2 to paramcount do
s:=s+paramstr(i)+" ";
oldvalue:=intvec[$33];
intvec[$33]:=@dummy;
swapvectors;
exec(paramstr(1),s);
swapvectors;
intvec[$33]:=oldvalue;
end.

Если не поможет - дело не в самой проге.
ЗЫ. (C) PVOzerski 24.12.2004, компилируется на TP7 (видимо, и на более ранних), протестировано на Norton Commander - мышь "прибивалась" полностью.

← →
PVOzerski © (2004-12-24 12:47) [8]

Правда, в NT4 :^)

← →
TUser © (2004-12-24 12:48) [9]

Вообще, некоторые ДОСовские программы аод ХР не пущаются. Я помню долго пытались запустить программу, которая через COM-порт девайсом рулила - потом плюнули сделали дискету-бутявку с ДОСом и этой программой (Вот такие маленькие проги когда-то были :).

← →
Mike Kouzmine © (2004-12-24 12:49) [10]

Попропуй установить совместимость с 95

← →
Кудесник © (2004-12-24 12:53) [11]

> wal © (24.12.04 12:38) [6]
> Там еще в комплекте с виндой какие-то тулзы для совместимости
> должны быть. Не пробовал?

> Mike Kouzmine © (24.12.04 12:49) [10]
> Попропуй установить совместимость с 95

Пробовал... Ни разу ещё не помогало... и этот случай не исключение.

← →
Кудесник © (2004-12-24 12:55) [12]

> PVOzerski © (24.12.04 12:47) [8]
> Правда, в NT4 :^)

Там эта прога тоже работать будет... т.к. работает во всех виндах до Win2k Server включительно...

← →
PVOzerski © (2004-12-24 12:57) [13]

Дык проверь мой код-то :^). Хуже-то он явно не сделает.

Вот дожились - код дают, а они не берут :)

> Val © (24.12.04 13:45) [14]
> Вот дожились - код дают, а они не берут :)

Кто б его ещё откомпелил... а то у меня паскакаля на работе нет... %)

Ты б хоть E-Mail дал... Не в форум же бинарник выкладывать.

> PVOzerski © (24.12.04 14:35) [16]
> Ты б хоть E-Mail дал... Не в форум же бинарник выкладывать.

MyTmpMail на mail.ru

> Agent13 © (24.12.04 14:40) [17]
> А в чём проблема? Выдери из компа мышь, и научи секретаря
> работать без неё :)

Установил Virtual PC... Секретарь в трансе, что надо ещё один ярлык запомнить, одну иконку в трее и пару пунктов меню... %)

> PVOzerski © (24.12.04 14:35) [16]
> Ты б хоть E-Mail дал... Не в форум же бинарник выкладывать.

Хотя ладно, скоро уже домой, сам дома откомпилю... пока на виртуале поделает.

Лечится или нет? Найти похожие ветки