реструктуризация файлов, добавление вебчатов

forms/uShowText.pas

@@ -0,0 +1,28 @@
+unit uShowText;
+
+interface
+
+uses
+  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
+  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Memo.Types,
+  FMX.StdCtrls, FMX.Controls.Presentation, FMX.ScrollBox, FMX.Memo;
+
+type
+  TfShowText = class(TForm)
+    Memo1: TMemo;
+    Panel1: TPanel;
+    Label1: TLabel;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  fShowText: TfShowText;
+
+implementation
+
+{$R *.fmx}
+
+end.