Ich hab's mal kurz getestet. Folgender Code:
Delphi-Quellcode:
program Project1;
{$APPTYPE CONSOLE}
{$R *.res}
uses
SysUtils;
{$METHODINFO on}
type
TMyObject =
class(TObject)
private
protected
public
published
procedure DoSomething(aPointer: pointer);
end;
{ TMyObject }
procedure TMyObject.DoSomething(aPointer: pointer);
begin
end;
begin
try
{ TODO -oUser -cConsole Main : Code hier einfügen }
except
on E:
Exception do
Writeln(E.ClassName, '
: ', E.
Message);
end;
end.
liefert unter D2007
Zitat:
[DCC Fehler] Project1.dpr(18): F2084 Interner Fehler: D13360
Unter XE6 kompiliert's kommentarlos.