Skocz do zawartości
Czarny Ass

[Pascal] Myszka!

Rekomendowane odpowiedzi

Chodzi ci o taką jak w windows?, poznaj najpierw DOSKONALE moduły graph i 13h, oraz crt.

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

w numerze 01/2001 CDA było o myszce w Pascalu

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Jeśli chcesz pobrać pozycję myszki musisz 'wciąć' assemblera w kod, coś w tym stylu (wklej to gdzieś w pętlę):

ASM

Mov Ax,03h

Int 33h

Mov mx,Cx

Mov my,Dx

end;

Potem operujesz na mx i my.

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Biblioteka Turbo Vision z tego co się orientuję posiada wbudowaną obsługę myszki, okienek dialogowych, form itp. rzeczy dla DOSa. Nie jest bardzo trudna (jak potrafisz ogarnąć WinAPI to Turbo Vision bez problemu ogarniesz ;> ) więc poradzisz sobie. Do wersji TP7 którą ja mam jest dołączonych dość dużo przykładów z użyciem Turbo Vision, jak nie masz to mogę Ci podesłać.

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Wpisuje do programu

ASM

Mov Ax,03h

Int 33h

Mov mx,Cx

Mov my,Dx

end;

 

Jak to wpisuje mam 17 błędów. Co mam teraz zrobić?

 

t.pas(10,7) Error: Unknown identifier AX

t.pas(10,10) Error: Unknown identifier H

t.pas(10,10) Error: Invalid reference syntax

t.pas(10,10) Error: No size specified and unable to determine the size of the operands

t.pas(10,10) Error: Asm: [mov mem32,mem32] invalid combination of opcode and operands

t.pas(11,7) Error: Unknown identifier H

t.pas(11,7) Error: Invalid reference syntax

t.pas(11,7) Error: Asm: [int mem??] invalid combination of opcode and operands

t.pas(12,7) Error: Unknown identifier MX

t.pas(12,8) Error: Unknown identifier CX

t.pas(12,8) Error: No size specified and unable to determine the size of the operands

t.pas(12,8) Error: Asm: [mov mem32,mem32] invalid combination of opcode and operands

t.pas(13,7) Error: Unknown identifier MY

t.pas(13,8) Error: Unknown identifier DX

t.pas(13,8) Error: No size specified and unable to determine the size of the operands

t.pas(13,8) Error: Asm: [mov mem32,mem32] invalid combination of opcode and operands

t.pas(16) Fatal: Unexpected end of file

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Jeśli chcesz dodać odpowiedź, zaloguj się lub zarejestruj nowe konto

Tylko zarejestrowani użytkownicy mogą komentować zawartość tej strony.

Zarejestruj nowe konto

Załóż nowe konto. To bardzo proste!

Zarejestruj się

Zaloguj się

Posiadasz już konto? Zaloguj się tutaj.

Zaloguj się tutaj

  • Przeglądający   0 użytkowników

    Brak zarejestrowanych użytkowników, przeglądających tę stronę.

×