TTimer als Var im Constructor eines TForms übergeben

[razer91]

Hallo Leute,

ich habe folgendes Problem:

Ich versuche bei der manuellen Erstellung eines Formulars einen Timer zu übergeben:

Delphi-Quellcode:

procedure TdmMain.DataModuleCreate(Sender: TObject);
var
  mp: TMethodePionter;
begin
  fTiPostpone := TTimer.Create(self);
  fTiPostpone.Enabled := false;


  frmRem := TfrmRem.Create(fTiPostpone); //hier Erstellungsversuch
  frmRem.Show();
end;

// hier constructor

constructor TfrmRem.Create(var Timer: TTimer);
begin
  inherited Create(nil);

  fTiPostpone := Timer; // "fTiPostpone" ist hier eine private Variable des "frmRem".
end;

Ich bekomme in dem "inherited"-Abschnitt eine Exception "TTimer-Klasse konnte nicht gefunden werden" oder so ähnlich. Ich frage mich hierbei, warum er an dieser Stelle schon etwas mit dem Timer anfangen will, obwohl ich zuerst einmal das alte Create() aufrufe und dann den Timer-Kram mache...

Ich denke es handelt sich bei diesem Problem um eine Kleinigkeit, aber ich komme einfach nicht drauf .
Hat jemand eine Idee?

Grüße
razer91