mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 12:49:42 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			23 lines
		
	
	
		
			402 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			23 lines
		
	
	
		
			402 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
program tpiprohtmltree;
 | 
						|
 | 
						|
{$mode objfpc}{$H+}
 | 
						|
 | 
						|
uses
 | 
						|
  {$IFDEF UNIX}{$IFDEF UseCThreads}
 | 
						|
  cthreads,
 | 
						|
  {$ENDIF}{$ENDIF}
 | 
						|
  Interfaces, // this includes the LCL widgetset
 | 
						|
  Forms, htmain
 | 
						|
  { you can add units after this };
 | 
						|
 | 
						|
{$R *.res}
 | 
						|
 | 
						|
begin
 | 
						|
  RequireDerivedFormResource := True;
 | 
						|
  Application.Scaled:=True;
 | 
						|
  Application.Initialize;
 | 
						|
  Application.CreateForm(TMainForm, MainForm);
 | 
						|
  Application.Run;
 | 
						|
end.
 | 
						|
 |