Re: Update a Value From TEdit - Mailing list pgsql-general

From Arthur Hoogervorst
Subject Re: Update a Value From TEdit
Date
Msg-id ff60f9b30704131146i372f6bedne53b6c7e6fc8fb74@mail.gmail.com
Whole thread Raw
In response to Update a Value From TEdit  (Bob Pawley <rjpawley@shaw.ca>)
List pgsql-general
Hi:

What's the point of  declaring the TEdit locally? Use a string
instead. Additionally, in Delphi [and any other OOP language) if you
want to use objects, you instantiate them first, as in  Edit1 :=
TEdit.Create(nil);


Regards,


Arthur



On 4/13/07, Bob Pawley <rjpawley@shaw.ca> wrote:
>
>
> 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 by date:

Previous
From: Raymond O'Donnell
Date:
Subject: Re: Update a Value From TEdit
Next
From: Jon Sime
Date:
Subject: Re: OT: schema-sketching software