paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-09 00:39:33 +01:00
Code Issues Packages Projects Releases Wiki Activity

printers: less hints

Browse Source 
git-svn-id: trunk@35786 -
This commit is contained in:
mattias 2012-03-07 06:04:57 +00:00
parent 93ab0b45cd
commit 4307fe4272
2 changed files with 12 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
components/printers/unix/cupsdyn.pp
View File

@ -675,7 +675,8 @@ Type
{Format tags for attribute formats... {Format tags for attribute formats...
Mask for copied attribute values Mask for copied attribute values
Bitflag for copied attribute values } Bitflag for copied attribute values }
ipp_tag_t = (IPP_TAG_ZERO := $00, ipp_tag_t = (IPP_TAG_COPY := (-($7fffffff)) - 1,
IPP_TAG_ZERO := $00,
IPP_TAG_OPERATION, IPP_TAG_OPERATION,
IPP_TAG_JOB, IPP_TAG_JOB,
IPP_TAG_END, IPP_TAG_END,
@ -710,8 +711,8 @@ Type
IPP_TAG_LANGUAGE, IPP_TAG_LANGUAGE,
IPP_TAG_MIMETYPE, IPP_TAG_MIMETYPE,
IPP_TAG_MEMBERNAME, IPP_TAG_MEMBERNAME,
IPP_TAG_MASK := $7fffffff, IPP_TAG_MASK := $7fffffff
IPP_TAG_COPY := (-($7fffffff)) - 1); );
//Resolution units... //Resolution units...
ipp_res_t = (IPP_RES_PER_INCH := 3, ipp_res_t = (IPP_RES_PER_INCH := 3,
@ -1065,9 +1066,9 @@ var
//httpEncode64: function (out:Pchar; in:Pchar):Pchar;cdecl; //httpEncode64: function (out:Pchar; in:Pchar):Pchar;cdecl;
//httpDecode64: function (out:Pchar; in:Pchar):Pchar;cdecl; //httpDecode64: function (out:Pchar; in:Pchar):Pchar;cdecl;
httpGetLength: function (http:Phttp_t):longint;cdecl; httpGetLength: function (http:Phttp_t):longint;cdecl;
httpMD5: function (_para1:Pchar; _para2:Pchar; _para3:Pchar; _para4:TArrayChar32):Pchar;cdecl; httpMD5: function (_para1:Pchar; _para2:Pchar; _para3:Pchar; {%H-}_para4:TArrayChar32):Pchar;cdecl;
httpMD5Final: function (_para1:Pchar; _para2:Pchar; _para3:Pchar; _para4:TArrayChar32):Pchar;cdecl; httpMD5Final: function (_para1:Pchar; _para2:Pchar; _para3:Pchar; {%H-}_para4:TArrayChar32):Pchar;cdecl;
httpMD5String: function (_para1:Pmd5_byte_t; _para2:TArrayChar32):Pchar;cdecl; httpMD5String: function (_para1:Pmd5_byte_t; {%H-}_para2:TArrayChar32):Pchar;cdecl;
// //
// cups_ppd // cups_ppd

10
components/printers/unix/framepagesetup.pas
View File

@ -44,11 +44,11 @@ type
procedure cbPaperChange(Sender: TObject); procedure cbPaperChange(Sender: TObject);
procedure panPreviewResize(Sender: TObject); procedure panPreviewResize(Sender: TObject);
procedure pbPreviewMouseDown(Sender: TObject; Button: TMouseButton; procedure pbPreviewMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer); {%H-}Shift: TShiftState; {%H-}X, {%H-}Y: Integer);
procedure pbPreviewMouseWheelDown(Sender: TObject; Shift: TShiftState; procedure pbPreviewMouseWheelDown(Sender: TObject; {%H-}Shift: TShiftState;
MousePos: TPoint; var Handled: Boolean); {%H-}MousePos: TPoint; var Handled: Boolean);
procedure pbPreviewMouseWheelUp(Sender: TObject; Shift: TShiftState; procedure pbPreviewMouseWheelUp(Sender: TObject; {%H-}Shift: TShiftState;
MousePos: TPoint; var Handled: Boolean); {%H-}MousePos: TPoint; var Handled: Boolean);
procedure pbPreviewPaint(Sender: TObject); procedure pbPreviewPaint(Sender: TObject);
procedure radPortraitClick(Sender: TObject); procedure radPortraitClick(Sender: TObject);
private private