lazarus-ccr/wst/trunk/samples/user_client/user_client.lpr

program user_client;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, laz_synapse
  , umain, RunTimeTypeInfoControls, user_edit_imp;

begin
  Application.Initialize;
  Application.CreateForm(TfMain, fMain);
  Application.CreateForm(TfUserEdit, fUserEdit);
  Application.Run;
end.
client : new TCP transport implementation ( using synapse library ) in synapse_tcp_protocol.pas server : TCP server implementatiion ( using synapse library ) in synapse_tcp_server.pas Delphi : first binary format support bugs fix in the WSDL generation for the server side git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@158 8e941d3f-bd1b-0410-a28a-d453659cc2b4 2007-05-02 22:55:35 +00:00			`program user_client;`

			`{$mode objfpc}{$H+}`

			`uses`
			`{$IFDEF UNIX}{$IFDEF UseCThreads}`
			`cthreads,`
			`{$ENDIF}{$ENDIF}`
			`Interfaces, // this includes the LCL widgetset`
Improve project files (Thanks Juha) git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3864 8e941d3f-bd1b-0410-a28a-d453659cc2b4 2015-01-03 13:44:46 +00:00			`Forms, laz_synapse`
client : new TCP transport implementation ( using synapse library ) in synapse_tcp_protocol.pas server : TCP server implementatiion ( using synapse library ) in synapse_tcp_server.pas Delphi : first binary format support bugs fix in the WSDL generation for the server side git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@158 8e941d3f-bd1b-0410-a28a-d453659cc2b4 2007-05-02 22:55:35 +00:00			`, umain, RunTimeTypeInfoControls, user_edit_imp;`

			`begin`
			`Application.Initialize;`
			`Application.CreateForm(TfMain, fMain);`
			`Application.CreateForm(TfUserEdit, fUserEdit);`
			`Application.Run;`
			`end.`