{-----------------------------------------------------------------------------
 Unit Name: SaieTesti
 Author:    Vesa Lappalainen
 Purpose:   De onstrate the use of Threads
 History:
-----------------------------------------------------------------------------}


program SaieTestiCLX;

uses
  QForms,
  saiedemo in 'saiedemo.pas' {FormSaieDemo};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TFormSaieDemo, FormSaieDemo);
  Application.Run;
end.