mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-05 10:11:04 +01:00
+ A few adaptations, all implemented classes should be there
This commit is contained in:
parent
5e622e60c0
commit
3e9facf089
@ -1,7 +1,6 @@
|
|||||||
%!PS-Adobe-2.0
|
%!PS-Adobe-2.0
|
||||||
%BoundingBox: 0 0 2000 3200
|
%BoundingBox: 0 0 2000 3200
|
||||||
%%DocumentPaperSizes: a4
|
%%DocumentPaperSizes: a3
|
||||||
%!
|
|
||||||
%
|
%
|
||||||
% $Id$
|
% $Id$
|
||||||
%
|
%
|
||||||
@ -11,6 +10,12 @@
|
|||||||
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
% Configurable section
|
% Configurable section
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
|
% Print head classes on separate pages ?
|
||||||
|
% 1=yes 0=no
|
||||||
|
/SeparatePages {
|
||||||
|
0 % 1
|
||||||
|
} def
|
||||||
|
|
||||||
% sets the line width of the class graph to 0.5 points
|
% sets the line width of the class graph to 0.5 points
|
||||||
/SetLineWidth { 0.5 setlinewidth} def
|
/SetLineWidth { 0.5 setlinewidth} def
|
||||||
|
|
||||||
@ -390,8 +395,10 @@ setfont
|
|||||||
} def
|
} def
|
||||||
|
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
% Title
|
% Footer.
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
|
/printfooter
|
||||||
|
{
|
||||||
/Helvetica-BoldOblique findfont
|
/Helvetica-BoldOblique findfont
|
||||||
% first draw outline, only then fill it up.
|
% first draw outline, only then fill it up.
|
||||||
% Needed because after stroke no rmoveto ??
|
% Needed because after stroke no rmoveto ??
|
||||||
@ -410,7 +417,7 @@ setfont
|
|||||||
setfont
|
setfont
|
||||||
0 0 0 setrgbcolor
|
0 0 0 setrgbcolor
|
||||||
(Object Chart) show
|
(Object Chart) show
|
||||||
|
} def
|
||||||
|
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
% here the class tree follows
|
% here the class tree follows
|
||||||
@ -427,6 +434,8 @@ setfont
|
|||||||
(Exception) Missing newchildclass
|
(Exception) Missing newchildclass
|
||||||
(EAbort) Incomplete newchildclass
|
(EAbort) Incomplete newchildclass
|
||||||
(EAbstractError) Ready newclass Linuxonly
|
(EAbstractError) Ready newclass Linuxonly
|
||||||
|
(EAccessViolation) Ready newclass
|
||||||
|
(EBitsError) Ready newclass
|
||||||
(EConvertError) Ready newclass
|
(EConvertError) Ready newclass
|
||||||
(EDatabaseError) Missing newclass Linuxonly
|
(EDatabaseError) Missing newclass Linuxonly
|
||||||
(EDBCLient) Missing newchildclass
|
(EDBCLient) Missing newchildclass
|
||||||
@ -444,8 +453,10 @@ setfont
|
|||||||
onelevelback
|
onelevelback
|
||||||
(EInOutError) Ready newclass
|
(EInOutError) Ready newclass
|
||||||
(EInvalidCast) Ready newclass
|
(EInvalidCast) Ready newclass
|
||||||
|
(EInvalidOperation) Ready newclass
|
||||||
(EInvalidPointer) Ready newclass
|
(EInvalidPointer) Ready newclass
|
||||||
(EDSWriter) Missing newclass
|
(EDSWriter) Missing newclass
|
||||||
|
(EListError) Ready newclass
|
||||||
(EMathError) Ready newclass
|
(EMathError) Ready newclass
|
||||||
(EInvalidOp) Ready newchildclass
|
(EInvalidOp) Ready newchildclass
|
||||||
(EOverflow) Ready newclass
|
(EOverflow) Ready newclass
|
||||||
@ -453,6 +464,22 @@ setfont
|
|||||||
(EZeroDivide) Ready newclass
|
(EZeroDivide) Ready newclass
|
||||||
onelevelback
|
onelevelback
|
||||||
(EOutOfMemory) Ready newclass
|
(EOutOfMemory) Ready newclass
|
||||||
|
(EOutOfResources) Ready newchildclass
|
||||||
|
onelevelback
|
||||||
|
(EResNotFound) Ready newclass
|
||||||
|
(EStreamError) Ready newclass
|
||||||
|
(EFCreateError) Ready newchildclass
|
||||||
|
(EFilerError) Ready newclass
|
||||||
|
(EClassNotFound) Ready newchildclass
|
||||||
|
(EInvalidImage) Ready newclass
|
||||||
|
(EMethodNotFound) Ready newclass
|
||||||
|
(EReadError) Ready newclass
|
||||||
|
(EWriteError) Ready newclass
|
||||||
|
onelevelback
|
||||||
|
(EFOpenError) Ready newclass
|
||||||
|
onelevelback
|
||||||
|
(EStringListError) Ready newclass
|
||||||
|
(EThread) Ready newclass
|
||||||
onelevelback
|
onelevelback
|
||||||
(OutlineError) Missing newclass
|
(OutlineError) Missing newclass
|
||||||
|
|
||||||
@ -460,29 +487,41 @@ setfont
|
|||||||
% Some more base classes
|
% Some more base classes
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
newcolumn
|
newcolumn
|
||||||
|
(TBits) Untested newclass
|
||||||
|
(TCollection) Untested newclass
|
||||||
|
(TCollectionItem) Untested newclass
|
||||||
|
(TFiler) Untested newclass
|
||||||
|
(TReader) Untested newchildclass
|
||||||
|
(TWriter) Untested newclass
|
||||||
|
onelevelback
|
||||||
(TInterface) Missing newclass % 40 mm newclassxmoved
|
(TInterface) Missing newclass % 40 mm newclassxmoved
|
||||||
(TIAddInNotifier) Missing newchildclass
|
(TIAddInNotifier) Missing newchildclass
|
||||||
onelevelback
|
onelevelback
|
||||||
|
|
||||||
%restoreoldxy
|
|
||||||
(TInterfacedObject) Missing newclass
|
(TInterfacedObject) Missing newclass
|
||||||
|
|
||||||
(TList) Ready newclass
|
(TList) Ready newclass
|
||||||
(TLookupList) Missing newclass
|
(TLookupList) Missing newclass
|
||||||
|
|
||||||
(TPropertyEditor) Missing newclass %40 mm newclassxmoved
|
(TPropertyEditor) Missing newclass %40 mm newclassxmoved
|
||||||
(TClassProperty) Missing newchildclass
|
(TClassProperty) Missing newchildclass
|
||||||
(TFontProperty) Missing newchildclass
|
(TFontProperty) Missing newchildclass
|
||||||
|
onelevelback
|
||||||
|
(TComponentProperty) Missing newclass
|
||||||
onelevelback
|
onelevelback
|
||||||
(TComponentProperty) Missing newclass
|
|
||||||
onelevelback
|
|
||||||
% remove a childy coordinate
|
|
||||||
%restoreoldxy
|
|
||||||
(TRegistry) Missing newclass
|
(TRegistry) Missing newclass
|
||||||
(TRegIniFile) Missing newchildclass
|
(TRegIniFile) Missing newchildclass
|
||||||
onelevelback
|
onelevelback
|
||||||
|
(TRTLCriticalSection) Untested newclass
|
||||||
(TSessionList) Missing newclass
|
(TSessionList) Missing newclass
|
||||||
|
(TStream) Ready newclass
|
||||||
|
(TCustomMemoryStream) Ready newchildclass
|
||||||
|
(TMemorySTream) Ready newchildclass
|
||||||
|
onelevelback
|
||||||
|
(THandleStream) Ready newclass
|
||||||
|
(TFileStream) Ready newchildclass
|
||||||
|
onelevelback
|
||||||
|
(TResourceStream) Incomplete newclass
|
||||||
|
(TStringStream) Untested newclass
|
||||||
|
onelevelback
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
% Syncronization classes
|
% Syncronization classes
|
||||||
(TSyncroObject) Untested newclass
|
(TSyncroObject) Untested newclass
|
||||||
@ -495,6 +534,7 @@ onelevelback
|
|||||||
onelevelback
|
onelevelback
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
% Thread classes
|
% Thread classes
|
||||||
|
|
||||||
(TThread) Missing newclass
|
(TThread) Missing newclass
|
||||||
|
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
@ -507,16 +547,26 @@ newcolumn
|
|||||||
(TMetafileCanvas) Missing newclass
|
(TMetafileCanvas) Missing newclass
|
||||||
onelevelback
|
onelevelback
|
||||||
(TClipboard) Missing newclass
|
(TClipboard) Missing newclass
|
||||||
|
(TStrings) Untested newclass
|
||||||
|
(TStringList) Untested newchildclass
|
||||||
|
onelevelback
|
||||||
|
(TTextAttributes) Missing newclass
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
% TComponent classes
|
% TComponent classes
|
||||||
%%%%%%%%%%%%%%%%%%%%%%%
|
%%%%%%%%%%%%%%%%%%%%%%%
|
||||||
newcolumn
|
newcolumn
|
||||||
(TComponent) Untested newlargeheadclass
|
(TComponent) Untested newlargeheadclass
|
||||||
|
|
||||||
|
% Print footer and eject (last) page
|
||||||
|
printfooter
|
||||||
showpage
|
showpage
|
||||||
|
|
||||||
%
|
%
|
||||||
% $Log$
|
% $Log$
|
||||||
% Revision 1.10 1998-10-03 15:06:26 florian
|
% Revision 1.11 1998-10-04 13:37:50 michael
|
||||||
|
% + A few adaptations, all implemented classes should be there
|
||||||
|
%
|
||||||
|
% Revision 1.10 1998/10/03 15:06:26 florian
|
||||||
% + EInvalidCast added
|
% + EInvalidCast added
|
||||||
%
|
%
|
||||||
% Revision 1.9 1998/10/03 13:53:43 florian
|
% Revision 1.9 1998/10/03 13:53:43 florian
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user