Работа с BLOB

[artemavd]

Добрый день! Столкнулся с небольшими проблемами. Вроде бы разобрался с доавлением текста из программы в BLOB-поле. Теперь есть несколько вопросов. Как при запросе сделать, чтобы у меня считывалась информация из БД об ученике, с условием, что фамилия, имя, отчество выбирается из DBEditEh? Даже когда я использую обычный Edit, информация считывается неверно

[soleil@mmc]

может ты для начала приведешь пример запроса, который неверно считывает, описание таблички?

[artemavd]

Вот код запроса, где фамилия, имя, отчество берутся из dbediteh (нужно чтобы оттуда брались):

 Form11.Show;
 Form11.Query1.Active:=False;
 Form11.Query1.SQL.Clear;
 Form11.Query1.SQL.Add('SELECT DISTINCT Familiy,Imy,Otchest,Pol,MestoRogd,FIOOtca,FIOMateri,Nacionalnost,LetSad,OtkudaVibyl,KudaPereshol,AdresPriPost,IzmeneniyAdresa,RodilsyGod,RodilsyMesyc,RodilsyDen,God,Kl');
 Form11.Query1.SQL.Add('FROM spisok');
 Form11.Query1.SQL.Add('WHERE Familiy= ' + QuotedStr(Form6.DBEditEh1.Text) +
                       ' AND Imy= ' + QuotedStr(Form6.DBEditEh2.Text) +
                       ' AND Otchest= ' + QuotedStr(Form6.DBEditEh3.Text));
 Form11.Query1.ExecSQL;
 Form11.Label3.Caption:=Form11.Table1.FieldByName('Familiy').AsString + '  '+
                        Form11.Table1.FieldByName('Imy').AsString + '  ' +
                        Form11.Table1.FieldByName('Otchest').AsString;
 Form11.Label11.Caption:=Form11.Table1.FieldByName('Pol').AsString;
 Form11.Label7.Caption:=Form11.Table1.FieldByName('RodilsyMesyc').AsString;
 Form11.Label9.Caption:=Form11.Table1.FieldByName('RodilsyDen').AsString + ' числа ';
 Form11.Label10.Caption:=IntToStr(Form11.Table1.FieldByName('RodilsyGod').AsInteger) + ' года ';
 Form11.Memo1.Text:=Form11.Table1.FieldByName('MestoRogd').AsString;
 Form11.Memo2.Text:=Form11.Table1.FieldByName('FIOOtca').AsString;
 Form11.Memo3.Text:=Form11.Table1.FieldByName('FIOMateri').AsString;
 Form11.Memo4.Text:=Form11.Table1.FieldByName('OtkudaVibyl').AsString;
 Form11.Memo5.Text:=Form11.Table1.FieldByName('KudaPereshol').AsString;
 Form11.Memo6.Text:=Form11.Table1.FieldByName('AdresPriPost').AsString;

а вот код, для обычного Edit-a:

 Form9.Query5.Active:=False;
 Form9.Query5.SQL.Clear;
 Form9.Query5.SQL.Add('SELECT MestoRogd');
 Form9.Query5.SQL.Add('FROM spisok');
 Form9.Query5.SQL.Add('WHERE Familiy= ' + QuotedStr(Form9.Edit1.Text));
 Form9.Query5.ExecSQL;
 Form9.DBMemo1.Text:=Form9.Table1.FieldByName('MestoRogd').AsString;

Но оба эти кода не работают как надо

[soleil@mmc]

меняй

.ExecSQL;

на

.Open;

[artemavd]

soleil@mmc

Разве причина была только в этом??)

[Evgeniy26]

Select - Open. Update, Insert, Delete - ExecSQL.

[soleil@mmc]

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

Разве причина была только в этом??)

переваривать весь этот код тяжело, но ЭТО первое что бросилось в глаза (в синтаксисе запроса вроде ошибок не разглядел)