{$WARN UNIT_PLATFORM OFF} funktioniert nicht ?

[Uwe Raabe]

Zitat von hoika:

in vielen Beispielen steht das aber direkt hinter interface (oder irre ich mich jetzt ?),
so wie ich das oben gezeigt hatte.

Muss ich das also immer direkt in den Code schreib ? ;(

Die Platform direktive kann eigentlich hinter jeder Deklaration stehen. Man kann also eine ganze Unit als platform deklarieren, was dann die entsprechende Warnung (UNIT_PLATFORM) ausgibt, wenn man diese Unit benutzt. Unit Vcl.FileCtrl ist ein Beispiel für eine platform Unit.

Etwas Anderes sind Symbole (Konstanten, Typen, Variablen, Methoden), die als platform deklariert sind. Verwendet man diese in seinem Code kommt die entsprechende Warnung (SYMBOL_PLATFORM). Solange die aktuelle Unit nur für eine Plattform gedacht ist, kann man am Anfang die Warnungen ausschalten. Diverse RTL/VCL-Units machen das so.

Das Ausschalten dieser Warnungen sollte aber nur in den Fällen erfolgen, wo sicher nur für eine Plattform entwickelt wird. In Units, die für alle Plattformen verwendet werden sollen, lässt man die Warnungen besser an.

[hoika]

Hallo,

< kann man am Anfang die Warnungen ausschalten >

Wie du ganz oben siehst, habe ich genau das gemacht.
Trotzdem kommt die Meldung ...


Heiko

[Uwe Raabe]

Zitat von hoika:

< kann man am Anfang die Warnungen ausschalten >

Wie du ganz oben siehst, habe ich genau das gemacht.
Trotzdem kommt die Meldung ...

Entweder habe ich es noch nicht verstanden, oder ich kann es hier nicht nachvollziehen.

Delphi-Quellcode:

{$WARN SYMBOL_PLATFORM OFF}
unit Unit1;

interface

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

type
  TForm1 = class(TForm)
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

var
  temp: integer = faArchive; // keine Warnung
end.