diff --git a/DfmEngine.pas b/DfmEngine.pas
index 544436c..80532e0 100644
--- a/DfmEngine.pas
+++ b/DfmEngine.pas
@@ -67,10 +67,8 @@ const
 function BitTest(Value, Mask: integer): boolean;
 function GetWndText(wnd: HWND): string;
 function EnumChildrenProc(wnd: HWND; lp: LPARAM): BOOL; stdcall;
-procedure WriteBitmapData(dfm1: TDfmWriter; bmp: HBITMAP;
-  BelongsToPicture: boolean; const Name: string);
-procedure WriteIconData(dfm1: TDfmWriter; icon: HICON; BelongsToPicture: boolean;
-  const Name: string);
+procedure WriteBitmapData(dfm1: TDfmWriter; bmp: HBITMAP; BelongsToPicture: boolean; const Name: string);
+procedure WriteIconData(dfm1: TDfmWriter; icon: HICON; BelongsToPicture: boolean; const Name: string);
 
 implementation
 
@@ -302,8 +300,7 @@ procedure TDfmBuilder.HandleTreeView(wnd: HWND; style: integer);
 begin
 end;
 
-procedure WriteBitmapData(dfm1: TDfmWriter; bmp: HBITMAP;
-  BelongsToPicture: boolean; const Name: string);
+procedure WriteBitmapData(dfm1: TDfmWriter; bmp: HBITMAP; BelongsToPicture: boolean; const Name: string);
 var
   b: TBitmap;
   Memory: TTextWriter;
@@ -337,8 +334,7 @@ begin
   end;
 end;
 
-procedure WriteIconData(dfm1: TDfmWriter; icon: HICON; BelongsToPicture: boolean;
-  const Name: string);
+procedure WriteIconData(dfm1: TDfmWriter; icon: HICON; BelongsToPicture: boolean; const Name: string);
 var
   i: TIcon;
   k: TTextWriter;
diff --git a/about1.pas b/about1.pas
index 36813d1..9bb2333 100644
--- a/about1.pas
+++ b/about1.pas
@@ -48,4 +48,3 @@ begin
 end;
 
 end.
-
diff --git a/frmMain.pas b/frmMain.pas
index e4a98f6..cf7ec4a 100644
--- a/frmMain.pas
+++ b/frmMain.pas
@@ -48,8 +48,7 @@ type
     procedure btnAboutClick(Sender: TObject);
     procedure SaveRCClick(Sender: TObject);
   private
-    procedure GenerateDfmFile(const filename, frmname: string;
-      wnd: HWND; PasList: TStrings);
+    procedure GenerateDfmFile(const filename, frmname: string; wnd: HWND; PasList: TStrings);
     procedure GeneratePasFile(const filename, frmname: string; PasList: TStrings);
     procedure GetWinInfo(wnd: HWND; ParentNode: TTreeNode);
     procedure EnableSavePas;
@@ -132,8 +131,7 @@ 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
@@ -203,8 +201,7 @@ begin
 end;
 
 
-procedure TMainForm.GenerateDfmFile(const filename, frmName: string;
-  wnd: HWND; PasList: TStrings);
+procedure TMainForm.GenerateDfmFile(const filename, frmName: string; wnd: HWND; PasList: TStrings);
 var
   OutStream: TFileStream;
   b1: TDfmBuilder;