Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 12.05.2009, 19:31   #61
ArtInt
Форумчанин
 
Аватар для ArtInt
 
Регистрация: 06.03.2009
Сообщений: 583
По умолчанию

По-моему да, тогда будет проверка на уникальное ФИО.
Только вот условие Locate все таки наверное в цикл надо переместить перед проверкой пустой строки. Иначе сейчас, может быть ошибка если i неопределено и проверка будет только для одной фамилии. Так что наверное в цикле.
Не стыдно чего-то не знать, стыдно не стремиться к знаниям.
ArtInt вне форума
Старый 14.05.2009, 04:22   #62
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Что-то не получается у меня с этим условием сделать . Выдает ошибку на этой строке:
Код:
   if Form2.Table1.Locate('ФАМИЛИЯ;ИМЯ;ОТЧЕСТВО',VarArrayOf(Form1.SG9.Cells[1,i],Form1.SG9.Cells[2,i],Form1.SG9.Cells[3,i],[loCaseInsensitive, loPartialKey]) = False then
и ставит курсор после запятой, перед Form1.SG9.Cells[2,i]. В ошибке пишет: "Incompatible types: "Array" and "String"". В чем проблема? На что исправить?
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума
Старый 14.05.2009, 10:07   #63
ArtInt
Форумчанин
 
Аватар для ArtInt
 
Регистрация: 06.03.2009
Сообщений: 583
По умолчанию

Цитата:
Сообщение от artemavd Посмотреть сообщение
Что-то не получается у меня с этим условием сделать . Выдает ошибку на этой строке:
Код:
   if Form2.Table1.Locate('ФАМИЛИЯ;ИМЯ;ОТЧЕСТВО',VarArrayOf(Form1.SG9.Cells[1,i],Form1.SG9.Cells[2,i],Form1.SG9.Cells[3,i],[loCaseInsensitive, loPartialKey]) = False then
и ставит курсор после запятой, перед Form1.SG9.Cells[2,i]. В ошибке пишет: "Incompatible types: "Array" and "String"". В чем проблема? На что исправить?
Конечно, будет ошибка, ведь синтаксис не совсем верный, где закрывающая скобка для массива ')' , а также '[' и ']'.
Вообщем должно где то так быть
Код:
if Form2.Table1.Locate('ФАМИЛИЯ;ИМЯ;ОТЧЕСТВО',VarArrayOf([Form1.SG9.Cells[1,i],Form1.SG9.Cells[2,i],Form1.SG9.Cells[3,i]]),[loCaseInsensitive, loPartialKey]) = False then
Не стыдно чего-то не знать, стыдно не стремиться к знаниям.
ArtInt вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Связь таблиц в Database Desctop Sergius X БД в Delphi 0 22.04.2009 16:53
Связь с кучей dbf файлов (таблиц) через OLEDB через UNION ALL Sasha811 SQL, базы данных 0 01.01.2009 14:04
Связь таблиц в Delphi adinadin111 БД в Delphi 3 10.07.2008 14:50
связь таблиц в локальной БД IGREK БД в Delphi 3 30.06.2008 19:46
Связь таблиц БД kaa БД в Delphi 5 18.09.2007 18:29