Locate

← →
tamara (2003-07-08 15:22) [0]

СООБЩЕНИЕ ОБ ОШИБКЕ:
--[Error] UnitPOTR1.pas(106): Incompatible types: "DB.TLocateOption" and "UnitPOTR1.TLocateOption"--

ЧТО Я ДЕЛАЮ НЕПРАВИЛЬНО? БАЗА ДАННЫХ SQL.ЗАРАНЕЕ ВСЕМ БЛАГОДАРНА

type
TLocateOption = (loCaseInsensitive, loPartialKey);
TLocateOptions = set of TLocateOption;
.
.
var
KEYVALUES:Variant;
Options:TLocateOptionS;
.
.
IF NOT DataModulePROM.ADOTablePOTR.Locate("NAMEPR", Trim(EditWWOD.Text), Options) then begin;
//

← →
Silla (2003-07-08 15:26) [1]

Может так:

IF NOT DataModulePROM.ADOTablePOTR.Locate("NAMEPR", Trim(EditWWOD.Text), []) then

← →
stone (2003-07-08 15:32) [2]

2 tamara © (08.07.03 15:22)

А проще нельзя?

IF NOT DataModulePROM.ADOTablePOTR.Locate("NAMEPR", Trim(EditWWOD.Text), [loCaseInsensitive, loPartialKey]) then begin

← →
DenK_vrtz (2003-07-08 15:36) [3]

stone © (08.07.03 15:32), надо, чтобы кода много было! :-)

← →
KDS (2003-07-08 18:31) [4]

type TLocateOption = (loCaseInsensitive, loPartialKey); TLocateOptions = set of TLocateOption;

вот этого писать в программе своей не надо было
достаточно подключить модуль DB
uses DB;
в котором эти типы уже определены.
лучше всего писать конкретно каждый раз эти опции,как уже высказал
stone чем водить дополнительные переменные "Options" и заполнять их параметрами.

← →
тамара (2003-07-09 08:59) [5]

Большое спасибо!
Причина была в подключении модуля DB!
Спасибо KDS!

← →
Е-Моё имя (2003-07-09 13:04) [6]

просто поразительно!

http://delphi.vitpc.com/asp/answer.asp?IDAnswer=17152

может это в книжке какой написали такое, что люди пачками на этом попадаются...

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