Update a Value From TEdit

Поиск

Список

Период

Сортировка

От	Bob Pawley
Тема	Update a Value From TEdit
Дата	13 апреля 2007 г. 15:07:46
Msg-id	00d001c77df6$5e124170$8e904618@owner обсуждение исходный текст
Ответы	Re: Update a Value From TEdit
Список	pgsql-general

Дерево обсуждения

I am attempting to update a table using a value that is displayed on a TEdit component. I am getting an access violation error.

Can someone tell me what I am doing wrong??

procedure TLoopBuilderForm.NewLoopButtonClick(Sender: TObject);

var Edit1 : TEdit ;

begin

       PSQLQuery1.Close;{close the query}
      //assign new SQL expression Monitor
      PSQLQuery1.SQL.Clear;
      PSQLQuery1.SQL.Add ('Update P_ID.Loops');
      PSQLQuery1.SQL.Add ('Set IDW_Loop_ID = + LoopNumberEdit');
      PSQLQuery1.SQL.Add ('Where P_ID.Loops.Loop_Name = :Loop_Name');
      PSQLQuery1.ParamByName('LoopNumberEdit').Value := Edit1.Text;
      PSQLQuery1.Execsql;

end;

Running Delphi 6 and PostgreSQL 8.2 on Win XP.

Bob

В списке pgsql-general по дате отправления:

Вход в личный кабинет

Восстановление пароля

Подтверждение аккаунта

Изменение пароля

Update a Value From TEdit