Непонятка с запросом

[WishNight]

Подскажите, плиз.


Вот такой запрос:

AdoQuery1.Close;
AdoQuery1.SQL.Clear;
AdoQuery1.SQL.Add('SELECT Printers.МОдель_ТС, SuppliesType.Модель_РМ');
AdoQuery1.SQL.Add('FROM SuppliesType INNER JOIN (Printers INNER JOIN Supplies ON Printers.ID_model = Supplies.Модель_ТС) ON SuppliesType.ID_Supp = Supplies.Модель_РМ');
AdoQuery1.SQL.Add('WHERE Printers.МОдель_ТС="i"');
AdoQuery1.Close;

Переменная i чуть раньше принимает значение поля Модель_ТС таблицы Printers.
Собственно непонятка вот в чём:
Если я вместо переменной i указываю напимер "LJ 2200", ('WHERE Printers.МОдель_ТС="LJ 2200"') - то весь запрос работает отлично.
Если же указываю переменную - то выборка не происходит.

В чём затык? Где-нибудь в синтаксисе ошибся?

[maladoy]

В чём затык? Где-нибудь в синтаксисе ошибся?

AdoQuery1.SQL.Add('WHERE Printers.МОдель_ТС='+''''+i+'''');

но так если i:string;

[WishNight]

Спасибо!! заработало

Блин.. нафига столько кавычек лепить? )))

[maladoy]

Потому что 2 кавычки не дают не одной, 3 такаЯ же ерунда, а 4 дают -одну кавычку.Синтаксис дельфи такой

[Alter]

Чтобы не лепит вручную, есть

function QuotedStr(const S: string): string;

[WishNight]

Сообщение от Alter

Чтобы не лепит вручную, есть

function QuotedStr(const S: string): string;

а где сие найти?

[Kotofff]

http://delphi.about.com/library/rtl/blrtlQuotedStr.htm

[WishNight]

Спасибо. Попробую разобратся с этим.

[unknown34]

Сообщение от Alter

Чтобы не лепит вручную, есть

function QuotedStr(const S: string): string;

вообще кавычку как и любой символ можно писать с помощью аски кода
http://www.easywebscripts.net/html/ascii.php

[_Engine_]

...
AdoQuery1.SQL.Add('WHERE Printers.МОдель_ТС=:i');
ADOQuery1.Parameters.ParamByName('i').Value := i;

Варианты решения даны. Плавно и не торопясь закрываем тему - абы флуда избежати...