Changeset 60 for trunk/Forms/FormMain.pas

Timestamp:

Apr 7, 2024, 11:26:09 PM (10 months ago)

Author:

chronos

Message:

• Modified: Remove U prefix from unit names.

File:

• trunk/Forms/FormMain.pas (moved) (moved from trunk/Forms/UFormMain.pas ) (5 diffs)

trunk/Forms/FormMain.pas

@@ -1 @@
-unit UFormMain;
-
-{$mode delphi}{$H+}
+unit FormMain;
 
 interface
@@ -7 +5 @@
 uses
   Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
-  ExtCtrls, Menus, ActnList, UKernel, UMemory, UDevice, UPlatformBase, LCLType,
-  UGraphics, GraphType;
+  ExtCtrls, Menus, ActnList, Kernel.Core, Kernel.Memory, Kernel.Device,
+  PlatformBase, LCLType, Kernel.Graphics, GraphType;
 
 type
@@ -60 +58 @@
   FormMain: TFormMain;
 
+
 implementation
 
 uses
-  UList, UApp, UAPI, UClock, UThreadEx, UFormTerminal;
+  Kernel.List, Kernel.App, Kernel.API, Clock, ThreadEx, FormTerminal;
 
 {$R *.lfm}
@@ -124 +123 @@
 procedure TFormMain.AShowTerminalExecute(Sender: TObject);
 begin
-  FormTerminal.Show;
+  FormTerminal.FormTerminal.Show;
 end;
 
@@ -254 +253 @@
 procedure TFormMain.SerialDeviceReceiveDataSync;
 begin
-  FormTerminal.Memo1.Lines.AddText(SerialText);
+  FormTerminal.FormTerminal.Memo1.Lines.AddText(SerialText);
 end;