Люди плиз ответьте на пару ламерских вопросов

Как получить результат выполнения SQL запроса из базы данных?
допустим есть код:
with Query do
begin
with SQL do
begin
Clear;
Add('SELECT test_field from "db.db" WHERE ID='1'');

Чтобы его выполнить я использую
ExecSQL;
И знаю что ExecSQL ничего не возвращает, а как использовать Open, я че-то не вкурю никак
Мне нужно результат запроса засунуть в TEdit.

И еще один вопрос...

Как открыть Word и сделать в нем поиск с заменой текста.

Я был бы очень признателен если бы вы привели код.

З.Ы. "Базы данных с нуля" я читал, но нужного мне ответа не нашел.

ExecSQL используется для запросов типа INSERT,DELETE ...Для получения значений запроса SELECT тебе и нужно использовать метод Open или Active:=True. Для просморта возвращенного результата проще всего поместить на форму TDBGrid и подключив к ней TDataSource выполнить запрос. Если же тебе нужно помещать какие либо значения в TEdit(не в TDBEdit?), то для этого в событии OnScroll компонента Query пиши что то типа этого:

Код

Edit.Text:=DataSource.DataSet.FieldByName('test_field').AsString;

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

Код

with Query.SQL do  Text:='SELECT test_field from "db.db" WHERE ID=1'; .... with DataSource.DataSet do if RecCount>0 then  Edit.Text:=FieldByName('test_field').AsString;

Если будут вопросы пиши.

Это сообщение отредактировал(а) <Spawn> - 5.8.2003, 12:26

<Spawn>
Спасибо, ОГРОМНОЕ,


Второй вопрос я так понимаю остается окрытым?

Второй вопрос:
Маленько покопавшись вот до чего дошел

Код

Uses ComObj, ActiveX; procedure TForm1.Button1Click(Sender: TObject); var Unknown:IUnknown; Result:HRESULT; Word, Range:Variant; AppProgID:string; begin AppProgID:='Word.Application'; Result:=GetActiveObject(ProgIDToClassID(AppProgID),nil,Unknown); if Result=MK_E_UNAVAILABLE then Word:=CreateOleObject(AppProgID) else Word:=GetActiveOleObject(AppProgID); Range:=Word.Documents.Item(1).Range; Range.Text:=StringReplace(Range.Text,'ш','а',[rfReplaceAll, rfIgnoreCase]); end;

Это сообщение отредактировал(а) <Spawn> - 6.8.2003, 07:18

Да, открыть документ можно методом Open

Код

Word.Documents.Open('C:\MyDocument.doc');

<Spawn>

Вери сенкс, ты навено живешь в делфи?

Модератор: Один вопрос - один топик. Прошу в дальнейшем не нарушать правил форума!

Правило №10. Запрещается создание сообщения с несколькими вопросами. На каждый вопрос должна создаваться отдельная тема. В случае возникновения таких тем, администрация форума оставляет за собой право изменить текст сообщения, удалить его или закрыть тему