Var
aDevice, aDriver, aPort: PChar;
aHandle: THandle;
Begin
GetMem(aDevice, 50); // 50은 충분히 큰 값
GetMem(aDriver, 50);
GetMem(aPort, 50);
Printer.GetPrinter(aDevice, aDriver, aPort, aHandle);
PrintFileName:= StrPas(aPort);
FreeMem(aDevice);
FreeMem(aDriver);
FreeMem(aPort);
End;
별 문제 없는거 같은데요..
1111 님이 쓰신 글 :
:
:
:
:
:
:
: 프린터 드라이버값 얻을려고 uses printers; 를 선언하고
: printer.GetPrinter(prndevice, prndriver, prnport, prnhandle);
: showmessage(prndevice); 함수를 써서 prndevice의 값은 나오는데 prndriver,prnport는
: 값이 공백으로 나오네요 값을 구할려면 어떻게해야 하나요?
:
:
:
|