Sposób dodawania unitów do sekcji uses

0

zainstalowałem dwie wersje delphi XE i XE2.
W XE2 unity dodaje się w ten sposób

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls,

w XE, podkreśla mi wszystko na czerwono i wymaga takiego zapisu.

uses
     Windows, Messages, SysUtils, Variants, Classes, Graphics,
     Controls, Forms, Dialogs, ExtCtrls,

czy jest jakis sposób, żeby ustawić, żeby w obu wersjach było tak jak w XE2, żebym nie musiał przepisywać wszystkich kodów?

1

czy jest jakis sposób, żeby ustawić, żeby w obu wersjach było tak jak w XE2
Nie ma, ale pod XE2 chyba działa jeszcze ten normalny zapis bez System i Vcl?

3

Stary zapis działa z wszystkimi wersjami łącznie z najnowszą XE5 ale jeżeli chcesz z jakiegoś powodu używać nowego zapisu to można użyć dyrektyw kompilatora i podawać definicje dla starszych i nowszych wersji np.:

uses
  {$IF CompilerVersion >= 23}
  Winapi.Windows, Winapi.Messages, System.SysUtils;
  {$ELSE}
  Windows, Messages, SysUtils;
  {$IFEND}

albo bardziej skomplikowany zapis w takim stylu:

uses
  {$IF CompilerVersion >= 23}Winapi.{$IFEND}Windows,
  {$IF CompilerVersion >= 23}Winapi.{$IFEND}Messages,
  {$IF CompilerVersion >= 23}System.{$IFEND}SysUtils;

1 użytkowników online, w tym zalogowanych: 0, gości: 1