не работает фильтр

← →
billybons (2002-08-09 08:28) [0]

Объясните плз ,где грабли :
procedure TMain_frm.phone_dsFilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
//работает:
Accept:=DataSet["Naim"]="Загребин";
//не работает , говорит "Invalid type conversion"
Accept:=pos("Загр",DataSet["Naim"])>0;
end;

хотя в книге все так и написано :(

← →
billybons (2002-08-09 08:36) [1]

да , phone_ds - это TClientDataSet , м.б. дело в этом ?

← →
Leran2002 (2002-08-09 08:38) [2]

Да че мучатся сделай:

var S:string;
...
S:=DataSet["Naim"];
Accept:=pos("Загр",S)>0;

← →
billybons (2002-08-09 08:42) [3]

> Leran2002
один фиг ...

← →
Leran2002 (2002-08-09 08:44) [4]

S:=DataSet["Naim"].AsString;
Accept:=pos("Загр",S)>0;

или

Accept:=pos("Загр",DataSet["Naim"].AsString)>0;

Может так пойдет???

← →
billybons (2002-08-09 08:49) [5]

в этих случаях (обоих) говоорит "Variant does not reference an automation object"

← →
billybons (2002-08-09 08:58) [6]

вот , блин, правильный синтаксис :
Accept:=(pos("Загр",DataSet.FieldByName("Naim").AsString)>0);
> Leran2002

спасибо за сочувствие

← →
Leran2002 (2002-08-09 09:07) [7]

← →
Роман Василенко (2002-08-09 10:40) [8]

Как вариант - ansipos(...) (для D5)
Но работает медленнее.

не работает фильтр Найти похожие ветки