請問各位先進
最近開始學DELPHI,想要對資料庫作處理,
如果要擷取資料欄位的長度和型態,不知要如何做
因為我用下面的方法,欄位若是字元能秀出來位數,但是如果是數字欄位位數都是0,請幫忙解答!謝謝!
For i := 0 to tb.fields.count - 1 do
cb.items.add(tb.fields.FieldName '-' IntToStr(tb.fieldByName(tb.Fields.FieldName).size));
字元OK
數字=0 --是否可以有位數及小數資訊?

由DataType去判斷欄位資料別

procedure TForm1.Button1Click(Sender: TObject);
var
i:Integer;
begin
For i := 0 to tb.fields.count - 1 do
begin
case tb.Fields[i].DataType of
ftString:
Memo1.Lines.add(tb.fields[i].FieldName '-' IntToStr(tb.fieldByName(tb.Fields[i].FieldName).size));
ftInteger:
Memo1.Lines.add(tb.fields[i].FieldName '-' IntToStr(SizeOf(Integer)));
ftSmallInt:
Memo1.Lines.add(tb.fields[i].FieldName '-' IntToStr(SizeOf(SmallInt)));
ftFloat:
Memo1.Lines.add(tb.fields[i].FieldName '-小數位數' IntToStr(TFloatField(tb.fieldByName(tb.Fields[i].FullName)).Precision));
end;
end;
end;

感謝!

對於小數部分,在下是因為要取得SERVER端定義的位數,來設定CLIENT端的長度

所以麻煩您在指導一下,

例如:

SERVER

欄位 pic 999999V99 為六位整數兩位小數

謝謝!