ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/runtime/IB.pas
(Generate patch)

Comparing ibx/trunk/runtime/IB.pas (file contents):
Revision 38 by tony, Sat Jul 18 12:30:52 2015 UTC vs.
Revision 39 by tony, Tue May 17 08:14:52 2016 UTC

# Line 47 | Line 47 | uses
47  
48   type
49    TIBGUIInterface = interface
50 <    function ServerLoginDialog(const AServerName: string;
50 >    function ServerLoginDialog(var AServerName: string;
51                                 var AUserName, APassword: string): Boolean;
52 <    function LoginDialogEx(const ADatabaseName: string;
52 >    function LoginDialogEx(var ADatabaseName: string;
53                                 var AUserName, APassword: string;
54                                 NameReadOnly: Boolean): Boolean;
55      procedure SetCursor;
56      procedure RestoreCursor;
57    end;
58 +  
59 +  {$IF FPC_FULLVERSION < 20700 }
60 +  RawByteString = AnsiString; {Needed for backwards compatibility}
61 +  {$ENDIF}
62  
63    TTraceFlag = (tfQPrepare, tfQExecute, tfQFetch, tfError, tfStmt, tfConnect,
64       tfTransact, tfBlob, tfService, tfMisc);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines