Ergebnis der Suchanfrage

• Forum: Netzwerke

  AW: Indy und Wiedervervendung von procedure

   
    by sx2008, 28. Feb 2013
  Ich würde den gemeinsamen Code in eine (oder mehrere) Klasse(n) auslagern.
  Diese Klasse(n) befindet sich wiederum in einer Unit, die von App und Service benützt wird.
  TServerAblauf = class(TObject)
  protected
  FServer : TIdTcpServer;
  public
  constructor Create(server : TIdTcpServer);
  procedure Execute;
  end;