کلیدها در پارادوکس

[JavanSoft]

یه سوال ساده
-----------
فرض کنید در برنامه نام یک Table از نوع پارادوکس را دریافت میکنید ... چگونه میتوانید بفهمید که کدامیک از فیلدهای این پایگاه کلید هستند؟

[Inprise]

دوست عزیز
همون یک هفته پیش که این سوال رو ازم پرسیدید جوابش رو رو مسنجر براتون فرستادم . متاسفم برای یاهو با این سرویس دهیش . :roll:

یک لیست باکس و یک کلید روی فرمت خود بگذارید و تنظیمات بانک رو انجام بدید و کد زیر رو هم بنویسید :

procedure TForm1.Button1Click(Sender: TObject);

var i:integer;

begin

for i:=0 to pred(table1.IndexFieldCount) do

listbox1.Items.add(table1.IndexFields[i&#9  3;.FieldName);

end;

تمام کار در استفاده از دو تا از خاصیتهای Ttable خلاصه میشه . موفق باشی