Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.04.2020, 12:09   #1
Олег2301
Новичок
Джуниор
 
Регистрация: 02.04.2020
Сообщений: 3
Восклицание Помогите с C++ Builder

Скажите пожалуйста почему выдает ошибки
Код:
// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'MaskUtils.pas' rev: 6.00

#ifndef MaskUtilsHPP
#define MaskUtilsHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Maskutils
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TMaskCharType { mcNone, mcLiteral, mcIntlLiteral, mcDirective, mcMask, mcMaskOpt, mcFieldSeparator, mcField };
#pragma option pop

#pragma option push -b-
enum MaskUtils__1 { mdReverseDir, mdUpperCase, mdLowerCase, mdLiteralChar };
#pragma option pop

typedef Set<MaskUtils__1, mdReverseDir, mdLiteralChar>  TMaskDirectives;

typedef AnsiString TMaskedText;

typedef AnsiString TEditMask;

//-- var, const, procedure ---------------------------------------------------
extern PACKAGE char DefaultBlank;
extern PACKAGE char MaskFieldSeparator;
extern PACKAGE char MaskNoSave;
static const char mDirReverse = '\x21';
static const char mDirUpperCase = '\x3e';
static const char mDirLowerCase = '\x3c';
static const char mDirLiteral = '\x5c';
static const char mMskAlpha = '\x4c';
static const char mMskAlphaOpt = '\x6c';
static const char mMskAlphaNum = '\x41';
static const char mMskAlphaNumOpt = '\x61';
static const char mMskAscii = '\x43';
static const char mMskAsciiOpt = '\x63';
static const char mMskNumeric = '\x30';
static const char mMskNumericOpt = '\x39';
static const char mMskNumSymOpt = '\x23';
static const char mMskTimeSeparator = '\x3a';
static const char mMskDateSeparator = '\x2f';
extern PACKAGE TMaskCharType __fastcall MaskGetCharType(const AnsiString EditMask, int MaskOffset);
extern PACKAGE TMaskDirectives __fastcall MaskGetCurrentDirectives(const AnsiString EditMask, int MaskOffset);
extern PACKAGE char __fastcall MaskIntlLiteralToChar(char IChar);
extern PACKAGE AnsiString __fastcall MaskDoFormatText(const AnsiString EditMask, const AnsiString Value, char Blank);
extern PACKAGE bool __fastcall MaskGetMaskSave(const AnsiString EditMask);
extern PACKAGE char __fastcall MaskGetMaskBlank(const AnsiString EditMask);
extern PACKAGE int __fastcall MaskGetFldSeparator(const AnsiString EditMask);
extern PACKAGE int __fastcall MaskOffsetToOffset(const AnsiString EditMask, int MaskOffset);
extern PACKAGE int __fastcall MaskOffsetToWideOffset(const AnsiString EditMask, int MaskOffset);
extern PACKAGE int __fastcall OffsetToMaskOffset(const AnsiString EditMask, int Offset);
extern PACKAGE bool __fastcall IsLiteralChar(const AnsiString EditMask, int Offset);
extern PACKAGE AnsiString __fastcall PadInputLiterals(const AnsiString EditMask, const AnsiString Value, char Blank);
extern PACKAGE AnsiString __fastcall FormatMaskText(const AnsiString EditMask, const AnsiString Value);

}	/* namespace Maskutils */
using namespace Maskutils;
#pragma option pop	// -w-
#pragma option pop	// -Vx

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// MaskUtils
Олег2301 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите с программой на С++ Builder spectrum988 Помощь студентам 18 12.12.2013 22:36
Помогите с процедурой в Builder C++ 6.0 AntareSFire C++ Builder 1 27.02.2009 16:50
Помогите с С++Builder! Kean Компоненты Delphi 2 02.01.2009 12:36
Помогите разобраться в Builder 6 Kocapb C++ Builder 1 02.11.2007 23:58