질문 올리기도 민망해서 계속 여기저기 수십번 게시판 뒤져보고
올리는것이거든요..
알아먹지 못하는 영어로 된 도움말도 뒤져보고..
너그러이..용서하시고.. 도움 부탁드립니다.
델.. 7 훨씬 이전 버젼에서 문제없이 컴파일 되던것이었는데요
델 7 로 바꾸면서 아래와 같은 에러가 납니다.
소스1
function RD.Nvl(sStr:Variant):string;
begin
if sStr =null then
Result := ''
else
Result := sStr;
end;
에러1:
[Error] Rd.pas(159): Undeclared identifier: 'null'
system 유닛에서 잘못 정의되어있다고 어느분이
답변주셨는데.. system 유닛을 보려면 어딜 보져..T.T
너무 바보같은 질문인가요?
소스 2
if not OpenPrinter(ADevice, HPrt, nil) then
begin
Result := False;
Exit;
end;
에러2
[Error] List.pas(146): Types of actual and formal var parameters must be identical
소스 2부분 설명드릴 려고 합니다....
아마도 HPrt 의 변수를 선언 하실 때 Integer로 선언 하신것 같네여.....
uses 절에 있는 WinSpool의 OpenPrinter의 함수를 보시면
function OpenPrinter(pPrinterName: PChar; var phPrinter: THandle; pDefault: PPrinterDefaults): BOOL; stdcall;
로 나와 있을 것입니다... 여기서 var phPrinter의 선언이 THandle로 되어 있음다.
그러면 THandle이라면 HPrt 또한 THandle로 선언 되어야지만 될것입니다....
도움이 되었는지 모르겠네여....즐코 하셈..