![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Realmente Desesperado
function Tform1.capturapuerto :String;
var Device : array[0..255] of char; Driver : array[0..255] of char; Port : array[0..255] of char; hDMode : THandle; begin Printer.PrinterIndex := -1; // -1 o el que sea Printer.GetPrinter(Device, Driver, Port, hDMode); Result := Device+' Puerto: '+Port; Pues bien, esta funcion, con windows xp no me devuelve los puertos.Port no me devuelve nada. En win 98 me funcionaba correctamente Necesito que alguien pudiera ayudarme i me digera como puedo conseguir ahora el puerto. Lo he preguntado en muchos sitios, y ya estoy realmente desesperado. Muchas gracias de antemano Un saludo. |
|
|
![]() |
|