Pochemu teriaetsia tip ftInteger?

← →
Levan (2004-03-10 13:20) [0]

Privet masteram!
vot programma:

procedure TForm1.FormCreate(Sender: TObject);
VAR
DB:TDATABASE;
TB:TTABLE;
tt:tfieldtype;
begin
DB:=TDATABASE.Create(NIL);
DB.DatabaseName:="MYWORK";
DB.Params.ADD("PATH=c:\");
DB.Params.Add("dRIVER=FoxPro");
db.DriverName:="standard";
tb:=ttable.Create(nil);
tb.TableName:="work";
tb.tabletype:=ttFoxpro;
tb.DatabaseName:=db.DatabaseName;
tb.FieldDefs.Add("cod",ftInteger);
tb.CreateTable;
tb.Open();
tt:=tb.FindField("cod").DataType;
tb.FieldDefs.Add("coc",tt); //tochke ostanova
tb.close();
tb.Free();
db.Free();

nujni uses db,dbtables

v ukazanooi tochke ostanavlivaiu programmu, i smotriu

peremennaia tt imeet tip ftFloat !
pochemu? ved ia zadal tio ftInteger?

kak oboiti ?

spasibo
Levan

← →
myor © (2004-03-10 14:21) [1]

посмотри тип tb.FindField("cod").DataType;

← →
Levan (2004-03-10 15:14) [2]

TO myor:
IMENNO, SMPTRIU, A TAM ftFloat
pochemu?

← →
Desdechado © (2004-03-10 16:09) [3]

ну, в DBF integer нету, есть numeric, который может быть и целым как частный случай.
вот float и определяется в БДЕ

← →
Levan (2004-03-10 16:21) [4]

to Desdechado:
spasibo , no kak mne peredat znachenie "integer" iz etogo polia v pole integer bazi MS SQL server (ne postrochno):

insert into ":mainbase:sqltable" (cod)
select cod from ":dbfbase:dbftable"

v oboix cod sozdaetsia tipom ftinteger,
no etot sql-zapros daet soobshenie "Type mismatch"

posovetuite, chto delat..

имхо, такой код не прокатит
если хочешь из одного в другое залить, возьми DataPump или TBatchMove

← →
Levan (2004-03-11 08:54) [6]

spasibo, poprobuiu

Pochemu teriaetsia tip ftInteger? Найти похожие ветки