Платные хостинги     Раскрутка сайта     Книги по программированию

неявно обратится к таблице

- Здравствуйте!Допустим у меня сформировалась таблица 'G_777_777'Как мне через текстовую строку, содержащее наименование этой таблицы, обращатся к ней, и ко всем ее свойствам/методам и т.д...Например:Код s:='G_777_777';s.Open;s.Field[5].Asinteger:=4;// и т.д.highlightSyntax('delphizNjZDA','delphi');Второй вопрос имет отношение к первому, и надеюсь я не нарушу правила форума:Как бы мне еще неявно определить тип поля, чтобы также к нему обращатся?Например:Код for i:=0 to dm.ADOTableKart.FieldCount-1 do  begin   case  dm.ADOTableKart.nameType of//nameType - это свойство я сам придумал  date:  int:///etc....  end;highlightSyntax('delphijRmMDM','delphi');Помогите, товарищи!!

- Если я тебя понял правильно - ты хочешь к одной ADOTable подцеплять поочерено несколько таблиц, тогда так:1.Создаешь ADOConnection (естественно подключаешь его к базе), ADOTable1. В объект инспекторе подкючаешь ADOTable1 k ADOConnection.2. (для проверки DBGrid, DataSource - всё это привязываешь к ADOTable1)Код var   s: array[0..1] of string;highlightSyntax('delphilhZjNk','delphi');...Код s[0]:='G_777_777';s[1]:='G_888_888';ADOTable1.Close;ADOTable1.TableName:=s[0];ADOTable1.Open;Showmessage('Таблица '+s[0]);ADOTable1.Close;ADOTable1.TableName:=s[1];ADOTable1.Open;Showmessage('Таблица '+s[1]);highlightSyntax('delphimU1MTE','delphi');Кстати так же можно менять и CONNECTION.А если я тебя понял неправильно, то тебе нужно совсем другое и всё вышеописанное можешь не читать. Добавлено @ 11:41 Если я тебя понял правильно - ты хочешь к одной ADOTable подцеплять поочерено несколько таблиц, тогда так:1.Создаешь ADOConnection (естественно подключаешь его к базе), ADOTable1. В объект инспекторе подкючаешь ADOTable1 k ADOConnection.2. (для проверки DBGrid, DataSource - всё это привязываешь к ADOTable1)Код var   s: array[0..1] of string;highlightSyntax('delphiBkNmM3','delphi');...Код s[0]:='G_777_777';s[1]:='G_888_888';ADOTable1.Close;ADOTable1.TableName:=s[0];ADOTable1.Open;Showmessage('Таблица '+s[0]);ADOTable1.Close;ADOTable1.TableName:=s[1];ADOTable1.Open;Showmessage('Таблица '+s[1]);highlightSyntax('delphijMDkxM','delphi');Кстати так же можно менять и CONNECTION.А если я тебя понял неправильно, то тебе нужно совсем другое и всё вышеописанное можешь не читать.

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD