program WideStringStreaming; {$mode objfpc}{$H+} uses {$IFDEF UNIX}{$IFDEF UseCThreads} cthreads, {$ENDIF}{$ENDIF} Interfaces, // this includes the LCL widgetset Forms { add your units here }, MainUnit; begin Application.Title := 'componentstreaming'; Application.Initialize; Application.CreateForm(TStreamDemoForm, StreamDemoForm); Application.Run; end.