| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с функцией Locate [D6, Paradox]
NickNaz © (2003-11-17 10:53:00)
Добрый день!
У меня возник вопрос связанный с функцией Locate. Проблема в следующем, я пишу: Kopi.Locate("Name_Org; Postav_Programm; Programm", [ "q1", "СТМ", "Феанор"], [locaseInsensitive]); // где Name_Org, Postav_Programm, Programm - текстовые поля.
А Delphi6 пишет, что ошибка: Ordinal type required //после "q1",
Incompatible types: "Integer" and "String" //после [ "q1", "СТМ", "Феанор"], Может, кто-нибудь смог бы помочь решить сложившуюся проблему, очень надо!Заранее благодарю!
С уважением Николай!
NickNaz (2003-11-26 12:55:00) [21]
>VarArrayOf заменить на Variants.VarArrayOf
Заменил и что же, пишет Undeclared identifier: "Variants"
Sandman25 (2003-11-26 12:50:00) [22]
[34] NickNaz © (26.11.03 12:49)
VarArrayOf заменить на Variants.VarArrayOf
NickNaz (2003-11-26 12:49:00) [23]
>И еще: напишите Variants.VarArraOf
Где это написать? В Locate? что ли
Vlad (2003-11-26 12:46:00) [24]
Кто-то кого-то обманывает. Причем нехило...
Sandman25 (2003-11-26 12:45:00) [25]
Точно, что не в них. Закройте Delphi и зайдите заново. Других мыслей у меня уже нет. Если конечно Kopi - это действительно TTable, и Вы не меняли его исходников.
И еще: напишите Variants.VarArraOf
Вдруг Вы там описали свой VarArrayOf(const A: array of integer);
Johnmen (2003-11-26 12:42:00) [26]
Еще строки до With ..
NickNaz (2003-11-26 12:41:00) [27]
>Sandman25 © (26.11.03 12:35) [27]
Легко, но дело не в них!
With DataModule2 do begin
Kopi.Locate("Name_Org;Postav_Programm;Programm",VarArrayOf([ "q1", "СТМ", "Феанор"]), [locaseInsensitive]);
Kopi.Edit;
FKopiAdd.DbEdit1.DataSource:=DataSource3;
FKopiAdd.DbEdit1.DataField:=("Name_Org");
FKopiAdd.DbEdit1.Field.AsString:=z;
Kopi.FieldByName("Postav_Programm").Asstring:=ComboBox1.Text;
Kopi.FieldByName("Programm").Asstring:=ComboBox2.Text;
Kopi.FieldByName("Kolvo_Kopi").Asstring:=Edit1.Text;
Kopi.Post;
end;
Vlad (2003-11-26 12:37:00) [28]
> NickNaz © (26.11.03 12:35) [28]
Покажи строчку перед этой
NickNaz (2003-11-26 12:35:00) [29]
>Vlad © (26.11.03 12:34) [26]
Ни какой реакции
Sandman25 (2003-11-26 12:35:00) [30]
[25] NickNaz © (26.11.03 12:32)
А можно тогда показать пару строчек кода до Locate и после. Может, ошибка там.
Vlad (2003-11-26 12:34:00) [31]
попробуй заюзать DBTables
NickNaz (2003-11-26 12:32:00) [32]
>Sandman25 © (26.11.03 12:29) [23]
Обе ошибки
NickNaz (2003-11-26 12:31:00) [33]
>Vlad © (26.11.03 12:25) [21]
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,ExtCtrls, StdCtrls, Mask, DBCtrls, ComCtrls, ToolWin,db;
Sandman25 (2003-11-26 12:29:00) [34]
Ругается Incompatible types: "Integer" and "String" или Missing operator or semicolon?
Vlad (2003-11-26 12:29:00) [35]
Еще как вариант - в строчке, которая перед этой, не поставлена точка с запятой.
Vlad (2003-11-26 12:25:00) [36]
> NickNaz © (26.11.03 12:23) [20]
приведи что у тебя в uses
NickNaz (2003-11-26 12:23:00) [37]
>Vlad © (26.11.03 12:20) [19]
Да, да и еще раз да!
Vlad (2003-11-26 12:20:00) [38]
> NickNaz © (26.11.03 12:16) [18]
Так ты продолжаешь утверждать что компилятор по-прежнему ругается именно на эту строчку и именно теми словами, которые ты привел выше ?
NickNaz (2003-11-26 12:16:00) [39]
>Johnmen © (26.11.03 12:03) [15]
Kopi класса TTable
Vlad (2003-11-26 12:11:00) [40]
> NickNaz © (26.11.03 12:03) [16]
Мне не сложно.
Выше была приведена ошибка компилятора Missing operator or semicolon
Приведенная тобой строка в том виде в котором ты ее привел компилируется отлично. Так в чем проблема ?
Да и еще ответь на Johnmen © (26.11.03 12:03) [15]
Интересно что за Kopi такое у тебя
| |
Страницы: 