ViewVC Help

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

root/public/ibx/branches/journaling/fbintf/IBUtils.pas

Comparing ibx/trunk/fbintf/IBUtils.pas (file contents):
Revision 119 by tony, Mon Jan 22 13:58:18 2018 UTC vs.
Revision 121 by tony, Mon Jan 22 13:58:23 2018 UTC

#	Line 34 | Line 34
34		unit IBUtils;
35		{$IFDEF MSWINDOWS}
36		{$DEFINE WINDOWS}
37	–	{$IF defined(CompilerVersion) and (CompilerVersion >= 28)}
38	–	{Delphi XE7 onwards}}
39	–	{$define HASREQEX}
40	–	{$IFEND}
37		{$ENDIF}
38
39		{$IFDEF FPC}
#	Line 398 | Line 394 | begin
394		end;
395		end;
396		{$ELSE}
397	<	{cruder version of above for old versions of Delphi}
397	>	{cruder version of above for Delphi. Older versions lack regular expression
398	>	handling.}
399		function ExtractConnectString(const CreateSQL: AnsiString;
400		var ConnectString: AnsiString): boolean;
401		var i: integer;

Diff Legend

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