Ausgliedern von Functionen in externe Unit

[DeddyH]

Zitat von Jens Hartmann:

Delphi-Quellcode:

  TForm1.Qry_TimerRead.SQL.Text := 'SELECT * FROM EMAIL
        ' WHERE ID = :Id';
  TForm1.Qry_TimerRead.ParamByName('Id').Value := Timer;
  TForm1.Qry_TimerRead.Open;
  TimeSend :=  TimeToStr(TForm1.Qry_TimerRead.FieldbyName('TIME').AsTime);

Jetzt wäre halt die Frage, wie ich sowas auslagern würde ohne immer noch das Form1 etc. zu nutzen.

Ich hoffe ich konnte so ungefähr beschreiben was ich meine

Gruß Jens

Das sieht mir sehr nach DB aus, oder?