Fix tabs.

Projects/CompMessageBoxDesigner.pas

@@ -843,8 +843,8 @@ end;
 
 procedure TMBDForm.MSGTextKeyPress(Sender: TObject; var Key: Char);
 begin
-	if Key = #27 then begin
-  	MBDButtonCancel.Click;
+  if Key = #27 then begin
+    MBDButtonCancel.Click;
     Key := #0;
   end;
 end;

Projects/CompResUpdate.pas

@@ -316,7 +316,7 @@ begin
       if M = 0 then
         ErrorWithLastError('LoadLibraryEx failed (1)');
       try
-      	{ Load the 'MAINICON' group icon resource }
+        { Load the 'MAINICON' group icon resource }
         R := FindResource(M, 'MAINICON', RT_GROUP_ICON);
         if R = 0 then
           ErrorWithLastError('FindResource failed (1)');

Projects/Compile.pas

@@ -4153,7 +4153,7 @@ begin
     ssOutput: begin
         if not FixedOutput then
           Output := StrToBool(Value);
-		end;
+    end;
     ssOutputBaseFilename: begin
         if not FixedOutputBaseFilename then
           OutputBaseFilename := Value;

Projects/Undo.pas

@@ -102,7 +102,7 @@ type
     ExtraData: Longint;
     DataSize: Cardinal;
     Typ: TUninstallRecTyp;
-    Data: array[0..$6FFFFFFF] of Byte;  { *must* be last field }	
+    Data: array[0..$6FFFFFFF] of Byte;  { *must* be last field }
   end;
 
   TDeleteUninstallDataFilesProc = procedure;