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

Вниз

Сравнение двух полей, двух разных таблиц   Найти похожие ветки 

 
Gaber   (2002-09-09 14:03) [0]

Подскажите пожалуйста, как организовать такое сравнние:

Две таблицы, поля одинаковые, как сравнить содержимое?


 
Val   (2002-09-09 14:05) [1]

уточните вопрос, слижком уж общий получился.


 
Mike Kouzmine   (2002-09-09 14:12) [2]

Ok := true;
for I := 0 to t1.fielsacount - 1 do
begin
if t1.fields[I].fieldkind = fkData then
if t1.field[I].value <> t2.fieldbyname(t1.Fields[i].fieldname).Value then
begin
Ok := False;
Break;
end


 
Gaber   (2002-09-09 17:06) [3]

Есть две таблицы, я вывожу например в label1.caption, один ответ из одной таблицы, а в другие label ответ из другой таблицы, и кнопки, если нажата кнопка 1 сравнить label1.caption с содержанием поля таблицы 2, или через DBText. Или ComboBox.


 
Val   (2002-09-09 17:10) [4]

>Gaber © (09.09.02 17:06)
ну а в чем проблема, если вы смогли вывести эти данные в кэпшнс, почему не можете сравнить??


 
Gaber   (2002-09-09 18:22) [5]

Хотелось бы сравнивать не caption а именно поля таблиц, потому что я хотел выводить в качестве caption ответы из 2 таблицы, хотя, а как это будет выглядеть,

if label1.captions = ??????


 
Mike Kouzmine   (2002-09-09 18:33) [6]

if t1.fieldbyname("Vasia").Value = t2.fieldbyname("Vasia").Value


 
Val   (2002-09-09 18:35) [7]

if Table1.FieldByName("Field1").AsInteger <> Table2.FieldByName("Field2").AsInteger then...
впрочем, такой ответ вам уже дали выше.


 
MsGuns   (2002-09-09 21:38) [8]

Если сравнение нужно зараз по одной записи, то Val © ответил исчерпывающе, если для курсоров (гридов), представлющих множество записей, то лучший метод ИМХО таков:
Курсор 2 (записи табл.2) копируются во врем.таблицу Tmp (например, TBatchMove`ом) Из Tmp удаляются все записи, у которых указанные поля имеют то же значения, что и у Курсора 1, оставшиеся в Tmp и есть НЕСОВПАДАЮЩИЕ. Их можно зачитать куда угодно, подсчитать, вывести для глаз юзера и т.д.
Немного громозко в сырце, но "летает"



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

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

Наверх





Память: 0.46 MB
Время: 0.007 c
1-98031
LEV
2002-09-18 21:56
2002.09.30
ВОПРОС


1-98178
explorer
2002-09-18 09:31
2002.09.30
При создании формы вызвать событие закрытия формы


3-98004
Карелин Артем
2002-09-10 16:08
2002.09.30
Ускорение работы базы при больших Blob.


1-98194
Dimich1978
2002-09-18 11:57
2002.09.30
StringGrid


7-98385
AlexRya
2002-07-15 22:32
2002.09.30
Drag&drop объектов йз своего приложения в проводник





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский