FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
necesito ayudacon este programa
hace uno meses enpece con delphi
tengo este codigo pero no se que le puedo colocar en uses Código:
var buf:array[0..511] of byte; c:char; j:word; r:register; begin r.ax:=$0201; //Read Cyl 0, Hd 0, Sec r.cx:=2; r.dx:=$80; r.bx:=ofs(buf); r.es:=seg(buf); intr($13,r); write(buf[0],’ ’,buf[1],’:’); // {display it} j:=2; while buf[j]<>0 do begin write(char(buf[j])); j:=j+1; end; writeln; write(’Do you want to erase the sector? ’); end. Última edición por dec fecha: 04-08-2007 a las 00:44:55. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Probad este programa para visualizar vuestros archivos con extensión 3ds | kakarotv5 | Gráficos | 0 | 26-02-2007 14:26:57 |
Necesito interbase para un programa con interbase | David | Conexión con bases de datos | 2 | 20-04-2006 00:23:55 |
Hola Es mi primer mensaje en este Foro y necesito ayuda para archivos XML | Juan_Carlos_P | Gráficos | 2 | 08-08-2005 19:11:17 |
Como realizo este programa? | Neo | Varios | 0 | 09-06-2003 18:08:55 |
|