Форум программистов
 
О проблемах, например, с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Ответ
 
Опции темы
Старый 14.05.2020, 14:50   #1
Anonim95
Новичок
Джуниор
 
Регистрация: 14.05.2020
Сообщений: 1
По умолчанию хэндл ориентированный ввод/вывод

Помогите, пожалуйста, разобраться.
Что такое handle-ориентированный ввод/вывод?
Как показать, что в программе он действительно работает?

uses dos;
const msg: string=’textfile.txt$’;
str:string=’ string’;
var
buf:integer;
reg:registers;
begin
with reg do begin
AH:=$3C;
DS:=Seg(msg);
DX:=Ofs(msg[1]);
Intr($21,reg);
buf:=AX;
AH:=$40;
BX:=buf;
DS:=Seg(str);
DX:=Ofs(str[1]);
CX:=6;
Intr($21,reg);
AH:=$3E;
BX:=buf;
Intr($21,reg);
end
end.
Anonim95 вне форума Ответить с цитированием
Ответ

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите решить задачку C++: бесформатный ввод/вывод, форматный ввод/вывод david1506 Visual C++ 2 21.10.2015 09:03
Знаю хэндл окна и хэндл компонента, но не могу послать компоненту текст NetSpace Win Api 20 22.12.2014 21:09
Ввод-вывод Sparky Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 3 04.10.2009 12:15
Ввод-вывод в С++ StudentPolitech Помощь студентам 0 04.06.2009 19:07
Ввод и вывод Mihael-Vlz Паскаль, Turbo Pascal, PascalABC.NET 3 19.01.2009 18:00


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS
Здесь нужно купить рекламу за 7 тыс руб в месяц! )
пишите сюда - alarforum@yandex.ru
ИКС 840