diff options
Diffstat (limited to 'packages/extra/winunits/jwawpftpmsg.pas')
| -rw-r--r-- | packages/extra/winunits/jwawpftpmsg.pas | 282 |
1 files changed, 141 insertions, 141 deletions
diff --git a/packages/extra/winunits/jwawpftpmsg.pas b/packages/extra/winunits/jwawpftpmsg.pas index 1c8910fb13..5f034abc6d 100644 --- a/packages/extra/winunits/jwawpftpmsg.pas +++ b/packages/extra/winunits/jwawpftpmsg.pas @@ -1,141 +1,141 @@ -{******************************************************************************}
-{ }
-{ Web Publishing FTP Error Codes API interface Unit for Object Pascal }
-{ }
-{ Portions created by Microsoft are Copyright (C) 1995-2001 Microsoft }
-{ Corporation. All Rights Reserved. }
-{ }
-{ The original file is: wpftpmsg.h, released June 2000. The original Pascal }
-{ code is: WPFtpMsg.pas, released December 2000. The initial developer of the }
-{ Pascal code is Marcel van Brakel (brakelm att chello dott nl). }
-{ }
-{ Portions created by Marcel van Brakel are Copyright (C) 1999-2001 }
-{ Marcel van Brakel. All Rights Reserved. }
-{ }
-{ Obtained through: Joint Endeavour of Delphi Innovators (Project JEDI) }
-{ }
-{ You may retrieve the latest version of this file at the Project JEDI }
-{ APILIB home page, located at http://jedi-apilib.sourceforge.net }
-{ }
-{ The contents of this file are used with permission, subject to the Mozilla }
-{ Public License Version 1.1 (the "License"); you may not use this file except }
-{ in compliance with the License. You may obtain a copy of the License at }
-{ http://www.mozilla.org/MPL/MPL-1.1.html }
-{ }
-{ Software distributed under the License is distributed on an "AS IS" basis, }
-{ WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for }
-{ the specific language governing rights and limitations under the License. }
-{ }
-{ Alternatively, the contents of this file may be used under the terms of the }
-{ GNU Lesser General Public License (the "LGPL License"), in which case the }
-{ provisions of the LGPL License are applicable instead of those above. }
-{ If you wish to allow use of your version of this file only under the terms }
-{ of the LGPL License and not to allow others to use your version of this file }
-{ under the MPL, indicate your decision by deleting the provisions above and }
-{ replace them with the notice and other provisions required by the LGPL }
-{ License. If you do not delete the provisions above, a recipient may use }
-{ your version of this file under either the MPL or the LGPL License. }
-{ }
-{ For more information about the LGPL: http://www.gnu.org/copyleft/lesser.html }
-{ }
-{******************************************************************************}
-
-// $Id: jwawpftpmsg.pas,v 1.1 2005/04/04 07:56:11 marco Exp $
-
-unit JwaWPFtpMsg;
-
-{$WEAKPACKAGEUNIT}
-
-{$HPPEMIT ''}
-{$HPPEMIT '#include "wpftpmsg.h"'}
-{$HPPEMIT ''}
-
-{$I jediapilib.inc}
-
-interface
-
-uses
- JwaWinType;
-
-//
-// Values are 32 bit values layed out as follows:
-//
-// 3 3 2 2 2 2 2 2 2 2 2 2 1 1 1 1 1 1 1 1 1 1
-// 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0
-// +---+-+-+-----------------------+-------------------------------+
-// |Sev|C|R| Facility | Code |
-// +---+-+-+-----------------------+-------------------------------+
-//
-// where
-//
-// Sev - is the severity code
-//
-// 00 - Success
-// 01 - Informational
-// 10 - Warning
-// 11 - Error
-//
-// C - is the Customer code flag
-//
-// R - is a reserved bit
-//
-// Facility - is the facility code
-//
-// Code - is the facility's status code
-//
-//
-// Define the facility codes
-//
-
-//
-// Define the severity codes
-//
-
-//
-// MessageId: FTPWPP_ERROR_FIRST
-//
-// MessageText:
-//
-// CFtpWpp's first error message.
-//
-
-const
- FTPWPP_ERROR_FIRST = DWORD($40042300);
- {$EXTERNALSYM FTPWPP_ERROR_FIRST}
-
-//
-// MessageId: FTPWPP_ERROR_INETOPEN_FAILED
-//
-// MessageText:
-//
-// The FTP provider could not connect to the internet.
-//
-
- FTPWPP_ERROR_INETOPEN_FAILED = DWORD($C0042301);
- {$EXTERNALSYM FTPWPP_ERROR_INETOPEN_FAILED}
-
-//
-// MessageId: FTPWPP_ERROR_AUTHENTICATION_FAILED
-//
-// MessageText:
-//
-// The FTP provider could not log in to the FTP server.
-//
-
- FTPWPP_ERROR_AUTHENTICATION_FAILED = DWORD($C0042302);
- {$EXTERNALSYM FTPWPP_ERROR_AUTHENTICATION_FAILED}
-
-//
-// MessageId: FTPWPP_ERROR_LAST
-//
-// MessageText:
-//
-// CFtpWpp's last error message.
-//
-
- FTPWPP_ERROR_LAST = DWORD($400423FF);
- {$EXTERNALSYM FTPWPP_ERROR_LAST}
-
-implementation
-
-end.
+{******************************************************************************} +{ } +{ Web Publishing FTP Error Codes API interface Unit for Object Pascal } +{ } +{ Portions created by Microsoft are Copyright (C) 1995-2001 Microsoft } +{ Corporation. All Rights Reserved. } +{ } +{ The original file is: wpftpmsg.h, released June 2000. The original Pascal } +{ code is: WPFtpMsg.pas, released December 2000. The initial developer of the } +{ Pascal code is Marcel van Brakel (brakelm att chello dott nl). } +{ } +{ Portions created by Marcel van Brakel are Copyright (C) 1999-2001 } +{ Marcel van Brakel. All Rights Reserved. } +{ } +{ Obtained through: Joint Endeavour of Delphi Innovators (Project JEDI) } +{ } +{ You may retrieve the latest version of this file at the Project JEDI } +{ APILIB home page, located at http://jedi-apilib.sourceforge.net } +{ } +{ The contents of this file are used with permission, subject to the Mozilla } +{ Public License Version 1.1 (the "License"); you may not use this file except } +{ in compliance with the License. You may obtain a copy of the License at } +{ http://www.mozilla.org/MPL/MPL-1.1.html } +{ } +{ Software distributed under the License is distributed on an "AS IS" basis, } +{ WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for } +{ the specific language governing rights and limitations under the License. } +{ } +{ Alternatively, the contents of this file may be used under the terms of the } +{ GNU Lesser General Public License (the "LGPL License"), in which case the } +{ provisions of the LGPL License are applicable instead of those above. } +{ If you wish to allow use of your version of this file only under the terms } +{ of the LGPL License and not to allow others to use your version of this file } +{ under the MPL, indicate your decision by deleting the provisions above and } +{ replace them with the notice and other provisions required by the LGPL } +{ License. If you do not delete the provisions above, a recipient may use } +{ your version of this file under either the MPL or the LGPL License. } +{ } +{ For more information about the LGPL: http://www.gnu.org/copyleft/lesser.html } +{ } +{******************************************************************************} + +// $Id: jwawpftpmsg.pas,v 1.1 2005/04/04 07:56:11 marco Exp $ + +unit JwaWPFtpMsg; + +{$WEAKPACKAGEUNIT} + +{$HPPEMIT ''} +{$HPPEMIT '#include "wpftpmsg.h"'} +{$HPPEMIT ''} + +{$I jediapilib.inc} + +interface + +uses + JwaWinType; + +// +// Values are 32 bit values layed out as follows: +// +// 3 3 2 2 2 2 2 2 2 2 2 2 1 1 1 1 1 1 1 1 1 1 +// 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 +// +---+-+-+-----------------------+-------------------------------+ +// |Sev|C|R| Facility | Code | +// +---+-+-+-----------------------+-------------------------------+ +// +// where +// +// Sev - is the severity code +// +// 00 - Success +// 01 - Informational +// 10 - Warning +// 11 - Error +// +// C - is the Customer code flag +// +// R - is a reserved bit +// +// Facility - is the facility code +// +// Code - is the facility's status code +// +// +// Define the facility codes +// + +// +// Define the severity codes +// + +// +// MessageId: FTPWPP_ERROR_FIRST +// +// MessageText: +// +// CFtpWpp's first error message. +// + +const + FTPWPP_ERROR_FIRST = DWORD($40042300); + {$EXTERNALSYM FTPWPP_ERROR_FIRST} + +// +// MessageId: FTPWPP_ERROR_INETOPEN_FAILED +// +// MessageText: +// +// The FTP provider could not connect to the internet. +// + + FTPWPP_ERROR_INETOPEN_FAILED = DWORD($C0042301); + {$EXTERNALSYM FTPWPP_ERROR_INETOPEN_FAILED} + +// +// MessageId: FTPWPP_ERROR_AUTHENTICATION_FAILED +// +// MessageText: +// +// The FTP provider could not log in to the FTP server. +// + + FTPWPP_ERROR_AUTHENTICATION_FAILED = DWORD($C0042302); + {$EXTERNALSYM FTPWPP_ERROR_AUTHENTICATION_FAILED} + +// +// MessageId: FTPWPP_ERROR_LAST +// +// MessageText: +// +// CFtpWpp's last error message. +// + + FTPWPP_ERROR_LAST = DWORD($400423FF); + {$EXTERNALSYM FTPWPP_ERROR_LAST} + +implementation + +end. |