mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-16 06:25:04 +08:00
42 lines
885 B
Plaintext
Executable File
42 lines
885 B
Plaintext
Executable File
-- File: TCollection_Array1Descriptor.cdl
|
|
-- Created: Wed Nov 25 10:02:32 1992
|
|
-- Author: Jean Pierre TIRAULT
|
|
-- <jpt@sdsun3>
|
|
---Copyright: Matra Datavision 1992
|
|
|
|
deferred class Array2Descriptor from TCollection
|
|
|
|
uses
|
|
Integer from Standard,
|
|
Address from Standard
|
|
|
|
is
|
|
Initialize (aLowerRow: Integer; aUpperRow: Integer;
|
|
aLowerCol: Integer; aUpperCol: Integer;
|
|
anAddress: Address);
|
|
|
|
UpperRow (me) returns Integer;
|
|
---Level: Advanced
|
|
|
|
LowerRow (me) returns Integer;
|
|
---Level: Advanced
|
|
|
|
UpperCol (me) returns Integer;
|
|
---Level: Advanced
|
|
|
|
LowerCol (me) returns Integer;
|
|
---Level: Advanced
|
|
|
|
Address(me) returns Address;
|
|
---Level: Advanced
|
|
|
|
fields
|
|
myAddress : Address;
|
|
myLowerRow : Integer;
|
|
myLowerCol : Integer;
|
|
myUpperRow : Integer;
|
|
myUpperCol : Integer;
|
|
|
|
|
|
end;
|