[fpc-pascal] override and virtual: was SetFileTime

[Steve Litt]

José Mejuto via fpc-pascal said on Wed, 3 May 2023 11:35:50 +0200

>Hello,
>
>Attached is a dirty implementation of "touch" for junctions
==========================================================
TTouchJunction = class(TCustomApplication)
  protected
    procedure DoRun; override;
    function DateTimeToFileTime(DateTime: TDateTime): TFileTime;
  public
    constructor Create(TheOwner: TComponent); override;
    destructor Destroy; override;
    procedure WriteHelp; virtual;
  end;
==========================================================

I'm an old Turbo Pascal (mainly 3.x, a little 5.5) guy and don't
remember or never saw override and virtual. What do they do?

SteveT

Steve Litt 
Autumn 2022 featured book: Thriving in Tough Times
http://www.troubleshooters.com/bookstore/thrive.htm