![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как обьявить поле програмно ? [D6, IB6.x]
Dmitriy O. © (2004-08-16 11:26:00)Во время разработки приложения поле обьявляется очень легко по правой кнопке мыши "добавить поля" как такую фишку организовать програмно ?. Есть такой код
query.SQL.Clear;
query.SQL.Add('select distinct NOMZAV from zaiav where N>=(select max(n)-50 from zaiav)');
query.Prepare;
query.Open;
Потом результаты выборки надо пернести в контрол
mrform.dzaiav.Items.Clear;
while not data.Query.Eof do begin
mrform.Dzaiav.Items.Add(data.querynomzav.asstring);
data.query.Next;
end;
Но естественно если поле заранее не обьявленно (NOMZAV) то компилятор ругается.
Так вот как обьявить это поле в коде во время выполнения проги ?
Dmitriy O. (2004-08-16 11:35:00) [1]
> ловьев © (16.08.04 11:31) [2]
Мда а ведь помнил когдато но забыл. Больше спасибо еще раз !
Dmitriy O. (2004-08-16 11:33:00) [2]
> Соловьев © (16.08.04 11:30) [1]
Большое спасибо ! "Все гениальное просто" (с) не мое
Соловьев (2004-08-16 11:31:00) [3]FieldByName('NOMZAV').AsString;
Соловьев (2004-08-16 11:30:00) [4]
> mrform.Dzaiav.Items.Add(data.querynomzav.asstring);
mrform.Dzaiav.Items.Add(data.query.fields[0].asstring);