Changeset 253

Timestamp:

Sep 21, 2007, 8:57:39 PM (18 years ago)

Author:

RBRi

Message:

small optimization

File:

• trunk/Components/ACLDialogs.pas (modified) (3 diffs)

trunk/Components/ACLDialogs.pas

@@ -85 +85 @@
   ACLLanguageUnit, ControlsUtility,
 {$endif}
-  CharUtilsUnit;
+  CharUtilsUnit,
+  DebugUnit;
 
 // -------------------------------------------------
@@ -307 +308 @@
   tmpPrefix : String;
 begin
-  tmpPrefix := '';
   if Language = nil then
   begin
@@ -381 +381 @@
 Begin
   if QueryDlg = nil then
+  begin
     QueryDlg := TACLQueryDialog.Create( Screen.ActiveForm );
+  end;
 
   QueryDlg.Caption := ACaption;