Ошибка: Аргументы имеют неверный тип, выходят за пределы допустимого диапазона или вступают в конфликт

@Сергелиус · Регистрация: 15.05.2017

Студворк — интернет-сервис помощи студентам

Уважаемые программисты прошу вас помогите мне пожалуйста.Я создаю программу в Delphi которая связывается с бд при помощи ADO Table.Когда я связывал таблицы между собой появлялась ошибка:Аргументы имеют неверный тип,выходят за пределы допустимого диапазона,или вступают в конфликт друг с другом.Это моя дипломная работа.Если не сделаю до 20 мая меня возможно исключат.Прошу помогите

@vijer · 16.05.2017, 06:58

Сергелиус, Приведите код который вы писали и скорее всего вам укажут и расскажут об ошибках.

@Cold · 16.05.2017, 08:08

Сергелиус не в тот раздел написали, скорей вам туда "Delphi и базы данных"
также, скиньте программу (что сделали), или как сказал vijer, приведите код.

@Сергелиус · 17.05.2017, 19:31 **[ТС]**

Так ладно с этим покончено.Народ подскажите мне как сделать запрос на поиск правильно.У меня такие вот ошибки:
[dcc32 Error] Unit1.pas(69): E2052 Unterminated string
[dcc32 Error] Unit1.pas(74): E2029 '.' expected but ';' found
Если что вот код:Документ Microsoft Word.docx

@Сергелиус · 17.05.2017, 19:34 **[ТС]**

Конкретно вот:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm1.Edit1Change(Sender: TObject);
var help1,help2:string;
begin
help1:='%'+Form1.Edit1.Text+'%';
help2:=QuotedStr(help1);
with Form1.ADOQuery1,ADOQuery2 do
begin
close;
SQL.Clear;
SQL.Add'SELECT Englishwords englishword Englishwords Transcription Russianwords Russianword
from 'Englishwords Russianwords'
where 'Englishwords englishword like '+help2+' or Russianwords Russianword like '+help2+''order by englishword Russianword'';
Open;
end;
end;

Добавлено через 49 секунд
Строка SQL.Add и дальше

Добавлено через 25 секунд
Прям срочно

@Cold · 17.05.2017, 20:44

надо запрос в скобки брать
как то так... с '' поиграться надо....

Добавлено через 2 минуты

Delphi
1
2
3
SQL.Add('SELECT Englishwords englishword Englishwords Transcription Russianwords Russianword');
SQL.Add ('from Englishwords Russianwords');
SQL.Add ('where 'Englishwords englishword like '+help2+' or Russianwords Russianword like '+help2+''order by englishword Russianword''');

@Сергелиус · 18.05.2017, 19:16 **[ТС]**

А конкретно сколько должно быть " и как правильно их писать

Добавлено через 2 часа 8 минут
Точнее расставить

@Cold · 18.05.2017, 21:54

Delphi
1
2
3
SQL.Add('SELECT Englishwords englishword Englishwords Transcription Russianwords Russianword');
SQL.Add ('from Englishwords Russianwords');
SQL.Add ('where Englishwords englishword like '+help2+' or Russianwords Russianword like '+help2+'order by englishword Russianword');

@YuryK · 19.05.2017, 00:57

Если таблицы Englishwords и Russianwords не связаны между собой то выбирать нужно отдельно из каждой таблицы:

SQL
1
2
3
4
5
6
7
8
SQL.Add('SELECT englishword, Transcription');
SQL.Add ('from Englishwords');
SQL.Add ('where Englishwords englishword like '+QuotedStr(help2));
SQL.Add ('UNION ALL');
SQL.Add('SELECT  Russianword, NULL');
SQL.Add ('from Russianwords');
SQL.Add ('where Russianword like '+ +QuotedStr(help2)); 
SQL.Add ('order by 1');

а если связаны, то при соединении таблиц нужно указать эту связь, а то просто перемножите их, сопоставив каждой записи из Englishwords полностью все записи из Russianwords

P.S. между именем таблицы и именем поля должна стоять точка, а между именами полей/таблиц - запятая

T-SQL
1
2
3
4
5
6
SELECT Englishwords.englishword, Englishwords.Transcription, Russianwords.Russianword
from Englishwords, Russianwords
where 
Englishwords.<поле связи> = Russianwords.<поле связи> AND
(Englishwords.englishword like ... or Russianwords.Russianword like ..)
order by englishword.Russianword

@Сергелиус · 20.05.2017, 18:42 **[ТС]**

Помогите пожалуйста я немогу уже.Пытался настроить поиск и отладить программу правильно.Ничего не вышло.Появляются вот ТАКИЕ 14 ОШИБОК:
[dcc32 Error] Unit1.pas(68): E2029 Expression expected but ')' found
[dcc32 Error] Unit1.pas(71): E2010 Incompatible types: 'Integer' and 'string'
[dcc32 Error] Unit1.pas(72): E2010 Incompatible types: 'Integer' and 'string'
[dcc32 Error] Unit1.pas(73): E2010 Incompatible types: 'Integer' and 'string'
[dcc32 Error] Unit1.pas(74): E2010 Incompatible types: 'Integer' and 'string'
[dcc32 Error] Unit1.pas(79): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Error] Unit1.pas(79): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Error] Unit1.pas(79): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Error] Unit1.pas(86): E2029 Expression expected but ')' found
[dcc32 Error] Unit1.pas(90): E2010 Incompatible types: 'Integer' and 'string'
[dcc32 Error] Unit1.pas(91): E2010 Incompatible types: 'Integer' and 'string'
[dcc32 Error] Unit1.pas(96): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Warning] Unit1.pas(96): W1058 Implicit string cast with potential data loss from 'string' to 'ShortString'
[dcc32 Error] Unit1.pas(102): E2010 Incompatible types: 'string' and 'Integer'
[dcc32 Warning] Unit1.pas(102): W1058 Implicit string cast with potential data loss from 'string' to 'ShortString'

@Сергелиус · 20.05.2017, 18:48 **[ТС]**

Вот код. Ребят помогите.До понедельника отладить нужно

@Сергелиус · 20.05.2017, 18:48 **[ТС]**

Мне уже плохо я несколько суток не спал

@Пытливый · 20.05.2017, 23:09

Мне уже плохо я несколько суток не спал

О, да! Написать такой шедевр можно только с хорошего будуна

1. Скажите, из какого конспекта вы выдрали вот этот кусок кода?

Delphi
1
var hel1, hel2:inc(I);

Здесь должен быть тип переменной, а у вас вызов функции inc(I).
2. Свойство Form1.DBEdit1.Text возвращает строку. Функция IntToStr(Arg) преобразует число в строку и в качестве аргумента может только число принимать, а не все что угодно. Естественно вы получаете ошибку, что Целое число и Строка несовместимы.

@Сергелиус · 21.05.2017, 09:11 **[ТС]**

Хорошо. Вот еще один вариант.Должно было быть все нормально но выводит"Прекращена работа программы"

@YuryK · 21.05.2017, 09:42

В Wordeне не запускается, а ошибки выполнения под отладчиком хорошо ловятся, а не при чтении чужого кода

@D1973 · 21.05.2017, 10:03

Сергелиус, кому, интересно, нужен код, напечатанный в Ворде? Без Ваших форм и БД эта писанина абсолютно бесполезна... Выставляйте полностью проект (*.dpr, *.pas, *.dfm + файл БД в одном архиве)

@Пытливый · 21.05.2017, 11:41

Да, ошибок явных я тоже не вижу, так что теперь действительно нужен ваш проект. Соберите в архив файлы *.dfm,*.dpr,*.pas относящиеся к вашему проекту в один архив, на забудьте туда добавить базу и прицепите полученный архив сюда к сообщению. Будем смотреть.

@Сергелиус · 21.05.2017, 15:42 **[ТС]**

Вот

@YuryK · 21.05.2017, 16:06

почему для "поиска по ключу" используется TDBEdit?

вы не искать будете, а редактировать поле текущей записи.
А сейчас просто зацикливаетесь в обработчике TForm1.DBEdit1Change(Sender: TObject);, когда на событие изменение поля (а это не только редактирование, но и перемещение от записи к записи), переоткрываете этот же набор данных, что повторно вызывает этот обработчик, и т.д. и т.п.

Используйте обычный TEdit, как для поиска по слову

@Сергелиус · 21.05.2017, 17:12 **[ТС]**

Спасибо большое
Подожди на вашем ПК она запускается?

Новые блоги и статьи Все статьи Все блоги /
Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	Контроль уникальности заводского номера - вариант №2 Maks 24.03.2026 В отличие от предыдущего варианта добавлено прерывание циклов, также добавлены новые переменные для сохранения контекста ошибки перед прерыванием цикла: Процедура ПередЗаписью(Отказ, РежимЗаписи,. . .
SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip	Жизнь в неопределённости kumehtar 23.03.2026 Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .	Модель здравоСохранения: работники работают быстрее после её введения. anaschu 23.03.2026 geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .	Контроль уникальности заводского номера - вариант №1 Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью в конфигурации КА2. Данные берутся из регистра сведений, по. . .

@Сергелиус 0 / 0 / 0 Регистрация: 15.05.2017 Сообщений: 18

	Ошибка: Аргументы имеют неверный тип, выходят за пределы допустимого диапазона или вступают в конфликт 15.05.2017, 17:34. Показов 11538. Ответов 34 Метки нет (Все метки) Уважаемые программисты прошу вас помогите мне пожалуйста.Я создаю программу в Delphi которая связывается с бд при помощи ADO Table.Когда я связывал таблицы между собой появлялась ошибка:Аргументы имеют неверный тип,выходят за пределы допустимого диапазона,или вступают в конфликт друг с другом.Это моя дипломная работа.Если не сделаю до 20 мая меня возможно исключат.Прошу помогите 0

@vijer 24 / 22 / 9 Регистрация: 23.09.2014 Сообщений: 326
	16.05.2017, 06:58
	Сергелиус, Приведите код который вы писали и скорее всего вам укажут и расскажут об ошибках. 0

@Cold 87 / 87 / 65 Регистрация: 22.05.2014 Сообщений: 485
	16.05.2017, 08:08
	Сергелиус не в тот раздел написали, скорей вам туда "Delphi и базы данных" также, скиньте программу (что сделали), или как сказал vijer, приведите код. 0

@Сергелиус 0 / 0 / 0 Регистрация: 15.05.2017 Сообщений: 18
	17.05.2017, 19:31 [ТС]
	Так ладно с этим покончено.Народ подскажите мне как сделать запрос на поиск правильно.У меня такие вот ошибки: [dcc32 Error] Unit1.pas(69): E2052 Unterminated string [dcc32 Error] Unit1.pas(74): E2029 '.' expected but ';' found Если что вот код:Документ Microsoft Word.docx 0

@Сергелиус 0 / 0 / 0 Регистрация: 15.05.2017 Сообщений: 18
	18.05.2017, 19:16 [ТС]
	А конкретно сколько должно быть " и как правильно их писать Добавлено через 2 часа 8 минут Точнее расставить 0

@Сергелиус 0 / 0 / 0 Регистрация: 15.05.2017 Сообщений: 18
	20.05.2017, 18:42 [ТС]
	Помогите пожалуйста я немогу уже.Пытался настроить поиск и отладить программу правильно.Ничего не вышло.Появляются вот ТАКИЕ 14 ОШИБОК: [dcc32 Error] Unit1.pas(68): E2029 Expression expected but ')' found [dcc32 Error] Unit1.pas(71): E2010 Incompatible types: 'Integer' and 'string' [dcc32 Error] Unit1.pas(72): E2010 Incompatible types: 'Integer' and 'string' [dcc32 Error] Unit1.pas(73): E2010 Incompatible types: 'Integer' and 'string' [dcc32 Error] Unit1.pas(74): E2010 Incompatible types: 'Integer' and 'string' [dcc32 Error] Unit1.pas(79): E2010 Incompatible types: 'string' and 'Integer' [dcc32 Error] Unit1.pas(79): E2010 Incompatible types: 'string' and 'Integer' [dcc32 Error] Unit1.pas(79): E2010 Incompatible types: 'string' and 'Integer' [dcc32 Error] Unit1.pas(86): E2029 Expression expected but ')' found [dcc32 Error] Unit1.pas(90): E2010 Incompatible types: 'Integer' and 'string' [dcc32 Error] Unit1.pas(91): E2010 Incompatible types: 'Integer' and 'string' [dcc32 Error] Unit1.pas(96): E2010 Incompatible types: 'string' and 'Integer' [dcc32 Warning] Unit1.pas(96): W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' [dcc32 Error] Unit1.pas(102): E2010 Incompatible types: 'string' and 'Integer' [dcc32 Warning] Unit1.pas(102): W1058 Implicit string cast with potential data loss from 'string' to 'ShortString' 0

@Сергелиус 0 / 0 / 0 Регистрация: 15.05.2017 Сообщений: 18
	20.05.2017, 18:48 [ТС]
	Мне уже плохо я несколько суток не спал 0

@YuryK 1040 / 856 / 335 Регистрация: 08.12.2016 Сообщений: 3,283
	21.05.2017, 09:42
	В Wordeне не запускается, а ошибки выполнения под отладчиком хорошо ловятся, а не при чтении чужого кода 0

@D1973 Модератор 9926 / 6462 / 2457 Регистрация: 21.01.2014 Сообщений: 27,416 Записей в блоге: 3
	21.05.2017, 10:03
	Сергелиус, кому, интересно, нужен код, напечатанный в Ворде? Без Ваших форм и БД эта писанина абсолютно бесполезна... Выставляйте полностью проект (.dpr, .pas, *.dfm + файл БД в одном архиве) 0

@Пытливый 3763 / 2267 / 705 Регистрация: 29.05.2013 Сообщений: 9,622
	21.05.2017, 11:41
	Да, ошибок явных я тоже не вижу, так что теперь действительно нужен ваш проект. Соберите в архив файлы .dfm,.dpr,*.pas относящиеся к вашему проекту в один архив, на забудьте туда добавить базу и прицепите полученный архив сюда к сообщению. Будем смотреть. 0

@YuryK 1040 / 856 / 335 Регистрация: 08.12.2016 Сообщений: 3,283
	21.05.2017, 16:06
	почему для "поиска по ключу" используется TDBEdit? вы не искать будете, а редактировать поле текущей записи. А сейчас просто зацикливаетесь в обработчике TForm1.DBEdit1Change(Sender: TObject);, когда на событие изменение поля (а это не только редактирование, но и перемещение от записи к записи), переоткрываете этот же набор данных, что повторно вызывает этот обработчик, и т.д. и т.п. Используйте обычный TEdit, как для поиска по слову 0

@Сергелиус 0 / 0 / 0 Регистрация: 15.05.2017 Сообщений: 18
	21.05.2017, 17:12 [ТС]
	Спасибо большое Подожди на вашем ПК она запускается? 0