Changeset 55 for trunk/Packages/Common/UCommon.pas

Timestamp:

Aug 23, 2012, 6:43:26 AM (12 years ago)

Author:

chronos

Message:

• Modified: Update Common package.

File:

• trunk/Packages/Common/UCommon.pas (modified) (3 diffs)

trunk/Packages/Common/UCommon.pas

@@ -7 +7 @@
 uses
   {$IFDEF Windows}Windows,{$ENDIF}
-  Classes, SysUtils, StrUtils, Dialogs, Process,
+  Classes, SysUtils, StrUtils, Dialogs, Process, LCLIntf,
   FileUtil; //, ShFolder, ShellAPI;
 
@@ -404 +404 @@
   Browser, Params: string;
 begin
-  try
+  OpenURL(URL);
+  {try
     Process := TProcess.Create(nil);
     Browser := '';
@@ -415 +416 @@
   finally
     Process.Free;
-  end;
+  end;}
 end;