CEF4Delphi/demos/Lazarus/JavaScript/JSEval/uSimpleTextViewer.pas

34 lines
602 B
ObjectPascal
Raw Normal View History

2017-08-19 12:53:47 +02:00
unit uSimpleTextViewer;
{$MODE Delphi}
2017-08-19 12:53:47 +02:00
interface
uses
{$IFDEF DELPHI16_UP}
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;
{$ELSE}
LCLIntf, LCLType, LMessages, Messages, SysUtils, Variants, Classes, Graphics,
2017-08-19 12:53:47 +02:00
Controls, Forms, Dialogs, StdCtrls;
{$ENDIF}
type
TSimpleTextViewerFrm = class(TForm)
Memo1: TMemo;
private
{ Private declarations }
public
{ Public declarations }
end;
var
SimpleTextViewerFrm: TSimpleTextViewerFrm;
implementation
{$R *.lfm}
2017-08-19 12:53:47 +02:00
end.