Форум: "Базы";
Текущий архив: 2002.11.07;
Скачать: [xml.tar.bz2];

Вниз

Field description   Найти похожие ветки 

← →
Макз   (2002-10-19 05:02) [0]

Раз уже задавал такой вопрос, и остался без ответа: может кто знает как добраться до субж из delphi?

---

← →
vads   (2002-10-20 09:32) [1]

А подразумевается под Field description ???

---

← →
makdi   (2002-10-21 07:29) [2]

Ты хочешь узнать название, тип, размер поля?
Копай TFields.

---

← →
Vlad2   (2002-10-21 08:36) [3]

> Макз
Если я правильно понял вопрос, необходимо получить некие мета данные о полях таблицы. Если таблица - объект mssql200 сервера, то можно использовать функцию:
select * from ::fn_listextendedproperty(
NULL, "user", "dbo", "table", "[имя таблицы]",
"column", NULL)
Извини, если что не так.

---

← →
MetalFan   (2002-10-21 09:36) [4]

может это подойдет?

procedure TForm1.Button1Click(Sender: TObject);
var
I:Integer;
begin
//OpenDialog1.Filter:="DB Files|*.DB;All Files|*.*"
if not OpenDialog1.Execute then exit;
Memo1.Lines.Clear;
with Table1 do begin
TableName:=OpenDialog1.FileName;
open;
for I:=0 to FieldDefs.Count-1 do
Memo1.Lines.Add(IntToStr(FieldDefs[i].FieldNo)+#9+
FieldDefs[i].Name+#9#9+
FieldDefs[i].FieldClass.ClassName +#9+
IntToStr(FieldDefs[i].Size));

close;
end;//with
end;


---

Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2002.11.07;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.006 c