Код: Выделить всё
procedure HideCursor1;
begin
asm
mov ah,1
mov ch,$20
int $10
end;
end;
procedure ShowCursor1;
begin
asm
mov ah,1
mov ch,5
mov cl,7
int $10
end;
end;Найден 1 результат
- 22.11.2007 01:41:25
- Форум: Free Pascal Compiler
- Тема: Проблемы. Ассемблер.
- Ответы: 12
- Просмотры: 10670
Проблемы. Ассемблер.
Мне в программе нужно убрать курсор. Во всех других компиляторах следующий код работает, а вот FPC нет