Страница 1 из 1

Не работает формула

Добавлено: 11 июн 2020, 17:29
WPAS
Добрый день. Подскажите, почему не работает формула, пишет, что ожидается запятая?

Код: Выделить всё

procedure Klik1 (Sender: TObject);
var Fm: TdxForm;
IDs: integer;
begin
IDs:=EvalExpr('DBGETID("Статус", "([!Статус]="Свободен")")',self);
Fm := TdxForm.Create ('Форма1');
Fm.OpenRecord(0);
Fm.Append;
Fm.fields['Статус']:=IDs;
Fm.EditWindow.ShowModal;
Fm.Free
end;

Не работает формула

Добавлено: 11 июн 2020, 19:50
Develop-Soft
Тип вложенных кавычек должен чередоваться (внутри двойных можно ставить только одинарные и наоборот).

Не работает формула

Добавлено: 11 июн 2020, 21:44
WPAS
Спасибо. Не сразу, но дошло в чем фишка

Код: Выделить всё

IDs:=EvalExpr('DBGETID("Статус", "[!Статус]=' 'Свободен' ' ")',self);