Changeset 11 for trunk/UOptionsWindow.pas

Timestamp:

Feb 11, 2008, 11:18:05 AM (16 years ago)

Author:

george

Message:

Opraveno: Načítání seznamu síťových adaptérů přes API funkce.
Opraveno: Uvolňění paměti AppUserEventsOptions.
Přidáno: Textová identifikace Windows Vista.

File:

• trunk/UOptionsWindow.pas (modified) (1 diff)

trunk/UOptionsWindow.pas

@@ -597 +597 @@
 procedure TOptionsWindow.FormCreate(Sender: TObject);
 begin
-  if MainWindow.OnTop then FormStyle:= fsStayOnTop else FormStyle:= fsNormal;
-  PageControl1.ActivePageIndex:= 0;
+  if MainWindow.OnTop then FormStyle := fsStayOnTop
+    else FormStyle := fsNormal;
+  PageControl1.ActivePageIndex := 0;
 end;