mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 15:09:36 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			31 lines
		
	
	
		
			360 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			31 lines
		
	
	
		
			360 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
unit fUpdateView;
 | 
						|
 | 
						|
{$mode objfpc}{$H+}
 | 
						|
 | 
						|
interface
 | 
						|
 | 
						|
uses
 | 
						|
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls;
 | 
						|
 | 
						|
type
 | 
						|
 | 
						|
  { TUpdateView }
 | 
						|
 | 
						|
  TUpdateView = class(TForm)
 | 
						|
    edUpdate: TMemo;
 | 
						|
  private
 | 
						|
    { private declarations }
 | 
						|
  public
 | 
						|
    { public declarations }
 | 
						|
  end; 
 | 
						|
 | 
						|
var
 | 
						|
  UpdateView: TUpdateView;
 | 
						|
 | 
						|
implementation
 | 
						|
 | 
						|
{$R *.lfm}
 | 
						|
 | 
						|
end.
 | 
						|
 |