Tutorial: Warnungen und Hinweise vom Delphi Compiler

[MaBuSE]

Zitat von Phoenix:

Es gibt den Schalter der deprecated Symbole anzeigen lässt oder nicht.
Nur wie kann ich selber ein Symbol als deprecated markieren?

Hier ist ein Beispiel:
(Analog dazu kann statt deprecated natürlich auch das schlüsselwort experimental, platform oder library verwendet werden.)

Edit: Ich stelle gerade fest dass experimental noch nicht in Delphi 7 verfügbar ist. In D2007 schon
Endlich kann ich auch experimentelle Symbole und Units erstellen

Delphi-Quellcode:

unit Unit2 deprecated; // komplette unit ist veraltet 
// (kann später mit UNIT_DEPRECATED =ON|OFF angezeigt werden)

interface

//alle anderen deprecated beziehen sich auf Symbole und können mit SYMBOL_DEPRECATED = ON|OFF angezeigt werden.

const
  pi_alt = 3.1 deprecated; // pi_alt ist veraltet
  pi_neu = 3.14;

type
  TmyObject = class(TObject)
  public
    // nur s_alt ist veraltet
    s_alt: string deprecated;
  end;

  // komplettes Objekt ist veraltet
  TmyObject_alt = class(TObject)
  public
    s_alt: string;
  end deprecated;


// procedure ist veraltet
procedure proc_alt(s: string); deprecated;

// funktion ist veraltet
function func_alt(s:string):string; deprecated;


implementation

procedure proc_alt(s: string);
begin
end;

function func_alt(s:string):string;
begin
  Result := s;
end;

end.