delphi基本数据类型有哪几种 5
推荐于2017-11-28
展开全部
a、 整数类型: (通用类型<32位>:Integer-有符号;Cardinal-无符号)
具体:
有符号:Shortint<8位>,Smallint<16位>,Longint<32位 >
无符号:Byte<8位>,Word<16位>,LongiWord<32位 >
b、字符类型: (通用类型<8位>:Char -与AnsiChar等同)
具体:
AnsiChar<8位> :主要存放Ansi字符
WideChar<16位>:主要存放Unicode字符
c、布尔类型: (通用类型<8位>:Boolean-与ByteBool等同)
具体:
ByteBool<8位>,WordBool<16位>,LongBool<32位>
不同的布尔类型主要用于鱼其它编程语言及不同windows系统兼容。
d、枚举类型:
定义:type 枚举类型标识符=(key1[=val1],.。。。,keyn[=valn]) :n<=255
如果给某些key指定了值,则未指定值的key是前一个key值加1;
如果全部默认不指定值,则key1值为0,往后逐个加1。
e、子界类型:
定义:type 子界类型标识符=下界 ..下界
如:type SubInt=1..3 0;表示 1~30的整数
type SubChar='a'..'z';表示字符
※注:1、以上四种类型称为有序类型,即除第一个数为都有先行数、除最后一个数外都有后继数。在这里
(计算机里),整数是有限的。有序类型的数都有一个序号,称为序数。整数的序数为其本身,其他类型第一
个数序数为0,依次递增。
2、子界类型上、下界必须是有同一有序类型,且上界序数大于下界序数。
f、浮点类型: (通用类型<8字节>:Real-与Double等同)
具体:
Double<8字节>,Real48<6字节>Single<4字节>,
Extended<10字节>,Comp<8字节>,Currency<8字节>
g、字符串类型: (通用类型:String-与AnsiString等同)
具体:
ShortString :最多存放255个字符,第一个自己存放字符个数,不以NULL结尾
AnsiString :存放Ansi字符,以NULL结尾
WideString:存放Unicode字符,以NULL结尾
h、时间、日期类型:TDateTime -实际是浮点类型的别称
具体:
有符号:Shortint<8位>,Smallint<16位>,Longint<32位 >
无符号:Byte<8位>,Word<16位>,LongiWord<32位 >
b、字符类型: (通用类型<8位>:Char -与AnsiChar等同)
具体:
AnsiChar<8位> :主要存放Ansi字符
WideChar<16位>:主要存放Unicode字符
c、布尔类型: (通用类型<8位>:Boolean-与ByteBool等同)
具体:
ByteBool<8位>,WordBool<16位>,LongBool<32位>
不同的布尔类型主要用于鱼其它编程语言及不同windows系统兼容。
d、枚举类型:
定义:type 枚举类型标识符=(key1[=val1],.。。。,keyn[=valn]) :n<=255
如果给某些key指定了值,则未指定值的key是前一个key值加1;
如果全部默认不指定值,则key1值为0,往后逐个加1。
e、子界类型:
定义:type 子界类型标识符=下界 ..下界
如:type SubInt=1..3 0;表示 1~30的整数
type SubChar='a'..'z';表示字符
※注:1、以上四种类型称为有序类型,即除第一个数为都有先行数、除最后一个数外都有后继数。在这里
(计算机里),整数是有限的。有序类型的数都有一个序号,称为序数。整数的序数为其本身,其他类型第一
个数序数为0,依次递增。
2、子界类型上、下界必须是有同一有序类型,且上界序数大于下界序数。
f、浮点类型: (通用类型<8字节>:Real-与Double等同)
具体:
Double<8字节>,Real48<6字节>Single<4字节>,
Extended<10字节>,Comp<8字节>,Currency<8字节>
g、字符串类型: (通用类型:String-与AnsiString等同)
具体:
ShortString :最多存放255个字符,第一个自己存放字符个数,不以NULL结尾
AnsiString :存放Ansi字符,以NULL结尾
WideString:存放Unicode字符,以NULL结尾
h、时间、日期类型:TDateTime -实际是浮点类型的别称
展开全部
a、
整数类型:
(通用类型:integer-有符号;cardinal-无符号)
具体:
有符号:shortint,smallint,longint<32位
>
无符号:byte,word,longiword<32位
>
b、字符类型:
(通用类型:char
-与ansichar等同)
具体:
ansichar
:主要存放ansi字符
widechar:主要存放unicode字符
c、布尔类型:
(通用类型:boolean-与bytebool等同)
具体:
bytebool,wordbool,longbool
不同的布尔类型主要用于鱼其它编程语言及不同windows系统兼容。
d、枚举类型:
定义:type
枚举类型标识符=(key1[=val1],.。。。,keyn[=valn])
:n<=255
如果给某些key指定了值,则未指定值的key是前一个key值加1;
如果全部默认不指定值,则key1值为0,往后逐个加1。
e、子界类型:
定义:type
子界类型标识符=下界
..下界
如:type
subint=1..3
0;表示
1~30的整数
type
subchar='a'..'z';表示字符
※注:1、以上四种类型称为有序类型,即除第一个数为都有先行数、除最后一个数外都有后继数。在这里
(计算机里),整数是有限的。有序类型的数都有一个序号,称为序数。整数的序数为其本身,其他类型第一
个数序数为0,依次递增。
2、子界类型上、下界必须是有同一有序类型,且上界序数大于下界序数。
f、浮点类型:
(通用类型:real-与double等同)
具体:
double,real48single,
extended,comp,currency
g、字符串类型:
(通用类型:string-与ansistring等同)
具体:
shortstring
:最多存放255个字符,第一个自己存放字符个数,不以null结尾
ansistring
:存放ansi字符,以null结尾
widestring:存放unicode字符,以null结尾
h、时间、日期类型:tdatetime
-实际是浮点类型的别称
整数类型:
(通用类型:integer-有符号;cardinal-无符号)
具体:
有符号:shortint,smallint,longint<32位
>
无符号:byte,word,longiword<32位
>
b、字符类型:
(通用类型:char
-与ansichar等同)
具体:
ansichar
:主要存放ansi字符
widechar:主要存放unicode字符
c、布尔类型:
(通用类型:boolean-与bytebool等同)
具体:
bytebool,wordbool,longbool
不同的布尔类型主要用于鱼其它编程语言及不同windows系统兼容。
d、枚举类型:
定义:type
枚举类型标识符=(key1[=val1],.。。。,keyn[=valn])
:n<=255
如果给某些key指定了值,则未指定值的key是前一个key值加1;
如果全部默认不指定值,则key1值为0,往后逐个加1。
e、子界类型:
定义:type
子界类型标识符=下界
..下界
如:type
subint=1..3
0;表示
1~30的整数
type
subchar='a'..'z';表示字符
※注:1、以上四种类型称为有序类型,即除第一个数为都有先行数、除最后一个数外都有后继数。在这里
(计算机里),整数是有限的。有序类型的数都有一个序号,称为序数。整数的序数为其本身,其他类型第一
个数序数为0,依次递增。
2、子界类型上、下界必须是有同一有序类型,且上界序数大于下界序数。
f、浮点类型:
(通用类型:real-与double等同)
具体:
double,real48single,
extended,comp,currency
g、字符串类型:
(通用类型:string-与ansistring等同)
具体:
shortstring
:最多存放255个字符,第一个自己存放字符个数,不以null结尾
ansistring
:存放ansi字符,以null结尾
widestring:存放unicode字符,以null结尾
h、时间、日期类型:tdatetime
-实际是浮点类型的别称
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Delphi中的基本数据类型包括整型、实型、字符型、布尔型、枚举型和子界型。前4种都是Pascal预先定义好的不需要用户再进行实义的类型,后两种为用户自定义类型。除了实型,其它均为有序类型。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
动态创建Access资料库
procedure TForm1.SetupTable(sender:tobject);
Var
CreateAccess:OleVariant;
adocon1:TADOConnection;
strSQL:string;
Const
SConnectionString= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;'+
'Jet OLEDB:Database Password=%s;';
begin
CreateAccess:=CreateOleObject('ADOX.Catalog');
if FileExists(ExtractFilePath(application.ExeName)+'delphi_about_Access.mdb') then
exit
else
CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+
ExtractFilePath(application.ExeName)+'Delphi_About_Access.mdb');
adocon1:=TADOConnection. create(self);
adocon1.ConnectionString:=format(SConnectionString,[ExtractFilePath(application.ExeName)+
'delphi_about_Access.mdb','']);
//栏位内容
strsql:='Create table Shops(ShopID counter PRIMARY KEY,'+
'ShopName char(20),'+
'ShopADD char(30),'+
'ShopPhone char(15),'+
'ShopManager char(10),'+
'ShopMangerPhone char(15),'+
'Remark char(20),'+
'[字串] string,'+
'[数字1] integer,'+
'[数字2] numeric,'+
'[小数] Decimal,'+
'[整数] SMALLINT,'+
'[浮点] FLOAT,'+
'[二进制] binary,'+
'[日期1] DateTime,'+
'[日期2] Date,'+
'[日期3] Time,'+
'[是否] YESNO,'+
'[钱币] CURRENCY,'+
'[OLE物件] LONGBINARY,'+
'[备注] MEMO)';
adocon1.Execute(strsql);//表Shops建立
adocon1.close;
adocon1.free;
end;
//
procedure TForm1.SetupTable(sender:tobject);
Var
CreateAccess:OleVariant;
adocon1:TADOConnection;
strSQL:string;
Const
SConnectionString= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;'+
'Jet OLEDB:Database Password=%s;';
begin
CreateAccess:=CreateOleObject('ADOX.Catalog');
if FileExists(ExtractFilePath(application.ExeName)+'delphi_about_Access.mdb') then
exit
else
CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+
ExtractFilePath(application.ExeName)+'Delphi_About_Access.mdb');
adocon1:=TADOConnection. create(self);
adocon1.ConnectionString:=format(SConnectionString,[ExtractFilePath(application.ExeName)+
'delphi_about_Access.mdb','']);
//栏位内容
strsql:='Create table Shops(ShopID counter PRIMARY KEY,'+
'ShopName char(20),'+
'ShopADD char(30),'+
'ShopPhone char(15),'+
'ShopManager char(10),'+
'ShopMangerPhone char(15),'+
'Remark char(20),'+
'[字串] string,'+
'[数字1] integer,'+
'[数字2] numeric,'+
'[小数] Decimal,'+
'[整数] SMALLINT,'+
'[浮点] FLOAT,'+
'[二进制] binary,'+
'[日期1] DateTime,'+
'[日期2] Date,'+
'[日期3] Time,'+
'[是否] YESNO,'+
'[钱币] CURRENCY,'+
'[OLE物件] LONGBINARY,'+
'[备注] MEMO)';
adocon1.Execute(strsql);//表Shops建立
adocon1.close;
adocon1.free;
end;
//
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询