Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];

Вниз

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

 
Koks   (2001-12-21 11:44) [0]

Есть код:
Procedure DoSmt(var quSorce:TQuery);
var
Str: string;
begin
Str := quSource.FieldByName("FIELDNAME").AsString;
end;

поле FIELDNAME - вычисляемое (в некоторых передаваемых TQuery - Lookup).
Выдается ошибка ("Нет поля FIELDNAME")
как правильно осуществить доступ к Look-up и Calculated полям ?

Заранее спасибо....


 
Kouzmine   (2001-12-21 12:03) [1]

Надо создать статические поля. Там будет это поле quSourctFIELDNAME и использывать quSourceFIELDNAME.Value или asString. Но тогда quSource должен быть виден в процедуре, а сама процедура будет выгляд так
procedure DoSmt;
var
Str : String;
begin
Str := quSourceFIELDNAME.AsString и т.д.
Естественно раз не ндо передавать параметр, можно обращаться прямо к запросу. Если запросы разные надо передавать, то тут немного по другому


 
Koks   (2001-12-21 15:00) [2]

в том-то вся и фишка что они разные. Более того, их много но у всех у них есть строковое DisplayStr. Только у некоторых это поле - lookup, а у некоторых - Calculated.
И все они изначально статические.....

И все равно Ей не нравится....


 
Kouzmine   (2001-12-25 12:14) [3]

Тогда передавай номер поля в процедуре, а обращайся Str := quSource.Fields[I].AsString; где I - этот параметр.


 
Koks   (2001-12-26 11:30) [4]

спасибо за совет, но я все же не догоняю - почему не работает FieldByName.
Объясните на теоритическом уровне.....


 
Alexandr   (2001-12-26 11:32) [5]

на теоретическом уровне все должно работать


 
Mick   (2001-12-26 11:33) [6]

FieldByName работает, просто у тебя в датасете поля такого нет



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

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

Наверх





Память: 0.76 MB
Время: 2.523 c
1-99983
MystiX
2002-01-14 17:45
2002.01.31
Heeelp!!!


3-99859
DeadMoroz
2001-12-26 12:05
2002.01.31
Киньте ссылкой


3-99908
dmitryK
2001-12-29 12:43
2002.01.31
Через BDE к MSSQL6.5 в Delphi 6


14-100045
ESergey
2001-12-07 21:40
2002.01.31
Delphi Developer needed


1-99933
veZuk
2002-01-12 12:13
2002.01.31
Запуск программы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский