資源簡(jiǎn)介
app_yzgl.exe 護(hù)士分床、醫(yī)囑、打印等功能

代碼片段和文件信息
/*=====================================================
*??mHand?3.5??????????????????????????????????????????*
*?????????????????????????????????????????????????????*
*??PowerBuilder?Expand?Function?Dynamic?link?Library??*
*??Created?:?1996.01.16???Last?Modified?:?1999.08.03??*
*?????????????????????????????????????????????????????*
*??????????????????-?Jianhui.Wang??(?TianJin?CHINA?)??
*
=====================================================*/
#include?
#ifdef?_DEBUG
class?CDebug
{
private:
static?void?ReportValue(LPSTR);
public:
static?void?WatchValue(LPSTR);
static?void?WatchValue(WORD);
};
#endif
extern?“C“
BOOL?APIENTRY?DllMain(HANDLE?hModuleDWORD?ul_reason_for_callLPVOID?lpReserved)
{
????return?TRUE;
}
int?WINAPI?SetPaperSize(WORD?nWidthWORD?nHeightWORD?nOrient)
{
#define?ExpectA3?((nWidth==2970)&&(nHeight==4200))
#define?ExpectA4?((nWidth==2100)&&(nHeight==2970))
#define?ExpectB5?((nWidth==1820)&&(nHeight==2570))
HKEY?hRegKey;
char?szPrinterKey[100]=“System\\CurrentControlSet\\Control\\Print\\Printers\\“;
char?szDeviceName[40]szPort[40];
DWORD?cbBuffer;
DWORD?dwRV;
DWORD?dwPapers;
WORD?lpwPapers[256];
BOOL?fSupportUserDefind=FALSEfSupportA3=FALSEfSupportA4=FALSEfSupportB5=FALSE;
HANDLE?hDriver;
HGLOBAL?hMem;
LPDEVMODE?lpDevMode;
//取當(dāng)前默認(rèn)打印機(jī)設(shè)備名
RegOpenKey(HKEY_CURRENT_CONFIG“System\\CurrentControlSet\\Control\\Print\\Printers“&hRegKey);
cbBuffer=sizeof(szDeviceName);
dwRV=RegQueryValueEx(hRegKey“Default“NULLNULL(unsigned?char?*)szDeviceName&cbBuffer);
RegCloseKey(hRegKey);
if?(dwRV?!=?ERROR_SUCCESS)?return?-1;
//取打印機(jī)端口
RegOpenKey(HKEY_LOCAL_MACHINElstrcat(szPrinterKeyszDeviceName)&hRegKey);
cbBuffer=sizeof(szPort);
dwRV=RegQueryValueEx(hRegKey“Port“NULLNULL(unsigned?char?*)szPort&cbBuffer);
RegCloseKey(hRegKey);
if?(dwRV?!=?ERROR_SUCCESS)?return?-2;
//取打印機(jī)支持的全部紙型
dwPapers=DeviceCapabilitiesA(szDeviceNameszPortDC_PAPERS(LPTSTR)lpwPapersNULL);
if?((dwPapers?1)?||?(dwPapers?>?256))?return?-3;
//判斷打印機(jī)是否支持自定義、A3、A4、B5紙型
do
switch?(lpwPapers[--dwPapers])
{
case?DMPAPER_USER:
fSupportUserDefind=TRUE;
break;
case?DMPAPER_A3:
fSupportA3=TRUE;
break;
case?DMPAPER_A4:
fSupportA4=TRUE;
break;
case?DMPAPER_B5:
fSupportB5=TRUE;
break;
}
while?(dwPapers?>?0);
//取打印機(jī)的DeviceMode
if?(!?OpenPrinter(szDeviceName(LPHANDLE)&hDriverNULL))?return?-4;
hMem=GlobalAlloc(GPTRDocumentProperties(NULLhDriverszDeviceNameNULLNULL0));
lpDevMode=(LPDEVMODE)GlobalLock(hMem);
DocumentProperties(NULLhDriverszDeviceNamelpDevModeNULLDM_OUT_BUFFER);
//設(shè)置紙型或大小
switch?((ExpectA3?&&?fSupportA3)*1?+?(ExpectA4?&&?fSupportA4)*2?+?(ExpectB5?&&?fSupportB5)*3)
{
case?1:?//A3
lpDevMode->dmFields=DM_PAPERSIZE;
lpDevMode->dmPaperSize=DMPAPER_A3;
case?2:?//A4
lpDevMode->dmFields=DM_PAPERSIZE;
lpDevMode->dmPaperSize=DMPAPER_
?屬性????????????大小?????日期????時(shí)間???名稱(chēng)
-----------?---------??----------?-----??----
?????文件??????35840??2011-05-22?21:09??護(hù)士工作站\app_yzgl.exe
?????文件????????328??2010-11-17?11:15??護(hù)士工作站\BUTTON.INI
?????文件???????7258??2010-11-17?11:15??護(hù)士工作站\button.wav
?????文件??????????9??2010-11-17?11:15??護(hù)士工作站\Desktop_.ini
?????文件????????183??2010-11-17?11:15??護(hù)士工作站\DLLINIT.INI
?????文件???????1067??2010-11-17?11:15??護(hù)士工作站\eapagent.ini
?????文件???????7366??2010-11-17?11:15??護(hù)士工作站\function.wav
?????文件????????682??2010-11-17?11:15??護(hù)士工作站\Hisv3.ini
?????文件??????64512??2010-12-09?11:35??護(hù)士工作站\hsz_tjbb.pbd
?????文件??????95232??2011-01-04?10:27??護(hù)士工作站\hsz_tjbb.pbl
?????文件?????604672??2010-12-09?11:35??護(hù)士工作站\hsz_zby.pbd
?????文件????1014784??2011-01-04?10:27??護(hù)士工作站\hsz_zby.pbl
?????文件?????321832??2010-11-17?11:15??護(hù)士工作站\hzxx.bmp
?????文件????????519??2010-11-17?11:15??護(hù)士工作站\LICENSE.INI
?????文件?????????94??2010-11-17?11:15??護(hù)士工作站\loadif.ini
?????文件???????4102??2010-11-17?11:15??護(hù)士工作站\lost.wav
?????文件?????114688??2010-11-17?08:55??護(hù)士工作站\MessageBox.DLL
?????文件??????42576??2010-11-17?11:15??護(hù)士工作站\MFM1992
?????文件???????5830??2010-11-17?11:15??護(hù)士工作站\mHand.cpp
?????文件????????137??2010-11-17?11:15??護(hù)士工作站\mHand.def
?????文件??????49152??2010-11-17?08:55??護(hù)士工作站\networkaddress.dll
?????文件????????439??2010-11-17?11:15??護(hù)士工作站\pb.ini
?????文件????????417??2010-11-17?11:15??護(hù)士工作站\pbbbbb.ini
?????文件?????186880??2010-11-17?08:55??護(hù)士工作站\POWERPRN.dll
?????文件????????216??2010-11-17?11:15??護(hù)士工作站\print.ini
?????文件?????126976??2010-11-17?08:55??護(hù)士工作站\PrintCtrl.dll
?????文件?????126976??2010-11-17?08:55??護(hù)士工作站\PrintCtrl11.dll
?????文件?????????79??2010-11-17?11:15??護(hù)士工作站\PRINTER.INI
?????文件????????184??2010-11-17?11:15??護(hù)士工作站\QEDBF.INI
?????文件???????4006??2010-11-17?11:15??護(hù)士工作站\rb.wav
............此處省略10個(gè)文件信息
評(píng)論
共有 條評(píng)論