From 42e274e30f3a47245088702b14dc0f339d3f7fc5 Mon Sep 17 00:00:00 2001
From: Nikolaos Georgiou <nikolaos.georgiou@gmail.com>
Date: Mon, 1 Nov 2021 07:07:58 +0100
Subject: [PATCH] Auto-formatted Pascal files: about1.pas, frmMain.pas

---
 about1.pas  | 2 +-
 frmMain.pas | 3 ++-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/about1.pas b/about1.pas
index 31b7816..36813d1 100644
--- a/about1.pas
+++ b/about1.pas
@@ -48,4 +48,4 @@ begin
 end;
 
 end.
- 
+
diff --git a/frmMain.pas b/frmMain.pas
index 038cb8b..e4a98f6 100644
--- a/frmMain.pas
+++ b/frmMain.pas
@@ -132,7 +132,8 @@ begin
         SendMessage(wnd, CB_GETLBTEXT, i - 1, longint(@itemtext));
         node2 := AddChild(node1, 'Item #' + IntToStr(i));
         AddChild(node2, 'Text = ' + itemtext);
-        AddChild(node2, 'Data = ' + IntToStr(SendMessage(wnd, CB_GETITEMDATA, i - 1, 0)));
+        AddChild(node2, 'Data = ' +
+          IntToStr(SendMessage(wnd, CB_GETITEMDATA, i - 1, 0)));
       end;
     end;
     if childlist.Count > 0 then