CodePudding user response:
Yes, what is this charge don't come to this,What seems a self-help custom website, such as you don't see,
CodePudding user response:
What self-build? Sick!!!! See things only see the surface, to download used to write programs that can go up,CodePudding user response:
CodePudding user response:
Sorry, this is its development environment IDE,{
This is an automatically generated by the IDE source example
You can on this basis, modify, or create a new empty document or press Shift + Ctrl + M to generate an empty document, can modify the
in the options menu}
The unit Unknow;
Interface
USES the
SysUtils, Classes, DB.
Type
WMain=class
Private
FPath: string=';
FContent: string=';
Public
//the constructor and fictitious function has no parameters, there is only one, please do not directly call
The constructor Create; Override.
The destructor Destroy; Override.
Procedure Parser. Virtual;
The property Content: string read FContent;
end;
Implementation
Var
Main: WMain;
{WMain}
//this function is called directly by the compiler
The constructor WMain. Create;
The begin
FPath:=Application. The Path;
end;
//this function is called directly by the compiler
Destructor WMain. Destroy;
The begin
end;
Procedure WMain. Parser;
The begin
FContent:='hello world';
end;
Start
//output from here on in, can use HTML & lt; ? ?> Including up
//open debug start
The Main. The Parser;
Writeln (Main Content);
//open end debug
Initialization
//disable debug
//if enabled the buffer, only load the document for the first time will call
//initialize unit
//call the New function after the compiler will invoke the Create;
New (Main);
Finalization
//disable debug
//release unit
//call Disp function after the compiler will call Destroy;
Disp (Main);
end.
CodePudding user response:
Development program must use your client to run, I hope you are making, really free,
CodePudding user response:
Pascal language extensions? Rare oh,,CodePudding user response:
You are using is PascalScript controlCodePudding user response:
I also released a: direct support interface (form)http://211.162.123.246:443/httpdisk/haitaosoft/? App=delphiscript
CodePudding user response: