unit MDIClass;
interface
uses
//----------------------------------------------------------------------------
//local
//----------------------------------------------------------------------------
GenDefs,Graphs,OwnUtils,
//----------------------------------------------------------------------------
//global
//----------------------------------------------------------------------------
ComCtrls,ExtCtrls,Graphics,Forms,Types;
type
TDocument= class(TObject)
Processor:JString;
filelength:integer;
KeyVerbs:PAnsiChar;
ReturnValue:integer;
Source: array of TSources;
CNav,CSem,CMes,CFun,Cattr:PAnsiChar;
NavL,SemL:PLongTexts;
Fnr:integer;
GC,GD:TGraph;
TFrame1,TFrame2,TProc:integer;
Previewrepresentation:boolean;
public
constructor create();
destructor Destroy;override;
end;
var
MDI:TDocument;
implementation
//------------------------------------------------------------------
//TDocument
//
//------------------------------------------------------------------
constructor TDocument.create;
begin
GC.Free;
GD.Free;
Previewrepresentation:=false;
inherited create();
end;
//------------------------------------------------------------------
//TDocument
//
//------------------------------------------------------------------
destructor TDocument.Destroy;
begin
inherited Free;
end;
//------------------------------------------------------------------
//--
//Ende dieser Quelle --
//--
//------------------------------------------------------------------
end.
¤ Dauer der Verarbeitung: 0.13 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|