Недавно добавленные исходники
• Animation Loaders 685 • DeLiKaTeS Tetris (Тетрис) 5 691 • TDictionary Custom Sort 7 648 • Fast Watermark Sources 7 337 • 3D Designer 10 545 • Sik Screen Capture 7 862 • Patch Maker 8 083 • Айболит (remote control) 8 146 • ListBox Drag & Drop 6 941 • Доска для игры Реверси 100 140 • Графические эффекты 8 204 • Рисование по маске 7 603 • Перетаскивание изображений 6 205 • Canvas Drawing 6 574 • Рисование Луны 6 494 • Поворот изображения 5 677 • Рисование стержней 4 599 • Paint on Shape 3 296 • Генератор кроссвордов 4 284 • Головоломка Paletto 3 425 • Теорема Монжа об окружностях 4 245 • Пазл Numbrix 2 753 • Заборы и коммивояжеры 3 658 • Игра HIP 2 464 • Игра Go (Го) 2 445 • Симулятор лифта 2 857 • Программа укладки плитки 2 293 • Генератор лабиринта 3 017 • Проверка числового ввода 2 516 • HEX View 2 923

Главная

Исходники (более 1 300 примеров)

Компоненты

Форум

Как узнать адрес LPT-порта

Эта функция работает в Win95 и Win98.

function GetPortAddress(PortNo: integer): word; assembler; stdcall;
asm
  push es
  push ebx
  mov ebx, PortNo
  shl ebx,1
  mov ax,40h // Dos segment adress
  mov es,ax
  mov ax,ES:[ebx+6] // get port adress in 16Bit way :)
  pop ebx
  pop es
end;

Как узнать адрес LPT-порта

Похожие по теме исходники