ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/examples/consolemode/project1.lpr

Comparing ibx/trunk/examples/consolemode/project1.lpr (file contents):
Revision 31 by tony, Tue Jul 14 15:31:25 2015 UTC vs.
Revision 33 by tony, Sat Jul 18 12:30:52 2015 UTC

#	Line 117 | Line 117 | begin
117		FIBDatabase.DatabaseName := 'localhost:employee';
118		FIBDatabase.Params.Add('user_name=SYSDBA'); {You may have to modify this!}
119		FIBDatabase.Params.Add('password=masterkey');  {You may have to modify this!}
120	<	FIBDatabase.Params.Add('lc_ctype=UTF-8');
120	>	FIBDatabase.Params.Add('lc_ctype=UTF8');
121		FIBTransaction.DefaultDatabase := FIBDatabase;
122		DoQuery;
123
#	Line 148 | Line 148 | begin
148		Application:=TMyApplication.Create(nil);
149		Application.Title:='IBX In Console Mode';
150		Application.Run;
151	+	{$IFDEF WINDOWS}
152	+	Sleep(1000); {Gives a chance to see the program output}
153	+	{$ENDIF}
154		Application.Free;
155		end.
156

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines