Designtime 1

Failed designtime on Delphi
FIrst Lazarus Designtime